单选题阅读下面的程序: Private Sub Command1_Click( ) For i=1 To 3 For j=1 To i For k=j To 3 x=x+1 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,窗体上输出结果是______。
单选题下列程序段,在运行时最后输出的内容是 a=2 c=1 AAA: c=c + a If c<10 Then Print c GoTo AAA Else Print "10以内的奇数显示完毕" End IfA) 3B) 7C) 9D) 10以内的奇数显示完毕
单选题设有以下函数过程: Function fun(a As Integer,b As Integer) Dim C As Integer Ifa
单选题下列关于Sub Main过程的描述中,错误的是______。
单选题运行下面的程序后,输出的结果为 Cls Dim t(5, 5) as Integer For i=1 To 5: t(i,i) =1: Next For i = 1 To 5 For j = 1 To 5 Print t(i, j), Next Print Next
单选题默认情况下,下面声明的数组的元素个数是______。
Dim(5,-2 To 2)
单选题在显示菜单时,菜单项的下列哪个属性为True时将用浅灰色显示该菜单项标题
单选题设有如下程序: Private Sub Form_ Click() Dim a Dim i As Integer, j As Integer a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9) For i = 0 To 3 Print a(5 - i) Next End Sub程序运行后,单击窗体,则在窗体上显示的是______ 。。
单选题窗体上有一个名称为Command1的命令按钮,并有如下程序代码: Option Base 1 Private Sub Commandl_Click() Dim a%(3,3) For i=1 To 3 Forj=1 To 3 Ifi>4 Andj>1 Then a(i,j)=a(a(i—1,j-1),a(i,j-1))+1 Else a(i,j)=i*j End If Next Next Print a(2,2);a(3,3)End Sub 运行程序,单击命令按钮,窗体上显示的是
单选题以下控件中不是标准控件的是 ( )
单选题在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim I, Num
Randomize
Do
For I=1 To 1000
Num=Int(Rnd*100)
Print Num;
Select Case Num
Case 12
Exit For
Case 58
Exit Do
Case 65, 68, 92
End
End Select
Next I
Loop
End Sub
上述事件过程执行后,下列描述中正确的是______。
单选题若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是( ) A.用鼠标右键单击此按钮 B.按键盘上的Esc键 C.按键盘上的Enter键 D.用鼠标右键双击此按钮
单选题假定窗体的名称(Name属性)为Form1,则把窗体的标题设置为“等级考试”的语句为______。
A. Form1="等级考试"
B. Caption="等级考试"
C. Form1.Text="等级考试"
D. Form1.Name="等级考试"
单选题在命令窗口中,可用DO命令运行菜单程序的扩展名为( )
A..FMT B..MPR C..MNX D..FRM
单选题单精度浮点数的正值取值范围为______。
单选题在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base1 Private Sub Command1_Click() d=0:c=10:x=Array(10,12,21,32,24) For i=l To 5 Ifx(i)>c Then d=d+x(i):c=x(i) Else d=d-c End If Next i Print d End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为
单选题设窗体上有一个Conunand1命令按钮,还有以下程序代码:Private Sub Command1_Click()Static x As Integerx=x+1Call proc(x)Print x,End SubPrivate Sub proc(a As Integer)Static xA s Integerx=x+aa=xEnd Sub程序运行后,3次单击命令按钮,则产生的输出是
单选题在窗体上画一个命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click( ) Dim Arr1(12)As Integer,Arr2(3)As Integer Dim Smm As Integer Sum=2 For i=1 To 12 Arr1(i)=i Next i For i=1 To 3 Arr2(i)=Arr1(i*i) Next i For i=1 To 3 Sum=Sum+Arr2(i) Next i Print Sum End Sub 程序运行后,单击命令按钮,在窗体上的输出结果是______。 A) 16 B) 24 C) 32 D) 36
单选题在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Labell和 Command1,然后编写如下两个事件过程:
Private Sub Command1_Click()
strText=InputBox("请输入")
Text1.Text=strText
End Sub
Private Sub Text1_Change()
Labell.Caption=Right(Trim(Text1.Text),3)
End Sub
程序运行后,单击命令按钮,如果在输入对话框中输入Visual,则在标签中显示的内容是
单选题在Visual Basic中,要将一个窗体加载到内存进行预处理但不显示所使用的语句是