vb实验报告答案.docx
- 文档编号:29241322
- 上传时间:2023-07-21
- 格式:DOCX
- 页数:41
- 大小:394.31KB
vb实验报告答案.docx
《vb实验报告答案.docx》由会员分享,可在线阅读,更多相关《vb实验报告答案.docx(41页珍藏版)》请在冰豆网上搜索。
vb实验报告答案
(此文档为word格式,下载后您可任意编辑修改!
)
试验报告
(1)
院(系):
课程名称:
日期:
班级
学号
实验室
专业
姓名
计算机号
实验
名称
VB环境的熟悉与应用
成绩评定
所用
软件
VisualBasic6.0
教师签名
实
验
目
的
或
要
求
1.熟悉VB的系统环境,了解VB程序的编写、保存和编译的方法过程。
2.初步了解几个常用控件的使用方法。
实
验
步
骤
、
心
得
体
会
1、在vb中____C_____被称为对象。
2、A.窗体B.控件C.窗体和控件D.窗体、控件和属性
3、设在名称为form1的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是(B)
4、A.窗体的Click事件过程的过程名是form1_Click
5、B.命令按钮的Click事件过程名是C1_Click
6、C.命令按钮的Click事件过程的过程名是Command1_Click
7、编译执行程序的快捷键是_Ctrl+F5_。
8、启动visualbasic后标题栏中显示的信息是(C)。
A.工程-MmicrosoftVisualBasic[设计]B.工程-MmicrosoftVisualBasic[中断]C.工程1-MmicrosoftVisualBasic[设计]D.工程1-MmicrosoftVisualBasic[中断]
9、VisualBasic集成开发环境主要窗口包括__窗体设计窗口;代码设计窗口;_属性窗口;_工程资源管理器窗口_;_工具箱窗口。
10、属性显示方式分两种,即按__字母顺序和按_分类__顺序,分别通过单击相应的按钮来实现。
11、编一程序,程序运行的初始界面如图1-1所示,当用户在文本框中输入姓名,例如输入“张三”,单击“你输入的姓名是:
”按钮(command1),则程序的运行情况如图1-2所示,如果单击“结束”按钮(command2),即结束程序运行。
注意:
保存时必须存放在自己创建的文件夹下,窗体文件名为kt1.frm,工程文件名为kt1.vbp。
图1-1图1-2
1)在窗体设计窗口设计如图1-1界面
2)修改控件属性
控件对象
属性名
属性值
Command1
Caption
你的姓名是:
Command2
Caption
结束
Label1
Caption
欢迎使用vb
Label2
Caption
请输入你的姓名
3)编辑代码
PrivateSubCommand1_Click()
Text2=Text1
EndSub
PrivateSubCommand2_Click()
End
EndSub
12、在名称为Form1的窗体上建立两个名称分别为Cmd1和Cmd2、标题分别为“喜欢”和“不喜欢”的命令按钮。
编写适当的事件过程,要求程序运行后,如果单击“喜欢”命令按钮,则在窗体上显示“数理化”;如果单击“不喜欢”命令按钮,则在窗体上显示“政史地”。
注意:
保存时必须存放在自己创建的文件夹下,窗体文件名为kt2.frm,工程文件名为kt2.vbp,并且在生成对应的可执行程序(.exe)。
1)界面设计:
在窗体设计窗口设计如图1-3界面
图1-3
2)属性设置
控件对象
属性名
属性值
Command1
Caption
喜欢
Command2
Caption
不喜欢
3)代码设计
PrivateSubCmd1_Click()
Print"数理化"
EndSub
PrivateSubCmd2_Click()
Print"政史地"
EndSub
心得体会:
(可以从以下几个方面来总结:
你在上机过程中遇到了哪些难题?
你是怎么克服的?
你对你的程序的评价?
你的收获有哪些?
你有什么没有解决的问题?
等)
试验报告
(2)
院(系):
课程名称:
日期:
班级
学号
实验室
专业
姓名
计算机号
实验
名称
掌握VB基本控件
成绩评定
所用
软件
VB6.0
教师签名
实
验
目
的
或
要
求
1.熟练掌握VB中基本控件的属性,方法和事件
2.通过编程能够实现简单的功能
实
验
步
骤
、
心
得
体
会
1、以下能在窗体Form1的标题栏中显示“VisualBasic窗体”的语句是(C)。
A.Form1.Name="VisualBasic窗体"
B.Form1.Title="VisualBasic窗体"
C.Form1.Caption="VisualBasic窗体"
D.Form1.Text="VisualBasic窗体"。
2、在VB中,要将一个窗体加载到内存进行预处理但不显示,应该使用语句(B)。
A.Show B.HideC.Load D.Unload
3、在窗体上有多个控件,要实现程序运行后焦点默认在某一控件上,应该设置的属性是(C)。
A.设置Enabled的值为True B.设置TabIndex的值为1
C.设置TabIndex的值为0 D.设置Index的值为0
4、设窗体上有一个文本框Text1,要求只能显示信息,不能输入,则应设置(B)。
A.Text1.MaxLength=0B.Text1.Enabled=False
C.Text1.Visible=False D.Text1.Width=0
5、设置命令按钮的属性时,只有将(A)属性设置为1,Picture属性才有效,否则无效。
A、StyleB、CaptionC、EnabledD、Default
6.窗体文件的扩展名是(C)
A、.basB、.clsC、.frmD、.res
7、在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程:
PrivateSubTxtA_KeyPress(keyasciiasinteger)
……
EndSub
若焦点位于文本框中,则能够触发KeyPress事件的操作是(D)
A.单击鼠标B.双击文本框
C.鼠标滑过文本框D.按下键盘上的某个键
8、在文本框中,要使键入的所有字符都显示"*"号。
这时应该设置__D__属性为"*"
A、Text B、MultiLine C、ScrollBars D、PasswordChar
9、唯一能区别一个控件的属性是__C__。
A、Caption B、Text C、Name D、Index
10、确定一个控件在窗体上位置的属性是__Left_______和___Top______。
11、窗体边框类型的默认值是___2___。
12、若要设置窗体为固定对话框,并包含控制菜单框和标题栏,但没有最大最小化按钮,则应进行的属性设置是_BorderStyle=1_。
13、在窗体(form1)上画一个文本框(text1)控件和两个按钮控件(command1、command2)分别显示“向左”、“向右”。
其中两个命令按钮一个显示左移,一个显示右移。
要求在每次按下命令按钮后文本框可以向左或向右移动(不用考虑窗体边界)。
1)界面设计
2)属性设置
控件对象属性属性值
Command1Caption向左
Command2Caption向右
4)代码设计
PrivateSubCommand1_Click()
Text1.Left=Text1.Left-50
EndSub
PrivateSubCommand2_Click()
Text1.Left=Text1.Left+50
EndSub
14、在窗体上部设置一个文本框(text1),文本框的下面设置3个命令按钮,其中左边按钮(command1)中标有“单击此按钮”,中间按钮(command2)中标有“清除”,右边按钮(command3)中标有“程序结束”。
当程序运行时,用鼠标单击左边按钮时,屏幕上部的文本框中显示“欢迎使用vb6.0”;如果单击中间按钮,则清除文本框中显示的内容;而如果单击右边的按钮,则结束程序。
1)界面设计
2)属性设置
控件对象属性属性值
Command1Caption单击此按钮
Command2Caption清除
Command3Caption程序结束
3)代码设计
PrivateSubCommand1_Click()
Text1="欢迎使用vb6.0"
EndSub
PrivateSubCommand2_Click()
Text1=""
EndSub
PrivateSubCommand3_Click()
End
EndSub
15、在窗体上画一个文本框(text1)内容为空;两个命令按钮(command1、command2),上面分别显示“消失”、“出现”。
当单击“消失”按钮时,文本框在窗体上消失;当单击“出现”按钮时文本框在窗体上显示,并且在文本框中显示“HelloWorld”字样,字体大小为16。
1)界面设计
2)属性设置
控件对象属性属性值
Command1Caption消失
Command2Caption出现
3)代码设计
PrivateSubCommand1_Click()
Text1.Visible=False
EndSub
PrivateSubCommand2_Click()
Text1.Visible=True
Text1="HelloWorld"
Text1.FontSize=16
EndSub
16、在名称为Form1的窗体上,画一个文本框和命令按钮。
文本框的名称为Txt1,内容为"全国计算机等级考试二级"。
命令按钮的名称为Cmd1,标题为"计算"。
编写适当的事件过程,使得程序运行时,选择文本框中的几个字符,然后单击命令按钮,将所选择的字符数在窗体上输出。
程序中不得使用任何变量。
注意:
保存时窗体文件名为kt2.frm,工程文件名为kt2.vbp。
1)界面设计
2)属性设置
控件对象属性属性值
Text1NameTxt1
Command1NameCmd1
Cmd1Caption计算
Txt1Caption全国计算机等级考试二级
3)代码设计
PrivateSubCmd1_Click()
PrintTxt1.SelText
EndSub
17、在名称为Form1的窗体上画一个文本框,其名称为Text1,编写适当的事件过程。
程序运行后,如果单击窗体,则可使文本框移到窗体的左上角;而如果改变文本框中的内容,则可使文本框移到窗体的右上角。
1)界面设计
2)属性设置(采用默认值)
控件对象属性属性值
3)代码设计
PrivateSubForm_Click()
Text1.Left=0
Text1.Top=0
EndSub
PrivateSubText1_Change()
Text1.Left=Form1.Width-Text1.Width
Text1.Top=0
EndSub
18、命令按钮,字号、内
容和格式的复制练
习,效果如图3-1,
设置属性,并且编程
实现。
1)属性设置
控件对象属性属性值
2)代码设计
心得体会:
(可以从以下几个方面来总结:
你在上机过程中遇到了哪些难题?
你是怎么克服的?
你对你的程序的评价?
你的收获有哪些?
你有什么没有解决的问题?
等)
试验报告(3)
院(系):
课程名称:
日期:
班级
学号
实验室
专业
姓名
计算机号
实验
名称
掌握VB运算符和表达式
成绩评定
所用
软件
Vb6.0
教师签名
实
验
目
的
或
要
求
1.掌握基本语句(Print语句、赋值语句、Dim语句等)的使用。
2.掌握表达式的正确书写方法及函数、运算符的正确使用。
实
验
步
骤
、
心
得
体
会
1、有如下语句printchr(65);Asc(“def”);Sqr(4),其执行结果是__A1002_______。
2、已知字符串A的值为“AbcDe“,现在把它全部转换为大写字母,正确的语句是______Ucase(“AbcDe“)________。
3、有如下程序
a=300:
b=20
a=a+b:
b=a–b
a=a–b
printa
printb
分析该程序的功能是_____a与b互换______
4、可以同时删除字符串前导和尾部空白的函数是(C)。
A.LtrimB.RtrimC.TrimD.Mid
5、下列不正确的标识符是(B)。
A.a123B.a?
bC.a12_3D.abcdefg
6、如果一个变量未经定义就直接使用,则该变量的类型为(D)A.IntegerB.ByteC.BooleanD.Variant
7、编程实现如下功能:
在窗体上建有2个标签控件(Label1、Label2)分别显示“华氏温度”和“摄氏温度”、2个文本框(Text1、Text2)和两个命令按钮(Command1、Command2)分别显示“华氏转摄氏”和“摄氏转华氏”。
Text1、Text2分别用于输入和显示华摄氏温度,其Text属性为空;Command1、Command2分别用于“华氏转摄氏”、“摄氏转华氏”(Caption属性),温度转换公式为:
F=9/5*C+32(其中F为华氏温度,C为摄氏温度)。
1)界面设计
2)属性设置
控件对象属性属性值
3)代码编辑
8、在名称为Form1的窗体上画两个文本框,名称分别为T1和T2,初始情况下都没有内容。
请编写适当的事件过程,使得运行时,在T1中输入的任何字符,立即显示在T2中。
程序中不得使用任何变量。
1)界面设计
2)属性设置
控件对象属性属性值
3)代码编辑
9、在名称为Form1的窗体上画一个文本框,其名称为T1,宽度和高度分别为1400和400;再画两个命令按钮,其名称分别为C1和C2,标题分别为“显示”和“扩大”,编写适当的事件过程。
程序运行后,如果单击C1命令按钮,则在文本框中显示“等级考试”;如果单击C2命令按钮,则使文本框在高、宽方向上各增加一倍,文本框中的字体大小扩大到原来的3倍。
1)界面设计
2)属性设置
控件对象属性属性值
3)代码编辑
心得体会:
(可以从以下几个方面来总结:
你在上机过程中遇到了哪些难题?
你是怎么克服的?
你对你的程序的评价?
你的收获有哪些?
你有什么没有解决的问题?
等)
试验报告(4)
院(系):
课程名称:
日期:
班级
学号
实验室
专业
姓名
计算机号
实验
名称
VB控制结构
成绩评定
所用
软件
VB6.0
教师签名
实
验
目
的
或
要
求
1.掌握数据的动态输入InputBox和信息提示MsgBox;
2.掌握逻辑表达式及关系表达式的正确书写形式。
3.掌握IF语句写格式及其正确使用。
4.掌握情况控制语句的使用及与多分支条件语句的区别。
5.掌握For语句的使用。
6.掌握Do语句各种形式的使用。
实
验
步
骤
、
心
得
体
会
1、设a=2, b=3, c=4, d=5,求下列表达式的值:
2、
(1)a>b AND c<=d _____False_____
3、
(2)b
4、(3)a 5、(4)a>b OR c<=d_____True______ 6、(5)a>b AND c<=d OR 2*a>c__False__ 7、(6)3>2*b OR a=c AND b<>c OR c>d______False____ 2、将下列数学式子写成vb表达式: (1) cos2(c+d)__Cos(2*(a+d))__ (2) 5+3(a+b)___5+3*(a+b)__ (3) cosx(sinx+1)___Cos(x)*(Sin(x)+1)___ (4) e2+2__exp (2)+2________ 3、以下语句的输出结果是(C)。 PrintFormat(32548.5,“.00”) A.32548.5B.32,548.5C..50D.32,548.50 4、设x=4,y=8,z=7,以下表达式的值是(D) x A.1B.-1C.TrueD.False 5、在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: PrivateSubCommand1_Click() a$=″VisuaLBasic″ PrintString(3,a$) EndSub 程序运行后,单击命令按钮,在窗体上显示的内容是(A) A.VVVB.VisC.sicD.11 6、设有如下声明: DimXAsInteger 如果Sgn(X)的值为-1,则X的值是(D) A.整数B.大于0的整数C.等于0的整数D.小于0的整数 7、在窗体中添加一个名称为Command1的命令按钮,然后编写如下代码: PrivateSubCommand1_Click() a=InputBox("请输入A的值") a=Val(a) b=InputBox("请输入B的值") b=Val(b) x=InputBox("请输入X的值") x=Val(x) a=a+b+x Printa EndSub 程序运行后,单击命令按钮,依次在输入对话框中输入 1 8、在窗体上添加一个名称为command1的命令按钮,然后编写如下事件过程。 PrivateSubCommand1_Click() x=InputBox("Input") SelectCasex Case1,3 Print"分支1" CaseIs>4 Print"分支2" CaseElse Print"else分支" EndSelect EndSub 程序运行后,如果在输入对话框中输入2,则窗体上显示的是__else分支_。 9、下列语句正确的是(C) A.IfA≠BThenPrint″A不等于B″ B.IfA<>BThenPrintf″A不等于B″ C.IfA<>BThenPrint″A不等于B″ D.IfA≠BPrint″A不等于B″ 10、计算z的值,当x大于y时,z=x;否则z=y。 下列语句错误的是(A) A.Ifx>=yThenz=x: z=y B.Ifx>=yThenz=xElsez=y C.z=y: Ifx>=yThenz=x D.Ifx<=yThenz=yElsez=x 11、下列程序段的执行结果为(C) a=5 Fork=1To0 a=a+k Nextk Printk;a A.-16B.-116C.15D.1121 12、下列程序段的执行结果为(B) a=3 b=1 ForI=1To3 f=a+b a=b b=f Printf NextI A.436B.459C.634D.728 13、下列程序段的执行结果为(C) a=5 Fork=1To0 a=a+k Nextk Printk;a A.-16B.-116C.15D.1121 14、有如下程序: PrivateSubCommand1_Click() a=″AWORKERISHERE″ x=Len(a) Fori=1Tox-1 b=Mid(a,i,3) Ifb=″WOR″ThenS=S+1 Next PrintS EndSub 单击命令按钮,程序运行结果为(A) A.1B.2C.3D.5 15、在窗体上画一个命令按钮,然后写出如下事件过程: PrivateSubCommand1_Click() s=1 Do s=(s+1)^(s+2) Number=Number+1 LoopUntils>=6 PrintNumber,s EndSub 程序运行后,输出的结果是(C) A.23B.318C.18D.1020 16、在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: PrivateSubCommandl_Click() c=1234 c1=Trim(Str(c)) Fori=1To4 Print___ Next EndSub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: 1 12 123 1234 则在下划线处应填入的内容为(B) A.A.Right(cl,i)B.Left(cl,i) C.Mid(cl,i,1)D.Mid(cl,i,i) 17、有下面一个程序段,从文本框中输入数据,如果该数据满足条件,除以4余1,除以5余2,则输出,否则,将焦点定位在文本框中,并清除文本框的内容。 PrivateSubCommand1_Click() x=Val(Text1.Text) If___xmod4=1andxmod5=2___Then Printx Else Text1.Text=″″ Text1.setfocus_ EndIf EndSub 18、下列程序的功能是: 当x<50时,y=0.8x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。 请填空。 PrivateSubCommand1_Click() DimxAsSingle x=InputBox(″请输入x的值! ″) SelectCas
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vb 实验 报告 答案
![提示](https://static.bdocx.com/images/bang_tan.gif)