1.下面所列四组数据中，全部是正确的VB常数的是____。2768,1.34D2，"ABCDE"，&O1767
2.函数Len(Str(Val("123.4")))的值为______。6   
3.下面表达式中，_Exp（-3.5） _____的运算结果与其他三个不同。
4.PictureBox、Frame、OptionButton、ListBox、TextBox、Form、ComboBox这7个对象中，具有Caption属性的有_ 3   ______个。
5.以下叙述中错误的是__如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见___。
6.使用_ AddItem    ______方法可将新的列表项添加到一个列表框中。
7.执行下列程序段，输出结果为 _7  0    _________。
Dim a(10) As Integer
Dim i As Integer
For i = 1 To 10
  a(i) = 2 * i - 1
Next i
Print a(4);
Erase a
Print a(4)
8.以下关于动态数组的语句中，正确的是_ReDim a(k+1)：ReDim preserve a(10)______。
9.下列程序段的执行结果为__11 3  ______。
Dim M(10), N(10)
i = 3
For j = 1 To 5
  M(j) = j
  N(i) = 2 * i + j
Next j
Print N(i); M(i)
10.执行下面的程序，输出结果是____18  30_______。
Option Explicit
Private Sub Form_Click()
  Dim M As Integer,N As Integer
  M=1:N=2
  Print M+N+F(M,N)
  M=2:N=1
  Print F(M,N)+F(M,N);
End Sub
Private Function F(X As Integer,Y As Integer)
  X=X+Y
  Y=X+3
  F=X+Y
End Function
11.调用由语句Private Sub Convert(Y As Integer)定义的Sub过程时，以下不是按值传递的是__Convert  X_________。
12.下列说法正确的是_模块级变量可在模块通用声明段中用Private和Dim定义_________
_。
13.以下不属于Visual Basic系统的文件类型是__.Bat ______。
14.在VB中有一行程序代码：Text1.Text="Visual Basic",其中的Text1、Text和"Visual Basic"分别代表__对象、属性、值____。
15.以下叙述中错误的是_在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 _______。
16.VB 中三种文件访问的类型为__顺序、随机、二进制_________。
17.在使用OPEN语句打开文件时，如果省略"for 子句"，则打开的文件存取方式为_随机存取方式__________。
18.向已有数据的C:\文件添加数据，正确的文件打开命令是_Open "C:\" For Append As #511__________。
19.下面程序段的运行结果为__溢出  ______。
Dim s As Integer, i As Integer
i = 1: s = 1
Do
  i = i + s
Loop Until s > 10
Print i, s
20.执行以下语句后，a的值为__溢出  ______。
Dim a As Integer
a = 1
Do
  a = a + 2
Loop Until a = 100
21.下面程序段的运行结果为_1  2  12 288_______。
n = 1
For i = 1 To 4
For j = 1 To i
  n = n * j
Next j
Print n;
Next i
22.若执行定义语句Dim a As Integer，以下给a赋值的语句中，错误的是_a = 2 * 32760 \ 3_____。
23.执行语句：A = Inputbox("Today", "Tomorrow", "Yesterday")
将显示一个输入对话框，在对话框的输入区中显示的信息是_Yesterday _____。
24.在文本框Text1中输入数字12，Text2中输入数字34，执行以下语句，只有_Text3.Text=val(Text1.Text) +val( Text2.Text)_______可使文本框Text3中显示46。
25.下列程序段的执行结果是_False  ______。
X = 2
Y = 1
If X * Y < 1 Then Y = Y - 1 Else Y = -1
Print Y - X > 0
26.关于语句If x=1  Then y=1，下列说法正确的是_x=1为关系表达式，y=1为赋值语句  ______。
27.在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程：
Private Sub Command1_Click()
  N = Text1.Text
  Select Case N
      Case 1 To 20
          X = 10
      Case 2, 4, 6
          X = 20
      Case Is < 10
          X = 30
      Case 10
          X = 40
  End Select
  Text2.Text = X
End Sub
程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是_10  ___。
28.在菜单过程中使用的事件是利用鼠标__单击    ____菜单条来实现的。
29.如果要在两个菜单命令项之间加一条分隔线，可在标题文本框中键入 _-    ______。
30.窗体Form1的名称属性是frm，它的Load事件过程名是  _Form_Load    ______。
31.在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框，一个名
称为File1的文件列表框，两个名称分别为Label1.Label2，标题分别为空白和"共有文件"的标签。编写程序，使得驱动器列表框与目录列表框.目录列表框与文件列表框同步变化，并且在标签Label1中显示当前文件夹中文件的数量。能够正确实现上述功能的程序是: Private Sub Dir1_Change()
File1.Path = Dir1.Path
Label1.Caption = File1.ListCount
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
Label1.Caption = File1.ListCount
End Sub
假定在窗体上建立了通用对话框，其名称为CommonDialog1 ，用下面的语句可以建立一个对话框:
没有caption属性的控件是CommonDialog1.Action = 2
与该语句等价的语句是_CommonDialog1.showsave __________。
32.在代码编辑器中,如果一条语句太长,无法在一行内写下(不包括注释),要折行书写,可以在行末使用续行字符__一个空格加一个下划字符（ _）    ____,表示下一行是当前行的继续。
33.以下关于图片框控件的说法中，错误的是_用Stretch属性可以自动调整图片框中图形的大小______。

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