Visual Basic程序设计练习
- 格式:doc
- 大小:193.72 KB
- 文档页数:13
练习参考答案第 1 章一、选择题1.C,2.C ,3.B,4.B,.5.C ,6.C,7.D,8.D,9.B,10.C ,11.B,12.C,13.C,.14.A.,15.B ,16.A ,17.B ,18.B,19.B,20.B。
二、填空题1.(1)按字母序;(2)按分类序。
2.(1)多文档界面或MDI;(2)单文档界面或SDI。
3. Aft+Q。
4. 13。
分别为【文件】、【编辑】、【视图】、【工程】、【格式】、【调试】、【运行】、【查询】、【图表】、【工具】、【外接程序】、【窗口】、【帮助】。
5. (1).vbp;(2).frm(3).bas。
6.(1)对象框;(2)属性显示方式;(3)属性列表;(4)属性解释。
7.(l)固定;(2)浮动。
8.(1)标准控件(或内部控件);(2)ActiveX控件;(3)可插入对象。
9.Shift或Ctrl。
10.T1.Text=“How are you!”或T1=“How are you!”。
11.(1)对象;(2)过程。
12.“What is your name?”。
13.(l)Hello;(2)Visual Basic。
14.(l)建立可视用户界面;(2)设置对象属性;(3)编写代码。
15.(l)属性窗口;(2)运行。
第 2 章一、选择题1. A,2. D,3. B,4. B,5. B,6. A,7. C,8. D,9. C,10.D,11. D,12. A,13. A, 14. D,15. B,16. B,17. C,18.C,19.C,20.C, 21.A, 22.D,23. B,24.A,25.A。
二、填空题1.(1)变体类型;(2)字符串型。
2.(1)其所在的过程;(2)窗体及窗体内的所有过程;(3)模块内的所有过程;(4)整个工程中所有的模块和所有的过程。
3. Visual Basic.NET Programming。
4. Shanghai。
Visual Basic程序设计综合练习题一及答案一、单项选择题(每题3分,共45分)1.无论何种控件,共同具有的属性是()。
A.Text 属性B.Caption属性C.Name属性D.Autosize属性2.当需要上下文帮助时,选择要帮助的内容,希望出现MSDN窗口及显示所需的帮助信息,应按的键是()。
A.Help B.F10 C.F1 D.Esc3.为了保存一个Visual Basic应用程序,下列说法正确的是()。
A.只保存窗体文件(.frm)B.只保存工程文件(.vbp)C.分别保存工程文件和标准模块文件(.bas)D.分别保存工程文件、窗体文件和标准模块文件4.在Visual Basic中,变量的默认类型是()。
A.Integer B.VariantC.Double D.Currency5.Timer控件可用于后台进程中,可在Timer事件内编程,要停止触发Timer事件,需要设置的属性是()。
A.Interval=0或Enabled=False B.Interval=0或Visible=False C.Enabled=False 或Enabled=0 D.Interval=0且Enabled=False6.要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮,只要对下列()属性设置就有效。
A.MaxButton B.BorderSyleC.Width D.MinButton7.有程序代码如下:Text1.Text = "Visual Basic",则Text1,Text ,和"Visual Basic"分别代表()。
A.对象,值,属性B.对象,方法,属性C.对象,属性,值D.属性,对象,值8.要设置命令按钮的背景图形,必须设置的两个属性是()。
A.Value和Icon B.Style和IconC.Caption和Picture D.Style和Picture9.在VB中,下列合法的变量名是()。
VisualBasic程序设计自测题VisualBasic是一种可视化的编程语言,广泛应用于Windows平台的软件开发中。
本文将提供一组VisualBasic程序设计的自测题,旨在帮助读者巩固和检验自己对该编程语言的掌握程度。
以下是一组精选的题目,涵盖了VisualBasic的各个核心知识点和常见应用场景。
题目一:变量和数据类型1. 声明一个名为"age"的整型变量,初始值为25。
2. 声明一个名为"name"的字符串变量,初始值为"John Smith"。
3. 声明一个名为"salary"的双精度浮点型变量,初始值为1000.50。
4. 将"age"的值加上10,然后输出结果。
5. 将"name"和"salary"的值连接起来,然后输出结果。
题目二:条件语句和循环结构1. 编写一个程序,判断一个整数是否为正数、负数或零,并输出相应的提示信息。
2. 编写一个程序,输出1到10之间的所有奇数。
3. 编写一个程序,求1到100之间所有能被3整除的数之和。
4. 编写一个程序,判断一个年份是否为闰年,并输出相应的提示信息。
5. 编写一个程序,求1到100之间的所有素数(只能被1和自身整除的数)。
题目三:数组与字符串操作1. 声明一个整型数组,包含5个元素,分别为1, 2, 3, 4, 5。
2. 将数组中的所有元素相加,然后输出结果。
3. 声明一个字符串变量,值为"Hello, World!"。
4. 输出字符串的长度。
5. 将字符串中的"World"替换为"VB",然后输出结果。
题目四:函数和过程1. 编写一个函数,接受两个整数参数,返回它们的最大公约数。
2. 编写一个函数,接受一个字符串参数,统计字符串中的字母个数并返回。
页脚内容1一、填空题(每题1分,共10分)1.把数学式子: 25sin 21π+写成VB 的数值表达式为( Sqr(1+3.14159/2*Sin(25*3.14159/180)) )。
2.设A=5,B=6,C=7,D=8,表达式3>2*B OR A=C AND B<>C OR C>D 的值是( True )。
3.若Case 子句中的表达式表列具有形式:<表达式1> To <表达式2>,则它的含义是:当测试表达式的值等于( 指定范围内的值 )时,执行该Case 子句相应的语句块。
4.执行下面的程序段后,x 的值为( 12 )。
x=0For i=1 To 8 Step 3x=x+iNext i5.在图片框上放置的控件称为图片框的( 子 )对象,而窗体是图片框的( 父 )对象。
6.将命令按钮Command1的Caption 属性值赋给文本框Text1的Text 属性使用的语句为( Text1.Text=Command1.Caption )7.复选框的Value 属性为( 1 )时,表示复选框被选中。
8. 使用滚动条可以获取某一范围内的数值输入。
为使垂直滚动条的Value 属性值从下往上递增变化,应设置滚动条Min 属性值大于( Max )属性值。
9.语句:Dim A(-3 to 4) as Integer定义的一维数组A的元素个数是(8)。
10.给定如下子过程:Function fun(ByVal num As Long) As LongDim k As Long,i As Integerk=1For i=1 To numk=k*iNext iEnd Function执行语句Print fun(5) 后在窗体上显示的结果为(0)。
二、单项选择题(每题1.5分,共30分)1.装载窗体是窗体的( C )。
A) 对象B) 属性C) 事件D) 方法2.设a="Visual Basic",下面使b的值为"Basic"的赋值语句正确的是( B)。
1.执行下面的程序段后,x 的值为 A 。
x=5For i=1 To 20 Step 2x=x+i\5Next iA.21 B.22 C.23 D.242.在窗体上画两个文本框(其【Name】属性分别为“Text1”和“Text2”)和一个命令按钮(其【Name】属性为“Command1”),然后编写如下事件过程:Private Sub Command1_Click()x=0Do While x<50x=(x+2)*(x+3)n=n+1LoopForm1.Print xForm1.Print nEnd Sub程序运行后,单击命令按钮,窗体上显示的值分别为 B 。
A.1和0 B.2和72 C.3和50 D.4和1683.执行下面的程序段后,s的值为 C 。
s=5For i = 2.6 To 4.9 Step 0.6s=s+1Next iA.7 B.8 C.9 D.104.执行下面的程序段后,s的值为 A 。
s = 0i = 1N=1Do While i < Ns = s + ii = i + 1LoopA.0 B.1 C.2 D.35.执行下面的程序段后,s的值为 B 。
s = 0i = 1N=1Dos = s + ii = i + 1Loop While i < NA.0 B.1 C.2 D.31.在空白处填上代码以完成整个循环。
For i = l To 10Print Tab(16 - i);For j = 1 TO 2 * i - 1Print "*"Next jPrint '换行Next i2.补充代码,以完成查找75最大公约数的功能。
For i=36 To 1 Step -1If 75 mod i == 0 ThenPrint "75最大公约数为",iExit ForEnd ifNext i3.补充代码,以完成查找35和75最大公约数的功能。
一、单项选择题1. 在代码中引用一个控件时,应使用控件的()属性A. CaptionB. NameC. TextD. Index2. 以下4种描述中,错误的是()A.常量在程序执行期间其值不会发生改变B.根据数据类型不同,常量可分为字符型常量、数值常量、日期、时间型常量和布尔型常量C.符号常量是用一个标识符来代表一个常数,好像是为常数取一个名字,但仍保持常数的性质D. 符号常量的使用和变量的使用没有差别3. Visual Basic中可以用类型说明符来标识变量的类型,其中表示货币型的是()A.% B. #C.@ D. $4. 表达式16/4-2^5*8/4 MOD 5\2的值为()A. 14B. 4C. 20D. 25. 表达式Int(Rnd*71)+10产生的随机整数范围是()A. (10,80)B.(10,81)C. [10,80]D.[10,81]6. 表达式ASC("F")的类型是()A. 字符表达式B.关系表达式C.算术表达式D.逻辑表达式7. 要定义5个元素的整型数组,以下语句正确的是()A. Dim arr(5) As IntegerB. Dim arr(1 To 5)C. Dim arr(4) As IntegerD. 以上都不对8. 如要获得滚动条的当前值,可访问的属性是()A. TextB.ValueC. MaxD. Min9. 下列关于For…Next语句的说法正确的是()A. 循环变量、初值、终值和步长都必须为数值型B.step后的步长只为正数C. 初值必须小于终值D.初值必须大于终值10. 若要求从文本框中输入密码时在文本框中只显示*号,则应当在此文本框的属性窗口中设置()A. Text属性值为*B. Caption属性值为*C. Password属性值为空D. Passwordchar属性值为*11. 67890属于()类型数据A.整型B. 单精度浮点数C. 货币型D. 长整型12. 下列关于工具箱的说法正确的是()A. 工具箱中控件的数目是固定不变的B. 工具箱中包含了所有的VB控件C. VB的内部控件不能从工具箱中移除D. ActiveX控件不能添加到工具箱中13. Visual Basic的三种工作模式是()A. 编辑、编译与运行B. 设计、运行与中断C. 中断、打开与关闭D. 设计、编辑与编译14. 如果变量a=2、b="abc"、c="acd"、d=5,则表达式a<d OR b>c AND b<>c的值为()A.true B. false C. yes D. no15. 下列变量名中正确的是()A. 3SB. PrintC. Select My NameD. Select_116. 语句Print"ABC";Spc(4); "DEF"的输出结果是()A. ABCDEFB. ABCDEFC. ABC DEFD. ABCDEF17. 多分支结构执行哪一个分支的依据是()A. Select Case语句的“测试表达式”与Case语句的“变量值列表”同为falseB. Select Case语句的“测试表达式”与Case语句的“变量值列表”同为trueC. Select Case语句的“测试表达式”与Case语句的“变量值列表”相匹配D. Select Case语句的“测试表达式”与Case语句的“变量值列表”完全相等18. InputBox函数的返回值的类型为()A. 数值B. 数值或字符串(视输入的数据而定)C. 变体D. 字符串19. 下列赋值语句()是有效的A. sum=sum-sumB. x+2=x+2C. x+y=sumD. last=y/020. 以下关于列表框的叙述错误的是()A. 可通过属性“Item”,返回列表框中的项目B. 可通过属性“Text”,得到当前列表项中的内容C. 可通过属性“ListIndex”返回当前选中的列表项的索引D. 可通过属性“ListCount”返回列表框中项目的数目21. 下列符号常量的声明中,()是不合法的A. Const a As Single=1.1B. Const a As Interger="12"C. Const a As Double=Sin(1)D. Const a="OK"22. 以下控件或方法具有输入和输出双重功能的为()A. PrintB. TextboxC. OptionbuttonD. Checkbox23. 若要获得列表框中被选中的列表项的内容,可以通过访问()属性来实现A. NameB. LlistIndexC. ListCountD. Text24. 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )b=5c=6Print a=b+cEnd Sub程序运行后,单击命令按钮,其结果为()A. a=11B. a=b+cC. a=D. False25. 以下Case语句中错误的是()。
第1章习题一、选择题1. B2. A3. B4. A二、填空题1. 事件驱动或消息驱动2. 工程资源管理器、窗体三、问答题1. 11个菜单项。
文件菜单包括新建工程、打开工程、添加工程、移除工程、保存工程、工程另存为、保存窗体文件、窗体文件另存为、打印、打印设置、生成可执行文件等命令项;编辑菜单(命令项略,以下同)、视图菜单、工程菜单、格式菜单、调试菜单、运行菜单、查询菜单、图表菜单、工具菜单、外接程序菜单、窗口菜单、帮助菜单。
2. 可以自行定义。
标准工具栏中有添加工程、添加窗体、菜单编辑器、打开工程、保存工程、剪切、复制、粘贴、查找、撤销、恢复、启动、中断、结束、工程资源管理器、属性窗口、窗体布局窗口、对象浏览器、工具箱、数据视图窗口等按钮。
四、编程题(略)第2章习题一、选择题1. A二、练习题1. S1. 把x赋值给同类型变量t;S2. 把y赋值给x;S3. 把t赋值给y。
2. S1. 输入a、b、c;S2. 如果a<b,则交换a与b的数据;S3. 如果a<c,则交换a与c的数据;S4. 如果b<c,则交换b与c的数据;S5. 输出a、b、c。
3. S1. 输入整数N;S2. 给整数K赋值2;S3. 如果K大于N-1,则转S6;S4.如果N除以K 的余数为0,则转S7;S5. K加1再赋值给K,转S3.;S6. 如果K大于N-1,则N为素数;否则N不是素数。
4. S1. 输入整数N;S2. 将N赋值给K;S3. 给整数nx赋值0;S4. 计算nx乘以10加K除以10的余数,再赋值给nx;S5. 计算K除以10的整数商,赋值给K;S6. 如果K>0,则转S4;否则,转S7;S7. 如果N=nx,则N为回文数,否则N不是回文数。
5.6.第3章习题一、选择题1. D2. C3. A4. B5. D6. A7. B8. D9. B 10. D 11. A . 12. C 13. C 14. C二、填空题1. 标题、引用2. ②④⑤3. 64. GotFocus、Resize5. AddItem、Clear6. Label,CommandButton,OptionButton,CheckBox,Frame、TextBox,ListBox,ComboBox7. PictureBox,Frame8. OptionButton,CheckBox,HScrollBar,VScrollBar、OptionButton、CheckBox,HScrollBar,VScrollBar三、问答题1. 答:对象的只读属性的属性值(如名称属性)只能在设计界面时在属性窗口进行设置;非运行属性的属性值则既可在设计界面时在属性窗口进行设置,也可通过程序代码进行设置与修改。
Visual Basic程序设计技能试题
1、设计一个程序,由用户从键盘上输入两个数,然后求这两个数的和,并将结果显示出来。
根据题目要求设计用户界面如图所示:
2、设置密码。
程序设计者事先设定(在程序中设定)一个密码为“123456”。
要求用户在
一个文本框中输入密码,然后单击“校验密码”命令按钮,程序将核对用户输入的密码与事先设定的密码是否一致。
如果一致,则继续执行其他功能,若不一致输出警告信息。
用户界面如图所示:
3、设计一个程序,窗体中有两个命令按钮和三个标签和两个文本框。
程序运行后若单击“确
定”,则分别在两个文本框中显示系统当前的日期和时间。
用户界面如图所示:
4、设计一个程序,窗体上由一个标签、一个文本框、四个选择框组成。
程序开始运行后,
用户在文本框中输入一段文字,然后按需要单击各选择框,用以改变文本的字体、字型、颜色和大小。
用户界面如图所示:
5、设计一个程序界面如图所示,程序运行后,用户单击某个单选钮,就可将它对应的内容
(星期、日期、月份或年份)显示在文本框中。
6、编写程序,计算+2+3+ (100)
7、编写程序,使能输入如图所示图形。
Visual Basic程序设计综合练习题一及答案一、单项选择题(每题3分,共45分)1.无论何种控件,共同具有的属性是()。
A.Text 属性B.Caption属性C.Name属性D.Autosize属性2.当需要上下文帮助时,选择要帮助的内容,希望出现MSDN窗口及显示所需的帮助信息,应按的键是( )。
A.Help B.F10 C.F1 D.Esc3.为了保存一个Visual Basic应用程序,下列说法正确的是()。
A.只保存窗体文件(。
frm)B.只保存工程文件(.vbp)C.分别保存工程文件和标准模块文件(。
bas)D.分别保存工程文件、窗体文件和标准模块文件4.在Visual Basic中,变量的默认类型是()。
A.Integer B.VariantC.Double D.Currency5.Timer控件可用于后台进程中,可在Timer事件内编程,要停止触发Timer事件,需要设置的属性是( )。
A.Interval=0或Enabled=False B.Interval=0或Visible=False C.Enabled=False 或Enabled=0 D.Interval=0且Enabled=False6.要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮,只要对下列( )属性设置就有效。
A.MaxButton B.BorderSyleC.Width D.MinButton7.有程序代码如下:Text1。
Text = "Visual Basic",则Text1,Text ,和"Visual Basic"分别代表( )。
A.对象,值,属性B.对象,方法,属性C.对象,属性,值D.属性,对象,值8.要设置命令按钮的背景图形,必须设置的两个属性是()。
A.Value和Icon B.Style和IconC.Caption和Picture D.Style和Picture9.在VB中,下列合法的变量名是()。
一、填空题(每题1分,共10分)1.把数学式子:ο25sin 21π+写成VB 的数值表达式为( Sqr(1+3.14159/2*Sin(25*3.14159/180)) )。
2.设A=5,B=6,C=7,D=8,表达式3>2*B OR A=C AND B<>C OR C>D 的值是( True )。
3.若Case 子句中的表达式表列具有形式:<表达式1> To <表达式2>,则它的含义是:当测试表达式的值等于( 指定范围内的值 )时,执行该Case 子句相应的语句块。
4.执行下面的程序段后,x 的值为( 12 )。
x=0For i=1 To 8 Step 3x=x+iNext i5.在图片框上放置的控件称为图片框的( 子 )对象,而窗体是图片框的( 父 )对象。
6.将命令按钮Command1的Caption 属性值赋给文本框Text1的Text 属性使用的语句为( Text1.Text=Command1.Caption )7.复选框的Value 属性为( 1 )时,表示复选框被选中。
8. 使用滚动条可以获取某一范围内的数值输入。
为使垂直滚动条的Value 属性值从下往上递增变化,应设置滚动条Min 属性值大于( Max )属性值。
9.语句:Dim A(-3 to 4) as Integer 定义的一维数组A 的元素个数是( 8 )。
10.给定如下子过程:Function fun(ByVal num As Long) As LongDim k As Long,i As Integerk=1For i=1 To numk=k*iNext iEnd Function执行语句Print fun(5) 后在窗体上显示的结果为(0)。
二、单项选择题(每题1.5分,共30分)1.装载窗体是窗体的( C )。
A) 对象 B) 属性 C) 事件 D) 方法2.设a="Visual Basic",下面使b的值为"Basic"的赋值语句正确的是( B )。
vb程序设计书习题和参考答案练习题习题一一、判断题1.Visual Basic是以结构化的Basic语言为基础、以事件驱动作为运行机制的可视化程序设计语言。
2.面向对象的程序设计是一种以对象为基础,由事件驱动对象的编程技术。
3.事件是由Visual Basic预先定义的对象能够识别的动作。
4.新建工程时系统会自动将窗体标题设置为Form1。
5.控件的属性值不能够在程序运行时动态地修改。
6.决定对象是否可见的属性为Visible属性,决定对象可用性的属性是Enabled属性。
7.保存Visual Basic文件时,若一个工程包含多个窗体或模块,则系统先保存工程文件,再分别保存窗体或模块文件。
8.单击“启动”菜单项将窗体装入内存时,一定触发窗体的Load事件。
9.“事件过程”是用来完成事件发生后所要执行的程序代码。
10.在打开某窗体时,初始化该窗体中的各控件,应选用Load事件。
二、选择题1.工程文件的扩展名为。
A、.frxB、.basC、.vbpD、.frm2.下列不属于对象的基本特征是。
A、属性B、方法C、事件D、函数3.在设计模式双击窗体将显示的窗口是A、工程窗口B、工具箱C、代码窗口D、属性窗口4.VB中运行程序的快捷键是A、F2B、F5C、Alt+F3D、F85.改变控件在窗体中的上下位置应修改该控件的属性。
A、TopB、LeftC、WidthD、Right6.窗体模块的文件扩展名是A、.exeB、.basC、.frxD、frm7.设置窗体的字体用属性。
A、FontNameB、FontSizeC、FontBoldD、FontItalic8.设置窗体的字号用属性。
A、FontNameB、FontSizeC、FontBoldD、FontItalic 9.下列选项中不属于事件的是。
A、DblclickB、LoadC、ShowD、KeyUp10.VB编制的程序保存在磁盘上,至少会产生何种文件。
A、.doc与.txtB、.com与.exe.C、.bat与.frmD、.vbp与.frm三、程序设计题1.新建一个工程,单击窗体时,在窗体上显示“欢迎使用Visual Basic程序”。
Visual Basic程序设计复习要点及练习综合练习题一、单项选择题(每小题2分)1.在界面设计时,双击窗体中的对象后,VisualBasic将显示的窗口是()。
A.立即窗口B.属性窗口C.代码窗口D.工程资源管理器窗口2.后缀为.vbp的文件表示VB 的()A.窗体文件B.类模块文件C.工程文件D.标准类模块文件3.要在窗体Form1内显示“myfrm”,使用的语句是()A.Form.caption="myfrm" B.Form1.caption="myfrm"C.Form1.print "myfrm" D.Form. print "myfrm"4.表达式8+13 Mod 2*4+3()。
A.8 B.16 C.15 D.125.文本框没有()属性A、TextB、NameC、CaptionD、BorderStyle6.下列赋值语句正确的是()A.B+C =A B.A=B+CC.-B=A D.5=A+B7.如果准备向随机文件中写入数据,正确的语句是()A.Write # 1,rec B.Print # 1,recC.Get # 1,rec D.Put # 1,rec8.Winsock控件的LocalHostName属性的作用是()A.仅返回所用端口B.返回本地计算机的名称C.返回或设置所用端口D.返回本地计算机的IP地址9.要以读方式打开D盘的一个顺序文件 Test.doc,应使用的语句是()A.Open " Test.doc " For Output As #1B.Open "D:\ Test.doc " For Input As #1C.Open "D:\ Test.doc " For Output As #1D.Open " Test.doc " For Input As #110.Dim Abc(2,3)所定义的数组元素个数是()A、6B、5C、12D、911.在Visual Basic中,默认的数据类型是()A.Integer B.Double C.Currency D.Variant 12.当Winsock控件处于关闭状态时,其State属性的值是()A.1 B.0C.2D.313.执行指令”Line(200,200)-step(500,500)”后,CurrentX=( )A.500 B.200C.300D.70014.不属于VB数据库引擎的是()A.ODBC B.Jet引擎C.BDE D.OLE DB15.全局变量必须在()中定义A、标准模块B、窗体模块C、类模块D、任意模块16.改变驱动器列表框的Drive属性值,将激活()事件。
Visual Basic 程序设计练习(二)一、选择题下列各题A)、B)、C)、D)四个选项中,只有一个选项是正确的。
1.设=4,b=5,c=6,执行语句print a<b and b<c后,窗体上显示的是()A.TrueB.FalseC.出错信息D.02. 以下选项中,不合法的Visual Basic的变量名是()A.a5bB._xyzC.a_bD.andif3. 为了使文本框同时具有垂直和水平滚动条,应先把multiLine 属性设置为True,然后再把Scrollbars属性设置为()A.0B.1C.2D.34. 窗体上有一个名为HScroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。
下面能够实现上述操作的事件过程是()A. Private Sub HScroll1_Change()B. Private Sub HScroll1_Change()Print HScroll1.Value Print HScroll1.SmallChange End Sub End SubC. Private Sub HScroll1_Scroll()D. Private Sub HScroll_Scroll()Print HScroll1.Value Print Hscroll1.Smallchange End Sub End Sub5. 窗体上有两个名称分别为Text1、Text2的文本框。
Text1的KeyPress的事件过程如下:Private Sub Text1_KeyPress(KeyAscii As Integer)Dim c As Stringc = UCase(Chr(KeyAscii))Text2.Text = Chr(Asc(c)+2)End Sub当向文本框Text1中输入小写字母a时,文本框Text2中显示的是( )A.AB.aC.CD.c6. 以下不能输出“Program”的语句是()A.Print Mid(”VBProgram”,3,7)B.Print Right(“VBProgram”,7)C. Print Mid(”VBProgram”,3)D. Print Left(“VBProgram”,7)7. 假定有以下循环结构Do Until 条件表达式循环体Loop则以下正确的描述是()。
Visual Basic程序设计练习题1.Visual Basic是一种面向对象的可视化程序设计语言,采取了A的编程机制。
A.事件驱动B.按过程顺序执行C.从主程序开始执行D.按模块顺序执行2.在Visual Basic中最基本的对象是C,它是应用程序的基石,是其他控件的容器。
A.文本框B.命令按钮C.窗体D.标签3.多窗体程序是由多个窗体组成。
在缺省情况下,VB在应用程序执行时,总是把B 指定为启动窗体。
A.不包含任何控件的窗体B.设计时的第一个窗体C.包含控件最多的D.命名为Frm1的窗体4.若有程序代码如下:text1.text="Visual Basic"则:text1,text和"Visual Basic" 分别代表C。
A.对象,值,属性B.对象,方法,属性C.对象,属性,值D.属性,对象,值5.Visual Basic是一种面向对象的程序设计语言,A不是面向对象系统所包含的三要素。
A.变量B.事件C.属性D.方法6.在VB集成环境创建VB应用程序时,除了工具箱窗口、窗体中的窗口、属性窗口外,必不可少的窗口是C。
A.窗体布局窗口B.立即窗口C.代码窗口D.监视窗口7.保存新建的工程时,默认存放的位置是B。
A.My Documents B.VB98 C.\ D.Windows 8.若要使标签控件显示时不覆盖其背景内容,要对D属性进行设置。
A.BackColor B.BorderStyle C.ForeColor D.BackStyle 9.若要使命令按钮不可操作,要对A属性设置。
A.Enabled B.Visible C.BackColor D.Caption 10.文本框没有D属性。
A.Enabled B.Visible C.BackColor D.Caption 11.不论何控件,共同具有的是B属性。
A.Text B.Name C.ForeColor D.Caption 12.要使Form1窗体的标题栏显示“欢迎使用VB”,以下D语句是正确的。
《Visual_Basic程序设计》试题及其答案Visual_Basic程序设计试题及其答案Visual_Basic程序设计是一门与Windows操作系统密切相关的编程语言,广泛应用于图形用户界面(GUI)的开发。
下面是一套Visual_Basic程序设计的试题,以及详细的答案解析。
一、概念题(共10题,每题2分,共20分)1. 什么是Visual_Basic程序设计?答案:Visual_Basic程序设计是一种基于BASIC语言的集成开发环境(IDE),用于Windows平台的程序开发和编程。
2. Visual_Basic程序设计的特点是什么?答案:Visual_Basic具有简单易学、图形化编程界面、可视化设计、事件驱动等特点。
3. 什么是控件?答案:控件是Visual_Basic程序设计中用于构建用户界面的基本元素,如按钮、文本框、标签等。
4. Visual_Basic程序中的数据类型有哪些?答案:Visual_Basic支持多种数据类型,包括整数、浮点数、字符串、布尔值等。
5. 什么是条件结构?答案:条件结构是一种根据不同条件执行不同操作的程序结构,如If语句和Select Case语句。
6. 什么是循环结构?答案:循环结构是一种重复执行特定操作的程序结构,如For循环和While循环。
7. 什么是函数?答案:函数是一段可重复调用的代码,通常用于实现特定功能,并可以返回结果。
8. 如何定义和调用函数?答案:在Visual_Basic中,可以使用Function关键字定义函数,并使用函数名调用函数。
9. 什么是异常处理?答案:异常处理是一种处理程序运行过程中可能出现的错误或异常情况的机制,以保证程序的稳定性。
10. Visual_Basic程序如何进行调试?答案:Visual_Basic提供了丰富的调试工具,包括断点调试、单步调试等,以帮助程序员发现和解决问题。
二、编程题(共2题,每题40分,共80分)题目一:设计一个Visual_Basic程序,实现计算器的基本功能。
Visual Basic程序设计练习一、单项选择题(每小题2分)1.在界面设计时,双击窗体中的对象后,VisualBasic将显示的窗口是()。
A.立即窗口B.属性窗口C.代码窗口D.工程资源管理器窗口2.后缀为.vbp的文件表示VB 的()A.窗体文件B.类模块文件C.工程文件D.标准类模块文件3.要在窗体Form1内显示“myfrm”,使用的语句是()A.Form.caption="myfrm" B.Form1.caption="myfrm"C.Form1.print "myfrm" D.Form. print "myfrm"4.表达式8+13 Mod 2*4+3()。
A.8 B.16C.15 D.125.文本框没有()属性A、TextB、NameC、CaptionD、BorderStyle6.下列赋值语句正确的是()A.B+C =A B.A=B+CC.-B=A D.5=A+B7.如果准备向随机文件中写入数据,正确的语句是()A.Write # 1,rec B.Print # 1,recC.Get # 1,rec D.Put # 1,rec8.Winsock控件的LocalHostName属性的作用是()A.仅返回所用端口B.返回本地计算机的名称C.返回或设置所用端口D.返回本地计算机的IP地址9.要以读方式打开D盘的一个顺序文件 Test.doc,应使用的语句是()A.Open " Test.doc " For Output As #1B.Open "D:\ Test.doc " For Input As #1C.Open "D:\ Test.doc " For Output As #1D.Open " Test.doc " For Input As #110.Dim Abc(2,3)所定义的数组元素个数是()A、6B、5C、12D、911.在Visual Basic中,默认的数据类型是()A.Integer B.Double C.Currency D.V ariant 12.当Winsock控件处于关闭状态时,其State属性的值是()A.1 B.0 C.2D.313.执行指令”Line(200,200)-step(500,500)”后,CurrentX=( )A.500 B.200C.300D.70014.不属于VB数据库引擎的是()A.ODBC B.Jet引擎C .BDED .OLE DB15.全局变量必须在( )中定义A 、标准模块B 、窗体模块C 、类模块D 、任意模块 16.改变驱动器列表框的Drive 属性值,将激活( )事件。
A .ChangeB .ScollC .KeyDownD .KeyUp17.如果将文本框的( )属性设置为True ,则运行时不能对文本框中的内容进行编辑。
A .LockedB .MultiLineC .TabStopD .Visible 18.数学式子Sin25︒写成VB 表达式是( )。
A .Sin25B .Sin (25)C .SIN (25︒)D .Sin (25*3.14/180) 19.下列变量名中合法的是( )A .IF (与系统已定义的标示符同名了)B .7ABC .A[B]7D .AB_720. 要退出For …Next 循环,应使用的语句是( )。
A .ExitB .Exit ForC .ContinueD .Stop Loop 21.在下列选项中,不能将图像装入图片框和图像框的是( ) A .在界面设计时,通过Picture 属性装入B .在界面设计时,手工在图像框和图片框中绘制图形C .在界面设计时,利用剪贴板把图像粘贴上D .在程序运行期间,用LoadPicture 函数把图形文件装入 22.下面选项中,能绘制填充矩形的语句是( ) A .Line (200, 200)-(500, 500),B B .Line (200, 200)-(500, 500), , BFC .Line (200, 200)-(500, 500), BFD .Line (200, 200)-(500, 500)23.ADOrs 为Recordset 对象,从Tabel 中获取所有记录的语句是( ) A .ADOrs.New "Select * From Tabel" B .ADOrs.Open "Select * From Tabel"C .ADOrs.Execute "Select * From Tabel"D .ADOrs. Select "Select * From Tabel"24.当改变驱动器列表框中的驱动器时,为了使目录列表框中的内容同步跟着改变,应当( )A .在Dir1_Change()事件中加入代码Dir1.Path=Drive1.DriveB .在Dir1_Channge()事件中加入代码Drive1.Drive =Dir1.PathC .在Dirve1_Channge()事件中加入代码Dir1.Path=Drive1.DriveD .在Dirve1_Channge()事件中加入代码Drive1.Drive =Dir1.Path 25.VB 程序中通常不会产生错误提示的( )。
A .编译错误 B .实时错误 C .运行时错误 D .逻辑错误 二、填空题(每空1分)1.数学表达式050cos 10写成等价的V isual Basic 表达式为10^0.5*cos(50*3.14/180) 。
2.删除在C盘TEMP目录下所有以tmp为后缀的文件的语句为。
3.Visual Basic程序开发有三种模式,即设计模式、运行模式和中断模式。
4.执行指令Line(200,300)-(400,500)后,CurrentX= 。
设CurrentX=50,CurrentY=100,执行指令“Line(100,20)-Step(300,500)”后,CurrentY = 。
5.ADO数据模型中一般可通过Connection对象的方法对数据库中的基本表进行增加、删除、修改等不返回结果集的操作。
6.已知a=3,b=4,c=5,表达式a.>b and Not c>a Or c>b And c<a+b的值是。
7.为了在运行时把当前路径下的图形文件picturefile.jpg装入图片框Picture1,所使用的语句为。
8.设某个程序中要用到一个二维数组,要求数组名为A,类型为字符串类型,第一维下标从0到5,第二维下标从-2到5,则相应的数组声明语句为。
9.Visual Basic一般用4种类型的文件保存,分别是扩展名为的窗体文件,扩展名为的标准模块文件,扩展名为的类模块文件和扩展名为的工程文件。
10.将图片框PictureBox的AutoSize属性设置成时,图片框能自动调整大小,以适应其中的图片。
11.若窗体Form1左上角坐标为(0,600),右下角的坐标为(800,-200)。
则X轴的正向向,Y轴的正向向。
12.Left(“abcd”,2)函数的返回值是; Right(“abcd”,2)函数的返回值是。
13.Vb应用程序与数据库进行通信的主要机制称为。
14.Winsock控件主要用来编制或协议的通话程序。
15.假设ADOcn为一个Connection对象,那么在VB程序中声明ADOcn的语句是。
16.在VB中,将Foxpro称为,Access称为,SQL Server 称为。
17.常用的VB网络编程控件主要有、、三种。
18.以(600,600)为圆心,以800为半径,用ForeColor颜色绘制一个圆形,其实现的代码是。
19.以下程序段简要说明驱动器列表框、目录列表框及文件列表框三者协同工作的情况。
将程序段补充完整。
Private Sub Drive1_Change()End SubPrivate Sub Dir1_Change()End Sub20. 在Visual Basic程序中实现复制文件”d:\text.doc”到e:盘根目录下的语句为。
三、阅读程序题阅读下列程序并写出程序运行结果1.Private Sub Command1_Click()x = 0Do While x < 20x = (x + 1) * (x +3)n = n + 1LoopText1.Text = Str(n)Text2.Text = Str(x)Text3.Text = Val(Text1.Text) + Val(Text2.Text)End Sub文件框Text3的结果是:2. Private Sub Command1_Click()Dim x As IntegerStatic s As Integerx = Val(InputBox("请输入一个正整数="))If x < 5 Thens = s * xElses = s + xEnd IfText1.Text = "s=" & Str(s)End Sub程序运行时连续3次单击Command1,且设输入的数据为6、5、4时,分别写出文本框Text1的值。
3.Private Sub Form_Click()Dim A(1 To 3) As StringDim c As Integer,j As IntegerA(1) = “3”A(2) = “6”A(3) = “9”c=0For j=1 to 3c = c + Val(A(j))Next jPrint cEnd Sub写出程序运行时单击窗体后,窗体Form1上的结果:4.Private Sub Command1_Click()Dim A(2 To 7) As IntegerDim b As IntegerFor b = 2 To 7A(b) = bNext bText1.Text = A(b - 2)End Sub程序运行后,单击命令按纽文本框Text1的结果是:5.Sub test(i As Integer)i = i + 2End SubPrivate Sub Form_Click()Dim x As Integerx = 6Print "x="; xCall test(x)Print "x="; xEnd Sub6.Private Sub Form_Click()a = 1:b = 1Print "A="; a; ",B="; bCall mult(a)Print "A="; a; ",B="; bEnd SubPrivate Sub mult(x)x = 3 + xb = 4 + bEnd Sub7.Private Sub Form_Click()Dim i As Integer, a As Integerk = 0For i = 1 To 6If i > 3 Thena = a + 5Elsea = a + 2End IfNext iPrint i, aEnd Sub写出程序运行时单击窗体后,Form1上的输出结果。