VB综合练习题一
VB综合练习题一
（数据类型、常量和变量、基本运算和表达式、赋值语句）
丽水二中：胡建友
一、选择题
1、\,/,Mod,* 四个算术符中.优先级最低的是（）
A）\ B）/ C）Mod D）*
2.下列字符串常量中,最大的是（）
A）"aderb" B）"adyda" C）"ADEEH" D）"EWREL"
3.表达式Int(8*sqr(36)*10^(-2)*10+0.5)/10的值是（）
A）0.48 B）0.048 C）0 .5 D）0.05
4.表达式Val("0.123E2")的值是（）
A）.123 B）12.3 C）0 D）.123E2CD
5.系统符号常量的定义可以通过（）获得
A）对象浏览器B）代码窗口C）属性窗口D）工具箱
6.表达式(7\3+1)*(18\5-1)的值是（）
A）8.67 B）7.8 C）6 D）6.67
7.表达式5^2Mod 25\2^2的值是（）
A）1 B）0 C）6 D）4
8.表达式25 Mod 7的值是（）
A）1 B）5 C）4 D）出错
9.下面表达式中,（）的运算结果与其他三个不同
A）Exp(-3.5) B）Int(-3.5)+0.5 C）-Abs(-3.5) D）-SQR(9)-0.5
10.关于算法，下列叙述正确的是（）
A）算法可以用自然语言、流程图和伪代码来描述B）算法只能用流程图来描述C）算法不能用伪代码来描述D）算法不可以用自然语言来描述11．在Visual Basic工程设计中，双击窗体中的对象后，出现的是（）
A）工程窗口B）工具箱C）代码窗口D）属性窗口
12. 下列属于Visual Basic字符串常量的是（）
A）1/2 B）Int(3.4) C）"1/2" D）1+2
13. 在Visual Basic中，将数字字串转换为数值的函数是（）
A）Str(x) B）Val(x) C）Abs(x) D）Int(x)
14.表达式Int( - 17.8) +Abs(17.8)的值是（）
A）0 B）0.8 C）- 0.2 D）0 34.8
15.表达式mid("how are you",5,3)的值是（）
A）how B）are C）you D）how are you
16.下列属于正确的Visual Basic赋值语句的是（）
A）x+y=10 B）x+y-10=0 C）x,y=10 D）x=10-y
17.表达式Abs( - 5) +Len("ABCDE")的值是（）
A）5ABCDE B）0 5ABCDE C）10 D）0
18.圆周长的计算公式为L=2πa，其中a为圆半径。能正确表示2πa的表达式是（）A）2πa B）2*π*a C）2?π?a D）2*3.1416*a
19.函数Len(Str(Val("12345")))的值为（）
A）11 B）5 C）6 D）8
20.在Visual Basic中，若x=3.1415926，则表达式Int(x*100+0.5)/100的值是( )
A）3.14 B）3.146 C）314 D）314.6
21.“如果下雨在体育馆上体育课，不下雨则在操场上体育课”。用流程图来描述这一问题时，判断“是否下雨”的流程图符号是（）
A）矩形B）菱形C）平行四边形D）圆圈
22.在VB工程设计中，如果要使命令按钮Run上显示“运行”，则下列属性中应改变的属性是( )
A）Font B）Height C）Width D）Caption
23. 在VB中，关系表达式x/y=x\y为真，则说明( )
A）x不能被y整除B）x与y一定相等
C）x与y一定不相等 D）x能被y整除
24. “下雨在体育馆上体育课，不下雨则在操场上体育课”，用算法描述这一问题，合适的算法结构是( )
A）顺序模式B）选择模式C）循环模式D）树型模式
25. 在Visual Basic中，语句Dim x As String的作用是将变量x定义为（）
A）字符串型B）整数型C）逻辑型D）日期型
26. 在Visual Basic工程设计中，要在标签对象Start上显示文字“欢迎使用本系统!”，则下列属性中应改变的属性是( )
A）Caption B）Width C）Text D）Height
27.在下面各关系中,当X取任意数值时都能成立的式子是（）
A）Int(X)>= Abs(X) B）Int(X)=Abs(X) C）Int(X)<=Abs(X) D）Int(X)<>Abs(X)
28. 下列属于正确的Visual Basic表达式是( )
A）a+|b| B）3b-2a C）2?b D）b+5
29. 在VB中，若x、y均是正整数，关系表达式x Mod y=0为真时，则表示( )
A）x不能被y整除B）x能被y整除C）x一定等于y D）x、y均为0
30．设a=3,b=5，则以下表达式值为真的是( )
A) a>=b And b>10 B)(a>b)Or(b>0) C)(a<0)or(b<0) D)(-3+5>a)And(b>0)
31．在Visual Basic中，设x=3171，能得到其十位上数字“7”的正确表达式是( )
A）x\10 Mod 100 B）x\10 Mod 10 C）x\100 Mod 10 D）x Mod 100
32. 在Visual Basic中，变量a中的数值是整数而且可能在-32768～32767范围之外，则变量a的数据类型应定义为( )
A）日期型B）整数型C）长整数型D）逻辑型
33.以下声明语句中正确的是( )
A）Const abs=123 B）Dim val as integer
C）Const int1=123 D）Dim chr As single
34. 在Visual Basic代码窗口中，语句Student.Text="宋知国"中的Text是（）
A）属性名B）属性值C）对象名D）窗口名
35. 表达式 5 Mod 3+3\5*2的值是( )
A) 0 B) 2 C)4 D) 6
36. 设x=4,y=8,z=7，表达式x A) 1 B) -1 C) True D) False 37.设a=5，b=4，c=3，d=2,表达式3 > 2 * b Or a = c And b <> c Or c > d的值是( ) A)1 B)True C) False D)2 38. 在Visual Basic中，表示整数型的数据类型名是（） A）Date B）Integer C）String D）Boolean 39. 在Visual Basic中，已知x是正整数，关系表达式x Mod 2=1为真时，则表示（） A）x被2除的余数为0 B）x能被2整除C）x是奇数D）x是偶数 40. Visual Basic函数Fix(x)的作用是截掉数据的小数部分。已知a是实数，当关系表达式Fix(A）=a为真时，则表示a是（） A）负数B）正数C）整数D）小数 41. 在如右图所示的Visual Basic窗体中，这些被放入窗体中的控件称之为（） A）类B）事件C）属性D）对象 42. 下列描述算法的流程图符号中属于判断框符号的是（） A）B）C）D） 43. 在Visual Basic中，求实数x的算术平方根的函数是（） A）Int(x) B）Sqr(x) C）Abs(x) D）Log(x) 44. .在VB代码窗口中，语句Book1.Text="Windows 操作系统"中的Book1是（） A）属性名B）属性值C）窗口名D）对象名 45. 在Visual Basic中，Hello.vbp文件属于（） A）工程文件B）窗体文件C）代码文件D）类文件 46.在Visual Basic中，如果要给变量i,j,k都赋值为1，则下列语句正确的是（） A）i=j=k=1 B）i,j,k=1 C）i=1,j=1,k=1 D）i=1:j=1:k=1 在Visual Basic中，正确表示"a的立方加1"的表达式是（） A）a3+1 B）a^3+1 C）(a+1) 3 D）(a+1)^3 47.在Visual Basic中，若x是大于零的偶数，则下列关系表达式值一定为真的是（） A）x Mod 2 = 1 B）x\2 = 0 C）x\2 = x/2 D）Int(x/2) <> x/2 48. 在Visual Basic中，若要定义变量no用于存储汽车牌照号码，如"浙A?12345"，则正确的定义语句是（） A）Dim no As Integer B）Dim no As String C）Dim no As Single D）Dim no As Boolean 49. 下列Visual Basic表达式正确的是（） A）v0+a*t B）a2+2bc C）2π*r D）1/2g*t^2 50. 在Visual Basic中，单击文本框Text2触发的事件处理过程名是( ) A) Text1_Click B) Text2_GotFocus C) Text2.Click D) Text2_Click 二、填空题 1.设A=2,B=3,C=4,D=5，写出下列逻辑表达式的值。 （1）A>B And C<= D Or 2*A>C ___________ （2）3>2*B Or A=C And B<>C Or C>D ____________ （3）Not A<=C Or 4*C=B ^ 2 And B<>A+C ________ 2.若A=20,B=80 ,C=70, D=30 ,则表达式 A + B >160 Or (B*C>200 And Not D>60)的值是__________ 3.设A=2 , B= - 2 ,则表达式A / 2 + 1 > B + 5 Or B * (-2)=6的值是________ 4.设A=2,B= -4 ,则表达式3*A> 5 Or B + 8<0的值是__________ 5.关系式X≤-5或X≥5所对应的逻辑表达式是: ________________________ 6.关系式-5≤X≤5所应的逻辑表达式是: _____________________________ 7.A的绝对值大于等于B同时不等于C的逻辑表达式是: ________________________ 8.X是小于100的非负数,对应的逻辑表达式是: ________________________ 9.闰年的条件是:年号(Y)能被4整除,但不能被100整除;或者年号能被400整除.表示该条件的逻辑表达式是: ________________________ 10.一元二次方程ax2+bx+c=0有实根的条件是a≠0,并且b2-4ac≥0,表示该条件的逻辑表达式是: ________________________ 11.表示条件"变量X为能被5整除的偶数"的逻辑表达式是: _____________________ 12. 有如下Visual Basic程序段：13.有如下Visual Basic程序段： a = 30 a="Good" b = 20 b="Bye" a = b c=a+b 该程序段运行后，变量a的值为_____。该程序段运行后，变量c的值是_____。 14.现在买股票的百姓越来越多，买股票是要收印花税的，如老王买了1000股股票，每股8.9元，那他除了要支付买股票的成交金额8900元钱之外，还要支付成交金额千分之一（0.001）的印花税即8900*0.001=8.9元。下面是计算印花税的程序（如图所示），设x为为每股的价格(单位：元)，y为要买的股票数量（单位为股，如1000股，y=1000），c为要支付的印花税金额（单位：元），则程序中划线处应填入的合适语句是： Private Sub Command1_Click() Dim x As Double, y As Long x = Val(Text1.Text) y = Val(Text2.Text) c = ______________ Text3.Text =___________ VB 练习题与答案 96 第2章数据类型与表达式 一、选择题 1. 一个语句行内写多条语句时，每个语句之间用( )符号分隔。 A. ， B. ： C. 、 D. ； 2. 一句语句要在下一行继续写，用( )符号作为续行符。 A. ＋ B. – C. _ D. … 3. 下面( )是合法的变量名。 A. X_yz B. 123ab C. integer D. X-Y 4. 下面( )是不合法的整数。 A. 100 B. ＆Ol00 C. ＆H100 D. ％100 5. 下面( )是合法的字符常量。 A. ABC＄ B. "ABC" C. 'ABC' D. ABC 6. 下面( )是合法的单精度型变量。 A. num! B. sum％ C. xinte＄ D. mm＃ 7. 下面( )是不合法的单精度常数。 A. 100！ B. 100.0 C. 1E+2 D. 100.0D+2 8. 表达式16/4-2^5*8/4 MOD 5\2的值为( )。 A. 14 B. 4 C. 20 D. 2 9. 数学关系3≤x＜10表示成正确的VB表达式为( )。 A. 3＜=X＜10 B. 3＜＝x AND x＜10 C. x＞＝3 OR x＜10 D. 3＜＝x AND＜10 10. “＼”、“／”、“Mod”、“*”四个算术运算符中，优先级别最低的是( )。 A. ＼ B. ／ C. Mod D. * 11. 与数学表达式ab/3cd对应的不正确V isual Basic 6.0表达式是( )。 A. a*b／(3*c*d) B. a／3*b／c／d C. a*b／3／c／d D. a*b／3*c*d 12. Rnd函数不可能为下列( )值。 A. 0 B. 1 vb综合考试试题 1303班9月16日第一次综合考试试题 一、单选（本大题共25小题，每小题2分， 共 50分） 1. 设a=2,b=3,c=4,d=5,表达式NOT a<=c OR 4*c=b^2 AND b<>a+c的值是( )。 A、-1 B、 1 C、True D、False 2、假设A="Good Morning."，B="Afternoon,Boys."，下列表达式中结果是"Good Boys."的是_ __。 A) Left(A,5)+Right(B,5) B) Right(A,5)+Left(B,5) C) Mid(A,1,5)+Mid(B,1,6) D) Right(A,5)+Right(B,5) 3、下列叙中不正确的是（） A、变量名中的第一个字符必须是字母 B、变量名的长度不超过255个字符 C、变量名可以包含小数点或者内嵌的类型声明 字符 D、变量名不能使用关键字 2 4、下列关于变体类型的描述，其中正确的是 _______。 A. 变体是一种没有类型的数据 B. 变体的空值就表示该变体的值为0 C. 一个变量没有定义就赋值，该变量即为变体 类型 D. 变体是赋给变量某一种类型数据后，就不能 再赋给它另一类型的数值 5、执行 PRINT 18/2*3,-3^2 命令后，输出结 果为_____。 A. 3 9 B. 3 -9 C. 27 -9 D. -9 27 6、下面的_______语句可以实现：先在窗体上 输出大写字母A，然后在同一行的第10列输出 小写字母b。 A. Print "A";Tab(9);"b" B. Print "A";Tab(10);"b" C. Print "A";Space(10);"b" D. Print "A";Tab(8);"b" 3 《VB程序设计基础》试题 一、选择题：（每空 2 分，共 20 分） 1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。 A. 结构化程序设计 B. 程序开发环境 C. 事件驱动编程机制 D. 程序调试技术 2. Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是________。 A. 属性、事件、方法 B. 控件、属性、事件 C. 窗体、控件、过程 D. 窗体、控件、模块 3. 窗体模块保存在一个扩展名为__________的文件中。 A. bas B. vbp C. vbg D. frm 4. 下面正确的赋值语句是_________。 A. x+y=30 B. y=π*r*r C. y=x+30 D. 3y=x 5. 设S=“492”，表达式Right（S,1）+Left（S,1）+Mid（S,2,1）的值为__________。 A.“492” B.“249” C.“294” D.“429” 6. 将数学表达式a≤b≤c写成Visual Basic表达式，正确的是__________。 A. a<=b<=c B. a<=b Or b<=c C. a<=b And b<=c D. a<=b Not b<=c 7.为了把焦点移到文本框，所使用的方法是___________。 A. SetFocus B.Visible C.Refresh D.GetFocus 8. INT（100*RND）产生的随机整数的闭区间是_____________。 A.[0，100] B.[1，100] C.[1，99] D.[0，99] 9. 一个数组说明为Dim a(0 to 5，1 to 5) As Integer，则该数组共有_________个 元素。 A. 5 B. 36 C. 30 D. 不确定 10. 下面过程定义语句合法的是____________。 第一部分 1 在窗体上添加一个命令按钮(名称为Cmd1，标题为"输出平均值")。程序运行后，单击命令按钮完成以下工作： ①随机产生20个0到1000的整数，将其放入一个一维数组中 ②求出所有元素的平均值，并显示在窗体上(如下图所示) Private Sub Cmd1_Click() Dim a%(19), i%, sum!, aver! Randomize For i = 0 To 19 a(i) = Int(Rnd * 1001) sum = sum + a(i) Next i aver = sum / 20 Print aver End Sub 2 请在名称为Form1的窗体上添加一个名称为Text1的文本框和一个名称为C1、标题为"转换"的命令按钮，如下图所示。在程序运行时，单击"转换"按钮，可以把Text1中的小写字母转换为大写，把大写字母转换为小写，其他字符不变。 Private Sub C1_Click() Dim ch As String, ch1 As String, i% ch = Text1 For i = 1 To Len(ch) If Asc(Mid(ch, i, 1)) >= 65 And Asc(Mid(ch, i, 1)) <= 90 Then ch1 = ch1 + LCase(Mid(ch, i, 1)) Else ch1 = ch1 + UCase(Mid(ch, i, 1)) End If Next i Text1 = Text1 + vbCrLf Text1 = Text1 + ch1 End Sub 3 在窗体上添加一个命令按钮(名称为MyCmd1，标题为"输出最大值")。程序运行后，单击命令按钮完成以下工作： ①随机产生30个0～1000的整数，将其放入一个一维数组中 ②求出其中的最大值，并显示在窗体上。 Private Sub MyCmd1_Click() Dim a%(29), i%, max% Randomize For i = 0 To 29 第一部分：客观题 1、 单项选择题 1、在窗体模块的通用段中声明变量时，不能使用的关键字是（ ） A、 Dim B、 Public C、Private D、 Static 2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是 （ ） A、工程资源管理器窗口 B、工具箱窗口 C、 属性窗口 D、代码窗口 3、若要使某可见控件获得焦点，可使用（ ）方法来实现。 Ａ、Refresh Ｂ、Setfocus Ｃ、Gotfocus Ｄ、Value 4、下列不可作为VB变量名的是（ ） A、ABT1 B、Alpha C、ABC D、4*Delta 5、表达式 5 Mod 3+3\5*2的值是 （ ） A、 0 B、 6 C、4 D、 2 6、下列语句中，正确的赋值语句是（ ） A、 i + j = 10 B、 2i = j C、 j = i + j D、 i * j = 0 7、执行下列程序段后，x的值是（ ）。 n = 4: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n A、 2 B、 6 C、 10 D、 14 8、当用户在窗体上单击鼠标时，不会触发的事件是（ ） Ａ、Click Ｂ、MouseDown Ｃ、MouseUp Ｄ、DblClick 9、下列为整型变量的是（ ） A、 x! B、 x# C、x$ D、 x% 10、要从For循环中直接退出循环，可使用的语句( )。 A、Exit Do B、Exit Loop C、Exit For D、Stop 11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是 （ ） A、x Mod 2 =1 Or y Mod 2 =1 B、x Mod 2 =0 Or y Mod 2=0 Microsoft ” B )print “Microsoft Microsoft ” D ) Debug.print Microsoft 输入inputbox 返回值的类型是( A )字符型B )整型 C )浮点型 D )长整型 (3) 用来设置设置文本框有无滚动条的属性的值为( A ) D)selle ngth (4) i nt(rnd*50)+10 表示的是(D )范围内的整数。 A) [0，50] B)[1 ，60] C)[10 ，60] D)[10 ，59] (5) 下列各控件不包含滚动条的是(D )。 A)listbox B)combobox C)textboa D)labelbox (6) 为了暂时关闭计时器，应把该计时器控件的( C )属性 设置为false. A)visible B)timer C)e nabled D)i nterval (7) 设置列表框选中的文本，用(C )属性。 A ) Selected B ) List C ) Text D ) Caption (8) 未选中复选框控件时，Value 属性的值为(C ) A ) True B ) False C ) 0 D ) 1 (9) 某一 VB 工程含F1. F2两个窗体，执行“F1. Show F2. Hide ” 语句后，F1. F2 复习题及参考答案 、选择题 (1)使“ Microsoft 在当前窗口上输出的语句是( A ) Picture.print C ) printer.print A)Scrollbars B)Multili ne C)Seltext 窗体显示的结果为 C 。 A) 都显示B)都不显示C)仅显示F1窗体D)仅显示F2窗体 (10) 在窗体上画两个滚动条，名称分别为Hscrolll、Hscroll2 ; 六个标签，名称分别为Labell、Label2、Labe l3、Label4、Label5、Label6，其中标签Label 4~ Label6 分别显示"A"、"B"、"A*B"等文字信息，标签Label1、Label2分别显示其右侧的滚动条的数值， Label3显示A*B的计算结果。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮"计算"时，对标签Label1、Label2 中显示的 两个值求积，并将结果显示在Label3中。以下不能实现上 述功能的事件过程是(A )。 A) Private Sub Command1_Click() Label3.Caption = Str(Val(Label1. Caption )*Val( Label2.Captio n)) End Sub B) Private Sub Command1_Click() Label3.Caption = HScroll1.Value * HScroll2.Value End Sub C) Private Sub Command1_Click() Label3.Caption = Val(Label1. Caption )*Val( Label2.Captio n) End Sub D) Private Sub Comma nd1_Click() 九年级期末VB 考试试卷 班级：学号：姓名： 123456789101112131415 一、选择题（每题两分，共十五题） 1.下列叙述中正确的是 (c) A. 只有窗体才是VB中的对象 B.只有控件才是VB中的对象 C. 窗体和控件都是VB中的对象 D.窗体和控件不是VB中的对象 2. 下列可以激活属性窗口的操作是(D) A. 用鼠标双击窗体的任何部位 B.执行“工程”菜单中的“工具箱”命令 C. 按 Ctrl+F4 键 D.按F4键 3. 下列不能打开工具箱窗口的操作是(B) A. 执行“视图”菜单中的“工具箱”命令 B.按 Alt+F8键 C. 单击工具栏上的“工具箱”按钮 D.按 Alt+V键，然后按 Alt+X键 4.假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先 应执行的操作是 (A) A. 单击窗体上没有控件的地方 B.单击任一个控件 C. 不执行任何操作 D.双击窗体的标题栏 5. 为了把窗体上的某个控件变为活动的，应执行的操作是(C) A. 单击窗体的边框 B.单击该控件的内部 C. 双击该控件 D.双击窗体 6. 确定一个控件在窗体上的位置的属性是(D) A. Width 或 Height B. Width和 Height C. Top 或 Left D. Top和 Left 7. 确定一个窗体或控件的大小的属性是(B) A. Width 或 Height B. Width和 Height C. Top 或 Left D. Top和 Left 8. 为了同时改变一个活动控件的高度和宽度，正确的操作是( B) A. 拖拉控件 4 个角上的某个小方块 B.只能拖拉位于控件右下角的小方块 C. 只能拖拉位于控件左下角的小方块 D.不能同时改变控件的高度和宽度 vb 练习题及答案 【篇一：vb 习题(含答案)】 lass=txt>1 、vb 程序中，通常不会产生错误提示的是( )。（1 分） a、编译错误 b、逻辑错误 c、运行时错误 d、实时错误 2、在设计阶段，双击窗体上任一空白处，打开的窗口是( )。（1 分） a、工程资源管理器窗口 b、代码窗口 c、工具箱窗口 d、属性窗口 3、下列说法中，正确的说法是( )。（1 分） a、窗体名称和该窗体文件名必须一致 b、窗体名称和该窗体文件名 可以不相同 c、窗体名称和该窗体文件名不能使用汉字 d、窗体名称不能使用汉字、但该窗体文件名能使用汉字 4、visual basic 有完备的help 联机帮助功能，可以通过按下功能 键( )得到帮助。（ 1 分） a、f9 b 、f8 c、f1 d 、f5 5、以下( )控件可作为容器使用。（ 1 分） a、label b 、picturebox c、textbox d 、image 6、将窗体的boderstyle 属性设置为( )可使窗口不显示标题栏。（ 1 分） a、0 b 、1 c、2 d 、5 7、文本框没有( )属性（1 分） a、text b 、name c、caption d 、borderstyle 23、下列( )是不合法的常量。（ 1 分） a、100 b 、10e02 c、100.0 d 、10e0.5 24、下列对变量的定义中，定义x 为变体型变量的是( )。（1 分） a、dim x as double b 、dim x c、dim x! d 、x%=23 25、设有如下变量声明：dim testdate as date ，为变量testdate 正确赋值的表达方式是( )。（1 分） a、textdate=#1/1/2002# b 、testdate=#1/1/2002# c、textdate=date(1/1/2002) d 、 testdate=format(m/d/yy,1/1/2002) 26、在立即窗口中运行以下语句，a=beijing :b=shanghai :print a,b 对其输出结果的描述中，正确的是( )。（1 分） a、beijing 和shanghai 中间没有空格 b、beijing 和shanghai 中 间有1 个空格 c、beijing 和shanghai 中间有 6 个空格 d、beijing 和shanghai 前面有7 个空格 27、语句段a=3: b=5:t=a ：a=b: b=t 执行后( )。（1 分） a、a 值为3，b 值为3 b 、a 值为3，b 值为5 c、a 值为5，b 值为5 d 、a 值为5，b 值为3 28、下列语句中，正确的是( )。（1 分） a、if x3*y and xy then y=x^3 b 、if x3*y and xy then y=3x c、if x3*y : xy then y=x^3 d 、if x3*y and xy then y=x**3 29、下面程序段dim x%: x=5: if x then y=x+1 else y=x 运行后， y 结果是( )。（1 分） a、5 b 、6 c、1 d 、显示出错信息 30、执行语句 a = inputbox(today, tomorrow, yesterday, 5, 5) ， 将显示一个输入对话框，在对话框的输入区中显示的信息是( )。（1 分） a、today b 、tomorrow c、yesterday d 、5 31、窗体上有一个命令按钮command1, 编写如下事件过 程: private sub command1_click() :x = val(inputbox(x=)) : y = inputbox(y=) : print x + y : end sub, 单击命令按钮，先后在两个输 入对话框中输入123 和321 ，窗体显示的内容是( )。（1 分） a、444 b 、123321 c、123+321 d 、出错信息 32、执行语句msgbox aaa, 2, bbb 后，所产生的消息框的标题是 ( )。（1 分） a、aaa b 、bbb 1303班9月16日第一次综合考试试题 一、单选（本大题共25小题，每小题2分，共 50分） 1. 设a=2,b=3,c=4,d=5,表达式NOT a<=c OR 4*c=b^2 AND b<>a+c的值是( )。 A、-1 B、 1 C、True D、 False 2、假设A="Good Morning."，B="Afternoon,Boys."，下列表达式中结果是"Good Boys."的是_ __。 A) Left(A,5)+Right(B,5) B) Right(A,5)+Left(B,5) C) Mid(A,1,5)+Mid(B,1,6) D) Right(A,5)+Right(B,5) 3、下列叙中不正确的是（） A、变量名中的第一个字符必须是字母 B、变量名的长度不超过255个字符 C、变量名可以包含小数点或者嵌的类型声明字符 D、变量名不能使用关键字 4、下列关于变体类型的描述，其中正确的是_______。 A. 变体是一种没有类型的数据 B. 变体的空值就表示该变体的值为0 C. 一个变量没有定义就赋值，该变量即为变体类型 D. 变体是赋给变量某一种类型数据后，就不能再赋给它另一类型的数值 5、执行 PRINT 18/2*3,-3^2 命令后，输出结果为_____。 A. 3 9 B. 3 -9 C. 27 -9 D. -9 27 6、下面的_______语句可以实现：先在窗体上输出大写字母A，然后在同一行的第10列输出小写字母b。 A. Print "A";Tab(9);"b" B. Print "A";Tab(10);"b" C. Print "A";Space(10);"b" D. Print "A";Tab(8);"b" 7、语句Print Format（"HELLO", "<"）的输出结果是______。 A. HELLO B. hello C. He D. he 8、如果X是一个正的实数，将千分位四舍五入，保留两位小数的表达式是 a) 0.01*int(x+0.05) b) 0.01*int(100*(x+0.005)) c) 0.01*int(100*(x+0.05)) d) 0.01*int(x+0.005) 9、变量未赋值时，数值型变量的值为( ) a) 0 b) 空 c) 1 d) 0.1 10、A=5，B=8，则(B-A)*Rnd+A的结果是介于______之间的数。 A. 5～8 B. 0～5 C. 3～5 D. 0～3 11、若x=5,y=6,则表达式x+y=11的值是_____。 a) x+y=11 b) 11 c) True d) False 12、下列过程中对形参的定义正确的是( ) VB考试试题及答案 卷1 一、填空题 1、VB程序设计的主要特点是可视化设计和事 件编程。2、在VB中，最主要的两种对象是窗体 （form）和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB提供的一种特殊子程序，用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作____。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的高度（height）和宽度（width）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用工程1 作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是34.6 。 13、在VB 中，数值型变量的初值为0 ，Varant型变量的初值 为空，布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句cls 。 二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中的*表 示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 2016年计算机二级《VB〉基础练习题及答案（2） 1［简答题］在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框，它们的 高、宽分别为300、2400和1200、2400。窗体的标题为“窗口”。请通过属性窗口设置适 当的属性，满足如下要求： ①Text2可以显示多行文本，并且有垂直和水平两个滚动条； ②程序运行时在Textl中显示输入的字符为“ * ”。 程序运行后的窗体如图所示。 注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl.vbp ，窗体文件名保 存为sjtl.frm 。 参考解析： 【考点分析】本题考点有：窗体的Caption属性，文本框的Name Width、Hei【ght、PasswordChar、Text、MuhiLine、ScrollBars 属性。 【解题思路】文本框控件的MuhiLine属性用于设置文本框是否显示多行文本，值为Tr ue表示是，值为False则表示否。ScrollBars 属性设置文本框是否有水平或垂直滚动条，它有0、I、2和3这4个值，0表示没有滚动条（默认值），1表示只有水平滚动条，2表示只有垂直滚动条，3表示有水平和垂直滚动条。文本框的PasswordChar属性常用于设置用 某字符（如“ *”）屏蔽用户在文本框中键入的内容，常用于口令输入。 【操作步骤】 步骤1:新建一个窗体，按照题目要求建立文本框控件并设置其属性，程序中涉及的控 件及属性见表3.8和表3.9。 步骤2:调试并运行程序，关闭程序后按题目要求存盘。 【易错提示】由于ScrollBars 属性的设置值较多，易混乱，请考生牢记4个值分别设 置的文本框滚动条属性。 2［单选题］在下列模式中，能够给出数据库物理存储结构与物理存取方法的是（ ）。 A.外模式 B.内模式 C.概念模式 D.逻辑模式 参考答案：B 参考解析：数据库系统的三级模式是概念模式、外模式和内模式。概念模式是数据库系 统中全局数据逻辑结构的描述，是全体用户公共数据视图。外模式也称子模式或用户模式， 它是用户的数据视图，给出了每个用户的局部数据描述。内模式又称物理模式，它给出了数据库物理存储结构与物理存取方法，所以选择Bo 3［单选题］以下关系表达式中，其值为True的是（）。 A.If.XYZ ” >” XYz” B.” VisualBasic ” <>” visualbasic ” C.P the-.= ' ' there ? t D.” I nteger ” <” I nt ” 参考答案：B 参考解析：用关系运算符比较两个操作敷时，如果两个操作数是字符型的，按字符的 A SCIl码从左到右---- 比较，即先比较第1个，若相同再比较第2个，依次比较，直到比较完或不同为止。选项A中两个字符串前2个字符相同，后1个不同，“ z''的ASCII值< VB期末考试试题及答案 一、填空题 1、VB程序设计的主要特点是可视化设计和事件 编程。2、在VB中，最主要的两种对象是窗体 （form）和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB提供的一种特殊子程序，用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作____。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的高度（height）和宽度（width）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用工程1 作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是34.6 。 13、在VB 中，数值型变量的初值为0 ，Varant型变量的初值 为空，布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句cls 。 二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中的*表 示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 第一部分 １在窗体上添加一个命令按钮(名称为Cmd1，标题为"输出平均值"）。程序运行后，单击命令按钮完成以下工作： ①随机产生20个０到10０0的整数,将其放入一个一维数组中 ②求出所有元素的平均值，并显示在窗体上（如下图所示) ＰrivaｔｅSub Cmd1_Cｌick（) Ｄim ａ%（１9）, i%,ｓum!, avｅr! Raｎdomizｅ Foｒｉ= 0 Ｔo１9 a(i) =Int(Rｎd * 100１） sum = sum ＋a(i） Nｅxｔi ａver = suｍ/20 Print aveｒ EnｄSub 2 请在名称为Fｏrm1的窗体上添加一个名称为Ｔext１的文本框和一个名称为C1、标题为＂转换＂的命令按钮,如下图所示。在程序运行时，单击＂转换＂按钮,可以把Tｅxｔ1中的小写字母转换为大写，把大写字母转换为小写,其他字符不变。 Prｉvate Sub Ｃ1_Clｉｃｋ() Dim ｃh As String, ch１ As String, i％ cｈ= Text1 Ｆoｒ i = 1 Ｔo Len(ｃｈ） Ｉf Aｓｃ(Mｉd（ｃh，i, 1)) >= ６5 And Aｓｃ(Mid(cｈ, i, 1)) <= 9０Theｎ ｃh１= ch1 + LCａse（Mid(cｈ, i, 1）) Elｓｅ ｃｈ1 ＝ ch1 ＋ UCasｅ（Ｍid(ｃh, i, 1)） Enｄ If Neｘｔ i Text1 = Teｘｔ１＋ vｂCｒＬf Teｘt１＝ Text1 ＋ ch1 End Ｓub 3 在窗体上添加一个命令按钮(名称为MyCｍd1,标题为"输出最大值")。程序运行后,单击命令按钮完成以下工作： ①随机产生3０个0~100０的整数，将其放入一个一维数组中 ②求出其中的最大值，并显示在窗体上。 Prｉvate SuｂMyCmｄ１_Ｃliｃk() Diｍa%(2９)， i%, max% Ｒandomize Fｏr i = 0 To ２9 a(i) ＝Ｉnt(Rｎd ＊ 1００1) Nｅxｔ i ｍａx = ａ(0) Foｒi ＝ 1 To 2９ Iｆ a(i) > max Ｔｈｅn max = a（i) Nｅｘt ｉ Pｒint mａｘ End Sub 4 请设计如下图所示窗体界面。程序运行时，在选中一个或两个复选框和一个单选按钮时，单击命令按钮,则对文本框中的文本内容做相应的设置。请编写适当的事件过程,完成上述功能。 VB综合练习题二 一、选择题[ (1)—(15)，每小题2分，共30分] (1)以下变量名中合法的是 A）x2-1 B）print C）str_n D）2x (2)在Viusal Basic中，表达式3 * 2 \ 5 Mod 3的值是 A）1B）0C）3D）出现错误提示 (3)设窗体文件中有下面的事件过程： Private Sub Command1_Click() Dim s a%=100 Print a End Sub 其中变量a和s的数据类型分别是 A) 整型，整型B) 变体型，变体型 C) 整型，变体型D) 变体型，整型 (4)把数学表达式表示为正确的VB表达式应该是 A) (5x+3) / (2y-6) B) X*5+3 / 2*y-6 C) (5*x+3)÷(2*y-6) D) (x*5+3)/(y*2-6) (5)“x 是小于105的非负数”，用Visual Basic表达式表示正确的是 A) 0<=x<105 B) 0<=x<=105 C) 0<=x And x<105 D) 0<=x Or x<105 (6)代码“Print “Sqr(16) = “；Sqr(16) ”的输出结果是 A) Sqr(16) = Sqr(16) B) Sqr(16) = 4 C) ”4” = 4 D) 4 = Sqr(16) (7)设a = "MicrosoftVisualBasic" ，则以下使变量b的值为“VisualBasic”的语句是 A) b = Left(a, 10) B) b = Mid(a, 10) C) b = Right(a, 10) D) b = Mid(a, 10, 11) (8)在Visual Basic代码中，将多个语句合并写在一行上的并行符是 A) 撇号(') B) 冒号(:) C) 感叹号(!) D) 星号(*) (9)当我们输入代码时，Visual Basic可以自动检测______错误。 A) 语法错误B) 编译错误C) 运行错误D) 逻辑错误 (10)设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是 A) 命令按钮的Click事件过程名是C1_Click B) 窗体的Click事件过程的过程名是Myform_Click C) 命令按钮的Click事件过程的过程名是Command1_Click D) 上述三个过程名都是错误的 (11)以下叙述中正确的是 A）窗体的Name属性指定窗体的名称，用来标识一个窗体 B）窗体的Name属性值是显示在窗体标题栏中的文体 20**-20**学年VB期末考试试题A 一、填空题 1、VB程序设计的主要特点 是（1）和（2）。 2、在VB中，最主要的两种对象是（3）和（4）。 3、工程是构成应用程序文件的（5）。 4、方法是VB提供的一种（6），用来完成一定的操作。 5、浮点类型数据包括单精度型和___（7）__数据。 6、事件是窗体或控件对象识别的___（8）____。 7、可用窗体的___（9）_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的（11）和（12）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的（13）出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用（14）作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是（15）。 13、在VB 中，数值型变量的初值为（16），Varant型变量的初值为（17），布尔型变量的初值为（18）。 14、设置窗体的（19）属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句（20）。 二、选择题 1、菜单控件只包括一个事件，即（1），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是（2）。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示（3）。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是（4）。 A、Enabled B、Caption C、Default D、Font 二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。 A、Caption B、Name C、Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。 A、Caption B、Name C、Text D、Value 7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？ D 。 A、在标题项中输入&，然后打勾 B、在索引项中打 勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示 A 。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2的结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是 D 。 A.Show B.Hide C.Load D.UnLoad 12、以下选项中，不是 Visual Basic控件的是 A 。 A.窗体 B.定时器 C.单选框 D.命令按钮 13、双击窗体中的对象后，Visual Basic将显示的窗口是 A 。 A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口 14、可决定窗体的左上角是否有控制菜单的属性是 A 。 A.ControlBox B.MinButton C.MaxButton D.BorderStyle 15、设有如下语句： Strl＝InputBox（"输人"，""，"练习"） 从键盘上输人字符“示例”后，Strl的值是 D 。 A．“输入” B．“” C．“练习” D．“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。 A. Form1_Click B.Form_Click C. Frm1_Click D. Me_Click 2016年计算机二级《VB》基础练习题及答案(2) 1[简答题]在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框，它们的高、宽分别为300、2400和1200、2400。窗体的标题为“窗口”。请通过属性窗口设置适当的属性，满足如下要求： ①Text2可以显示多行文本，并且有垂直和水平两个滚动条; ②程序运行时在Textl中显示输入的字符为“*”。 程序运行后的窗体如图所示。 注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl.vbp，窗体文件名保存为sjtl.frm。 参考解析： 【考点分析】本题考点有：窗体的Caption属性，文本框的Name、Width、Hei【ght、PasswordChar、Text、MuhiLine、ScrollBars属性。 【解题思路】文本框控件的MuhiLine属性用于设置文本框是否显示多行文本，值为Tr ue表示是，值为False则表示否。ScrollBars属性设置文本框是否有水平或垂直滚动条，它有0、l、2和3这4个值，0表示没有滚动条(默认值)，1表示只有水平滚动条，2表示只有垂直滚动条，3表示有水平和垂直滚动条。文本框的PasswordChar属性常用于设置用某字符(如“*”)屏蔽用户在文本框中键入的内容，常用于口令输入。 【操作步骤】 步骤1：新建一个窗体，按照题目要求建立文本框控件并设置其属性，程序中涉及的控件及属性见表3.8和表3.9。 步骤2：调试并运行程序，关闭程序后按题目要求存盘。 【易错提示】由于ScrollBars属性的设置值较多，易混乱，请考生牢记4个值分别设置的文本框滚动条属性。 2[单选题] 在下列模式中，能够给出数据库物理存储结构与物理存取方法的是( )。 A.外模式 B.内模式 C.概念模式 D.逻辑模式 参考答案：B 参考解析：数据库系统的三级模式是概念模式、外模式和内模式。概念模式是数据库系统中全局数据逻辑结构的描述，是全体用户公共数据视图。外模式也称子模式或用户模式，它是用户的数据视图，给出了每个用户的局部数据描述。内模式又称物理模式，它给出了数据库物理存储结构与物理存取方法，所以选择B。 3[单选题] 以下关系表达式中，其值为True的是( )。 A.1f.XYZ”>”XYz” B.”VisualBasic”<>”visualbasic” C.P the-.=’’there·t D.”Integer”<”Int” 参考答案：B 参考解析：用关系运算符比较两个操作敷时，如果两个操作数是字符型的，按字符的A SCIl码从左到右一一比较，即先比较第1个，若相同再比较第2个，依次比较，直到比较 VB期末考试上机题编程答案 1.新建一个工程，编写一个找出所有四位幸运数显示在列表框中，并将幸运数的个数显示在文本框中。所谓幸运数是指凡前两位数字之和等于后两位数字之和的四位数。将原窗体文件和工程文件分别另存为为f.frm和p.vbp，保存在D盘的VBTest文件夹中。如不按要求保存，造成文件无法上传，后果自负！ 具体要求： 1、程序参考界面如图所示，编程时不得增加或减少界面对象或改变对象的种类，窗体及界面元素大小适中，且均可见； 2、单击"查找"按钮，则开始查找并在列表框中显示结果，并在文本框中显示幸运数的个数； 3、单击“清除”按钮，则将列表框和文本框清空； 4、单击“退出”按钮，结束程序运行； 5、程序中应包含一个过程，用于判断一个数是否是幸运数。 解：Private Sub Command1_Click() Dim i As Integer, a As Integer For i = 1000 To 9999 If k(i) Then List1.AddItem i: a = a + 1 Next i Text1.Text = a End Sub Private Sub Command2_Click() List1.Clear Text1.Text = "" End Sub Private Sub Command3_Click() End End Sub Private Function k(n As Integer) As Integer Dim i As Integer, a As Integer, s1 As Integer, s2 As Integer Dim s As String s = CStr(n) For i = 1 To Len(s) / 2 s1 = s1 + Mid(s, i, 1) s2 = s2 + Mid(s, Len(s) + 1 - i, 1) Next i If s1 = s2 Then k = True End Function 2. 新建一个工程，编写求某一自然数因子和的程序。要求通过文本框获取输入的自然数，计算后将所计算得到的因子和显示在另一文本框中。将原窗体文件和工程文件分别另存为为f.frm和p.vbp，保存在D盘的VBTest文件夹中。如不按要求保存，造成文件无法上传，后果自负！ 具体要求：第二部分 VB练习题与答案
vb综合考试试题
VB程序设计 试题与答案-1
VB练习题含答案
VB期末考试试题
VB复习题及参考答案
初三_vb期末考试试卷+答案
vb练习题及答案.doc
vb综合考试试题
VB考试试题及答案
2016年计算机二级《VB》基础练习题及答案(2)
VB期末考试试题及答案
VB练习题(上机)含标准答案
【精选资料】VB综合练习题二及参考答案
【期末复习】计算机VB期末考试试题及答案
VB期末考试试题及答案
2016年计算机二级《VB》基础练习题及答案(2)
VB期末考试上机题编程答案