单选题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer, y As Integer x = 6: y = 7 Do y = y - x Debug. Print y; x=x+1 Loop While x＜= 0 Print y; x End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
单选题下列事件的事件过程中，参数是输入字符ASCII码的是( )。
单选题在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer，n As Integer For i=0 To 50 i=i+3：n=n+1 Ifi>10 Then Exit For Next Text1．Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是
单选题决定控件上文字的字体、字形、大小、效果的属性是______。
A. Text
B. Caption
C. Name
D. Font
单选题执行了下面的程序后，组合框中数据项的值是( )。 PrivateSubForm_Click() Fori=1 To 6 Comb01.Addltem i Nexti Fori=1 To 3 Combol．Removeltem i Nexti End Sub
单选题执行语句Open "Tel.dat" For Random As# 1 Len=50后，对文件Tel.dat中的数据能够执行的操作是 ______。 A) 只能写，不能读 B) 只能读，不能写 C) 既可以读，也可以写 D) 不能读，不能写
单选题编写如下事件过程。 Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序，若按T键，则程序输出的结果是( )。 A) T T B) t T C) T C D) t t
单选题在窗体上画一个名称为Command1的命令按钮。有下列程序： Option Base 1 Private Sub Command1_Click( ) Dim a a=Array(45，27，34，24，91，37，11，67，82，63) For i=1 To 9 For j=i+1 To 10 If a(i)＞a(j)Then a1=a(i) a(i)=a(j) a(j)=a1 End If Next j Next i For i=1 To 10 Print a(i) Next i End Sub 程序运行后，单击命令按钮，则窗体上第二行和第三行显示的内容是______。
单选题在菜单编辑器中建立一个名称为Menu0的菜单项，将其“可见”属性设置为False，并建立其若干子菜单，然后编写如下过程： Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Button=1 Then PopupMenu Menu0 End If End Sub 则以下叙述中错误的是( ) A．该过程的作用是弹出一个菜单 B．单击鼠标右键时弹出菜单 C．Menu0是在菜单编辑器中定义的弹出菜单的名称 D．参数X、Y指明鼠标当前位置的坐标
单选题Int(20*Rnd)产生的随机整数的区间是______。
单选题使用语句Dim A(I To 10)As Integer声明数组A后，以下叙述正确的是( )。
单选题在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为 Drive1、Dir1和File1。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹中的内容，则在Dir1_Change事件过程中应使用的语句是：_______。
单选题设在窗体上有一个名称为Check1的复选框数组，并有以下事件过程：
Private Sub Check1_Click(Index As Integer)
…
End Sub
单选题下面的程序运行结果是
____
。
Private Sub Form_Click()
i=0
Do
i=i+1
if i＞10 then Exit Do
Loop Until i＜10
Print i
End Sub
单选题编写如下程序： Private Sub Commandl_Click() Dim a(3，3)As Integer，s As Integer For i=1 To 3 For i=1 To 3 a(i，j)=i*j+i Next i Next i s=0 For i=1 To 3 s=s+a(i，4一i) Next i Print SEnd Sub 程序运行后，单击命令按钮Command1，输出结果为
单选题对于通用对话框控件，下列说法中错误的是( )。
单选题VisualBasic集成环境的"工程"菜单（部分）如图所示。为了编写全局变量和通用过程，要为当前工程创建一个新的.bas文件，为此，应在菜单中选择的是
单选题应用程序窗体的名称属性为Frm1，窗体上有一个命令按钮，其名称属性为Cmd1，用户单击窗体和单击该命令按钮所使用的事件过程名分别是：______。
单选题下列叙述中，正确的是______ 。 A) 实体集之间一对一的联系实际上就是一一对应的关系 B) 关系模型只能处理实体集之间一对一的联系 C) 关系模型属于格式化模型 D) 以上3种说法都不对
单选题为了把一个记录型变量的内容写入文件中指定的位置，所使用的语句的格式为 ______。
A. Get文件号，记录号，变量名
B. Get文件号，变量名，记录号
C. Put文件号，变量名，记录号
D. Put文件号，记录号，变量名