程序设计语言VB习地的题目集含详解doc.docx

1、程序设计语言VB习地的题目集含详解doc实用标准文案程序设计语言 VB 课程习题集一、单选题1.Visual Basic 是一种面向（ ）的程序设计语言。A.用户B.事件C.程序D.对象2. 在 Visual Basic6.0 中规定工程文件的扩展名是（ ）。A.vbpB.forC.frmD.bas3. Visual Basic6.0 中规定窗体文件的扩展名是（ ）。A.forB.frmC.vbpD.bas4. 如何使一个标签或按钮控件在运行时不可用（ ）。A. 把它的 Visible 属性设置成 False精彩文档实用标准文案B. 把它的 Visible 属性设置成 TrueC. 把它的 E

2、nabled 属性设置成 FalseD. 把它的 Enabled 属性设置成 True5.控件的字体可在属性窗口的（）属性中调整？A.FontB.ColorC.TextD.Caption6. 若要将某命令按钮设置为默认命令按钮。则应设置为 True 的属性是（ ）。A.ValueB.CancelC.DefaultD.Enabled7.在 VB 中，记录对象数据的是（） 。A.方法B.事件C.属性D.语句8.在文本框上显示文本的属性是（） 。A. Value精彩文档实用标准文案B.TextC.PrintD.Enabled9.InputBox 函数返回值的类型为（） 。A.字符串B.数值C.变体D

3、.数值或字符串（视输入的数据而定）10. 设有语句： a = InputBox( 请输入数值 :, 输入示例 , 100) 程序执行后 ,若从键盘上输入数值 20 并按回车键 ,则变量 a 的值是（）。A.字符串 20B.字符串 120C.默认值 100D.数值 12011. 下列控件中可用于接受用户输入文本，又可用于显示文本的是（） 。A. Label 控件B. TextBox 控件C. Timer 控件D. CommandButton 控件12. 语句 PRINT 25*4 的输出结果是（） 。精彩文档实用标准文案A.25*4B.100C.100D.出现错误信息13.只能用来显示字符信息的

4、控件是（） 。A.文本框B.标签框C.图片框D.图像框14.下列可作为 Visual Basic 变量名的是（） 。A.A%AB.4AC.?xyD.Stemp15. 下列哪个符号不能作为 VB 中的变量名（） 。A.timeflyB.pass4C.min4maxD.R816.在窗体内声明的变量是（） 。精彩文档实用标准文案A.局部变量B.模块变量C.公共变量D.任意变量17.语句 Dim x As Integer作用是 :将 x 定义为（）变量。A.单精度型B.整型C.布尔型D.字符型18.在 VB 中 ,用 Boolean 来表示的数据类型是（） 。A.长整型B.字符型C.布尔型D.单精度型

5、19.定义常量需要用到的关键字是（） 。A.ConstB.DimC.PrivateD.Public20. 如果要处理 3.1415 类数据，使用的变量类型应该是（） 。精彩文档实用标准文案A.SingleB.LongC.IntegerD.String21. 表达式 2*32+2*8/2+32 的值为（）。A.27B.31C.35D.4222.数学表达式 X2+3XY 对应的 VB 算术表达式是（） 。A.X*2+3X*YB.X*X+3XYC.X*X+3*X*YD.X*X+3*XY23.在 VB 语言中，求余运算符是（） 。A.B.MODC.*D./24. 判断两个逻辑关系任一满足的逻辑运算是（

6、） 。精彩文档实用标准文案A.OrB.AndC.NotD.Ok25. 表达式 4+5 6 * 7 / 8 Mod 9 的值是（）。A. 4B. 5C. 6D. 726. 选拔身高 T 超过 1.7 米且体重 W 小于 60 公斤的人， 表示该条件的布尔表达式为 （）。A. T=1.7 And W=60B. T=60C. T1.7 And W=1.7 Or Wb and acB. abcC. a bD. a 12228. 设 x=4,y=8,z=7 ，表达式 xz) Or z=10 then a=1 else a=2 执行后， a 的值为（ ）。A.12B.10C.1D.238. 语句 If x

7、=1 Then y=1, 下列说法正确的是（ ）。A. x=1 和 y=1 均为赋值语句B. x=1 和 y=1 均为关系表达式C. x=1 为关系表达式， y=1 为赋值语句D. x=1 为赋值语句， y=1 为关系表达39. 下面程序段中， （）不是把两个数中的大值赋给变量 ax 。A.Max=IIf(xy,x,y)B.If xy Then Max=x Else Max=yC.Max=x ： If y=x Then Max=yD. If y=x Then Max=y Max=x40. 在 Select 判断结构中，下面的表述中不正确的是（） 。精彩文档实用标准文案A. Case 1B. C

8、ase a 5C. Case 3 To 6D. Case is 25 Then y = x 2 + 5x = Int(Rnd) + 4If x 2 25 Then y = x 2x = Int(Rnd) + 5If x 2 = 25 Then y = x 2 - 5Print yEnd Sub程序运行后，单击命令按钮，其输出结果为 _ _。83.阅读下列程序段Private Sub Command3_Click()精彩文档实用标准文案Print pl(3, 6)End SubPublic Function pl(x As Single, n As Integer) As SingleIf n

9、= 0 Thenpl = 1ElseIf n Mod 2 = 1 Thenpl = x * x + nElsepl = x * x - nEnd IfEnd IfEnd Function程序运行后，单击该命令按钮，屏幕上显示的结果是 _。84.阅读下列程序段Private Sub Command2_Click()For i = 1 To 3x = 1For j = 1 To 3x = 3 + j精彩文档实用标准文案For k = 1 To 3x = x + 3Next kNext jNext iPrint xEnd Sub运行程序后，单击命令按钮，输出结果是 。85.阅读下列程序段Private Sub Command1_Click()Dim i As IntegerDim k As Integerk = 0For i = 0 To 10k = k + 1i = i + kNextPrint k; iEnd Sub请问其循环体共执行了 次， i 的值是 。精彩文档