单选题命令按钮Command1的事件过程如下：
Private Sub Command1_Click()
Dim art(5, 5)As Integer
Dim i As Integer, j As Integer
For i=1 To 4
For j=2 To 4
arr(i, j)=i+j
Next j
Next i
Print arr(1, 3)+arr(3, 4)
End Sub
执行上述过程，输出结果是
单选题在窗体上有一个文本框Text1，Text属性值为空，然后编写如下事件过程：Private Sub Text1_Keyaress(KeyAscii As Integer)Dim str As String，n As Integerstr=UCase(Chr(KeyAscii))n=Len(str)Text1．Text=String(n，str)End Sub程序运行后，如果在文本框中输入字母“p”，则在文本框中显示的内容为( )。
单选题设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click()
Dim a(30)As Integer
For i=1 To 30
a(i)=Int(Rnd*100)
Next
For Each arrItem In a
If arrItem Mod 7=0 Then Print arrItem;
If arrItem＞90 Then Exit For
Next
End Sub
对于该事件过程，以下叙述中错误的是______。
单选题在窗体上画一个名称为Filel的文件列表框，并编写如下程序： Private Sub Filel_DblClick() x=Shell(Filel. FileName, 1) End Sub 以下关于该程序的叙述中，错误的是______。
单选题在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command1_Click() x=0 Do While x<50 x=(x+2)*(x+3)：n=n+1 Loop Text1．Text=Str(n)：Text2．Text=Str(x) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别为
单选题窗体上有单选钮和列表框控件。单击名称为Option1、标题为“国家”的单选钮，向列表框中添加国家名称，如下图所示。Option1的单击事件过程如下：PrivateSubOption1_Click() Dimarr arr=Array("中国","日本","德国","美国","澳大利亚") List1.Clear Fori=0ToUbound(arr) List1.AddItemarr(i) NextEndSub以下关于上述代码的叙述中，正确的是______。A.程序有错，没有声明数组的维数及上下界B.只有一维数组才能使用Array为数组赋初值C.For循环的终值应为ListCount-1D.For循环的初值应为1
单选题单出命令按钮执行以下程序，输出结果为( )。 Private Sub Command1_Click() Dim x As Integer,y As Integer x=12:y=32 Call Proc(x,y) Print x;y End Sub Public Sub Proc(n As Integer,ByVal m As Integer) n=n Mod 10 m=m Mod 10 End Sub
单选题VB中有3个键盘事件：KeyPress、KeyDown、KeyUp，若光标在Text1文本框中，则每输入一个字母( )。
单选题在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() X=0 Do Until x=-1 a=InputBox("请输入A的值") a=Val(A) b=InputBox("请输入B的值") b=Val(B) x=InputBox("请输入x的值") x=Val(x) a=a+b+x Loop Print a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为 ______。
单选题两个或两个以上的模块之间关联的紧密程度称为( )。
单选题用树形结构表示实体之间联系的模型是
单选题在利用菜单编辑器设计菜单时，为了把组合键＜Alt+O＞设置为“打开(O)”菜单项的访问键，可以将该菜单项的标题设置为( )。
单选题目录列表框的Path属性的作用是( )。
单选题结构化程序设计的基本原则不包括( )。
单选题有如下程序： Private Sub Form_Click() Dim
S As Integer,p As Integer p=l For i-1 To
4 Forj=l To i s=s+j
Nextj p=p*s Next i
Printp End Sub 程序运行后，单击窗体，则输出结果是______。
A.在类型定义"Type RType"之前加上"Private"
B.Dim p As RType必须置于窗体模块的声明部分
C.应把Open语句中的For Random改为For Output
D.Put语句应该写为Put%1，p.Name，p.Tel
单选题当一个工程含有多个窗体时，其中的启动窗体是 ______。
A. 启动Visual Basic时建立的窗体
B. 第一个添加的窗体
C. 最后一个添加的窗体
D. 在“工程属性”对话框中指定的窗体
单选题设工程文件包含两个窗体文件Form1. frm、Form2. frm及一个标准模块文件Module1. bas。两个窗体上分别只有一个名称为Command1的命令按钮。 Form1的代码如下： Public x As Integer Private Sub Form_Load( ) x=1 y=5 End Sub Private Sub Command1_Click( ) Form2. Show End Sub Private Sub Command1_Cliek( ) Print Form1. x, y End Sub Module1的代码如下： Public y As Integer 运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是( )。 A) 1 5 B) 0 5 C) 0 0 D) 程序有错
单选题以下叙述中正确的是( )。
单选题为了改变一个活动控件的高度，正确的操作是
单选题以下能对正实数d的第3位小数四舍五入的表达式是( )。