一、选择题
4、下列可作为VB变量名的是（B ）。
A．c*Del B．Alpha C．4a D．print
首为字母，且不能含有符号，不能含有关键字及标记符
5、用于字符串连接的运算符是（D ）。
A．& B．+ C．And D．A、B都可以+ ；连接两个字符串，或是将数值字符串变为数值与数值进行运算。
&；链接两个字符串，如果为数值型，则将其转为字符串在链接，若其前为变量，则需要加空格。
6、表达式33 MOD 17\3*2的值是（B）。
A．10 B．1 C．2 D．3
乘方》负号》乘除》整除\ 》求余mod 》加减
9、以下属于VB合法的数组元素是（D ）。
A．x8 B．x[8] C．x(0) D．x{6}
10、用Dim A (-3 To 3) As Integer语句定义的数组的元素个数是（D）。
A．4 B．5 C．6 D．7
11、执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是（A ）。
A．Visual B．Basic C．6 D．11
12、设a=10，b=5，c=1，执行语句Print a>b>c后，窗体上显示的是（  B ）。
A．True B．False C．1 D．出错信息
15、命令钮标题热字的下划线，可通过（  B ）符号来设置。
A．＼＜B．& C．_ D．\＞
18、命令按钮不支持（D ）事件。
A．Keyup B．Keypress C．Click D．Dblclick
22、假定窗体上有一个标签，名为Labell，为了使该标签透明并且没有边框，则正确的属性设置为（A ）。
A．Label1.BackStyle=0 B．Label1.BackStyle=1
Label1.Borderstyle=0 Label1.Borderstyle=1
C．Label1.BackStyle=True D．Label1.BackStyle=False
Label1.BorderStyle=True Label1.Borderstyle=False
23、以下能在窗体Form1的标题栏中显示“VisualBasic窗体"的语句是（C ）。
A．Form1.Name="VisualBasic窗体" B．Form1.Title="VisualBasic窗体"
C．Form1.Caption="VisualBasic窗体" D．Form1.Text="VisualBasic 窗体"
24、在窗体上有若干控件，其中有一个名称为Text1的文本框。影响Text1的Tab 顺序的属性是（  D ）。
A．TabStop B．Enabled C．Visible D．TabIndex
25、在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程
Private Sub TxtA_KeyPress(keyascii as integer)
……
End Sub
若焦点位于文本框中，则能够触发KeyPress事件的操作是（D）。
A．单击鼠标B．双击文本框C．鼠标滑过文本框D．按下键盘上的某个键
26、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（B ）。
A．工程资源管理器窗口B．代码窗口
C．工具箱窗口D．属性窗口
27、为了把焦点移到某个指定的控件，所使用的方法是（A）。
A． SetFocus B．Visible C．Refresh D．GetFocus
28、若要获得滚动条的当前值，可通过访问其（）属性来实现。
A．Text B．V alue C．Max D．Min
29、当复选框被选中时，其value属性的值是（）。
A．0 B．1 C．2 D．3
30、假定建立了一个名为ComDialog1的通用对话框，与ComDialog1.ShowOpen 方法等效的语句是（）。
A．ComDialog1.Action=1 B．ComDialog1.Action=2
C．ComDialog1.Action=3 D．ComDialog1.Action=4
31、执行如下语句：
a = InputBox("Today", "Tomorrow", "Yesterday", , , "Day before yesterday", 5)
将显示一个输入对话框，在对话框的输入区中显示的信息是（）。
A．Today B．Tomorrow C．Y esterday D．Day before yesterday
32、以下能够触发文本框Change事件的操作是（）。
A．文本框失去焦点B．文本框获得焦点
C．设置文本框的焦点D．改变文本框的内容
33、将文本框设置为多行状态，可通过（）属性来实现。
A．MultiLine B．Length C．Max D．MaxLength
34、在三种不同风格的组合框中，用户不能输入数据的组合框是（）。
A．下拉式组合框B．简单组合框C．下拉式列表框D．列表框
35、复选框或单选框的当前状态可通过（）属性来设置或访问。
A．V alue B．Checked C．Selected D．Caption
vb编程基础知识题库36、设置一个单选按钮（OptionButton）所代表选项的选中状态，应当在属性窗口中改变的属性是（）。
A．Caption B．Name C．Text D．Value
37、设组合框Combo1中有3个项目，则能删除最后一项的语句是（）。
A．Combo1.RemoveItem Text B．Combo1.RemoveItem 2
C．Combo1.RemoveItem 3
D．Combo1.RemoveItem Combo1.Listcount
38、确定一个控件在窗体上的位置的属性是（）。
A．Width和Height B．Width或Height
C．Top和Left D．Top或Left
39、在程序运行过程中，要想使按钮变成看得见但不可操作，则应置成False的属性是（）。
A．V alue B．Enabled C．Visible D．Cancel
40、若要使命令按钮失效，可设置（）属性为False来实现。
A．V alue B．Enabled C．Visible D．Cancel
41、设在菜单编辑器中定义了一个菜单项，名为Menu1。为了在运行时隐藏该菜单项，应使用的语句是（）。
A．Menu1.Enabled=True B．Menu1.Enabled=False
C．Menu1.Visible=True D．Menu1.Visible=False
42、在用菜单编辑器设计菜单时，必须输入的项是（）。
A．快捷键B．标题C．名称D．索引
43、滚动条分为（）。
A．水平滚动条和垂直滚动条B．横向滚动条和纵向滚动条
C．水平滚动条和纵向滚动条D．横向滚动条和垂直滚动条
44、当在滚动条内拖动滚动块时，触发（）事件。
A．Keyup B．Keypress C．Scroll D．Change
45、设窗体上有一个列表框控件List1，且其中含有若干列表项。则以下能表示当前被选中的列表项内容的是（）。
A．List1.List B．List1.ListIndex C．List1.Index D．List1. Text 46、Next循环语句中，如果省略Step子句，则循环的步长为（）。
A．-1 B．1 C．0 D．10
47、以下程序段可实现A、B变量值互换的是（）。
A．A=B：B=A  B．A=A+B：B=A-B：A=A-B
C．A=C：C=B：B=A D．A=(A+B)/2：B=(A-B)/2
48、VB的标准对话框中不含下列哪个选项（）。
A．打开对话框B．另存为对话框C．显示对话框D．颜对话框
49、若要获知当前列表项的数目，可通过访问（）属性来实现。
A．List B．ListIndex C．ListCount D．Text
50、若要在菜单中添加一个分隔线，则应将其Caption属性设置为（）。
A．- B．* C．& D．=
51、若要设置定时器控件的定时时间，可通过（）属性来设置。
A．Interval B．V alue C．Enabled D．Text
52、在运行时，若要获得用户在文本框中所选择的文本，可通过访问（）属性来实现。
A．SelStart B．SelLength C．Text D．SelText
53、程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是（）。
A．MouseDown B．MouseUp C．Load D．Click
54、下列程序段的执行结果是（）。
x=5
y=-20
If not x>0 Then x=y-3 Else y=x+3
Print x-y;y-x
A．-3    3 B．5 -8 C．3 -3 D．25 -25
55、下列程序段的执行结果是（）。
a=0
For i=1 to 10
If i mod 3 =0 Then a=a+i
Next i
A．18 B．55 C．37 D．10
56、在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click()
a = 12345
Print Format$(a, "000.00")
End Sub
程序运行后，单击命令按钮，窗体上显示的是（）。
A．123.45 B．12345.00 C．12345 D．00123.45
57、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
x = 0
n = InputBox("")
For i = 1 To n
For j = 1 To i
x = x + 1
Next j
Next i

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。