VB知识练习_vb练习题库

VB知识练习由刀豆文库小编整理，希望给你工作、学习、生活带来方便，猜你可能喜欢“vb练习题库”。

普通高中VB知识练习题

1.有如下VB程序段： x=a(1)For i=2 to 50 If a(i)

2.“如果条件表达式x≥y≥0成立，那么i=i+1”。能实现该功能语句是()A．if x≥y≥0 then i=i+1 B.if x≥y and y≥0 then i=i+1 C.if x>=y or x>=0 then i=i+1 D.if x>=y and y>=0 then i=i+1

3.公民身份证号码是特征组合码，其中第七到第十四位数字为出生日期码。例如：***04X，其中数字19950814表示出生日期码。若想从身份证号码中获取出生日期的信息，字符串变量n中存储了身份证号码信息，下列能正确获取出生日期信息的VB表达式是（）

A．Mid（x，7，1））B．Mid（x，7，8）C．Mid（x，8，7））D．Mid（x，7，17）

4.一个Visual Basic工程的部分设计界面如图所示，下列选项中正确的是（A.窗体的Caption属性值是cool B.当前选中的对象类型是图像Image C.工程文件是cool.vbp D.当前选中对象的名称是Command1

5.有10个数据100、15、28、70、80、12、10、200、6、50依次存放在数组d(1 to 10)中，使用如下程序段找出最小值：

当方框内的语句刚好执行完5次后（此时循环变量i的值为6），变量min的值是（）

A.15 B.12 C.10 D.6

6.字符串变量st的值为“ZheJiangTongXiang”，下列VB表达式的值为“TongXiang”的是()A．Mid(st,9,8)B．Mid(st,9,4)+ “Xiang” C．Mid(st,13,5)D.“Tong” +Mid(st,13,5)

7.某Visual Basic工程的相关视图如图所示：

从图中信息可知，下列说法不正确的是 A．该工程名称为“snow.vbp” B．该窗体名为“Form1”

C．当前看到的事件处理过程名为“Command1_Click” D．该程序中用的了Timer控件对象

8.以下程序段是实现x*y（x、y均为自然数）运算的程序段，则划线处的语句应该是（）

x=Val(Text1.Text)y=Val(Text2.Text)s = 0:j = 1 Do While j

j = j + 1 Loop Text3.Text=Str(f)A．s=s *j B．s=s+x C．s=x*j D．s =s*x

9.如下图所示的流程图，算法执行时，若输入n的值为5，则输出s的值是

A．10 B．13 C．16 D．25

10.在VB中，x=1，y=－1,则表达式x=y的值为 A．1 B．-1 C．True D．False

11.有如下VB程序段：

Private Sub Command1_Click()Dim s As String s =Str(Val(“20”)+ Len(“student”))Label1.Caption = s End Sub 下列说法正确是

A．发生事件的对象名为“Label1” B．这是一个“鼠标单击”事件 C．事件过程名为“Command1” D．此程序段里只有一个对象

12.在VB中，下列函数返回值最大的是

A．Sqr(9)B．Abs(-3.2)C．int(3.2)D．Len(“3.2”)

13.有如下VB程序段： s=1 For i = To 5 s=s*（i+1）Next i 该程序段运行时，要使循环体s=s*（i+1）被执行10次，则循环变量i的初值是()A．－5 B．－4 C．0 D．4

14.在VB中，将窗体标题“Form1”改为“中华美食”需设置的属性是（）A．Name B．Caption C．Font D．Visible

15.下列VB表达式的值最大的是（）

A．10 Mod 5 B．5 Mod 10 C．10 / 5 D．5 / 10 16.运行下面的 Visual Basic程序，单击命令按钮 Command1，出现如下图所示的提示信息：

Private Sub Command1_Click()Dim i As Integer, c As String, s As String, t As String s = “2012 Hero” t = “” For i = 1 To Len(s)c = Mid(s, i, 1)If c >= “a” And c

A．If语句缺少Then B．If语句缺少Else C．变量t的数据类型说明错误 D．变量s的数据类型说明错误

17.到银行办理个人异地汇款（不超过100万元），银行会收取一定的手续费。计算方法是：

其中x表示汇款额，y表示银行收取的手续费，算法流程图如下：

若某人在银行汇款2万元，那么他需另外缴纳的手续费为（）A.1元 B.20 元 C.50元 D.100元

18.某同学编写一个可输出1到100之间所有偶数之和的Visual Basic程序，部分程序如下：

Private Sub Command1_Click()Dim x As Single For I=0 To 100 If ____ Then x=x + I End If Next I Print x End Sub 横线上应填写的正确语句是（）

A.x Mod 2 = 0 B.x Mod 2 0 C.i Mod 2 = 0 D.I Mod 2 0

19.在Visual Basic中，以下可作为合法变量名的是（）

A.Count_2s

B.Text@123 C.Chr

D.2ab 20.有如下Visual Basic程序段： x=3：y=75 Do While x

A．Label1.caption = Str（a+b）B．Text1.text=Len（a）+Val(b)Ｃ.Text1.text= Sqr(a+b)D．Label1.caption = Str（a）+Str（b）22.某同学编写了如下Visual Basic程序段： Dim x , y As Integer x = 2 y = 20 Do While x

A．4 B．3 C．2 D．0 23.下面是一段 Visual Basic 程序： Private Sub Command1_Click()Dim sum As Double，i As Integer sum = 0 For i = 1 To 5 sum=sum+i*i Next i Text1.Text=Str(sum)

End Sub 该程序运行后，语句 sum=sum+i*i 共执行了 次 A．5 B．4 C．55 D．25 24.设X=5678,能得到其百位上数字“6”的正确表达式是（）A．X Mod 100 B．X100 Mod 10 C．X100 Mod 100 D．X10 Mod 10 25.下列Visual Basic表达式的值为True的是（）A．1=2 B．“78”〉“79” C．Len(“78”)＝Len(“中国”)D．Mid(“abcdef”, 2, 3)= “abc” 26.某Visual Basic程序如下： Private Sub Command1_Click()Dim s As String, i As Integer s = “” For i = 1 To 10 Step 2 s = Str(i)+ s Next i Text1.Text = s End Sub 运行程序，单击命令按钮Command1后，在文本框Text1中显示的内容为（）A．13579 B．1 3 5 7 9 C．9 7 5 3 1 D．97531 27.某VB程序在调试中弹出如图所示的错误窗口，产生该错误的可能原因是（）

A．该VB程序代码中，缺少Next B．该VB程序窗体界面中，缺少某控件

C．该VB程序代码中，某个常量或变量没有声明 D．该VB程序设计软件没有正确安装 28.在Visual Basic中，语句Command1.Font=“隶体”中的“Command1”是（）A.对象名 B.属性名 C.属性值 D.窗体名 29.程序运行后，单击Command1命令按钮，变量x的值为（）Private Sub Command1_Click()n = 6 x = 1 For i = 1 To n x = x * i Next i End Sub A.15 B.24 C.120 D.720 30.计算表达式Val(“10”)+ Len(“2AB”)的值是（）

A.12 B.13 C.102 D.102AB