Private Sub Commandl—Click()
D.im M(10)As Integer
F.or k=1 TO 10
M(k)=12一k
Next k
x=8
PrintM(2+M(x))
E.nd Sub
运行程序,单击命令按钮,在窗体上显示的是
A.6
B.5
C.7
D.8
[单选题]在窗体上画一个命令按钮,名称为Commandl。然后编写如下程序: Private Sub Command1_Ctick() For I=1 TO 2 For J=1 TO I Print String(I,"Hello"); Next J Print Next I End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是A. H HH HHB. H HHHHC. HHHHHD.H HH HHHH
[单选题]在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:Private Sub Commandl_Click()D.imi As Integer,j As IntegerD.ima(10,10)As IntegerF.ori=1 To 3F.orj=1 To 3a(i,j)=(i-1)*3+jPrinta(i,j);NextjPrintNextiE.nd SubA.B.C.D.
[单选题]在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim i As Integer,j As Integer Dim a(10, 10)As Integer For i=1 To 3 For i=1 To 3 a(i,j)=(i-1) *3+j Print a(i,j); Next i Print Next i End Sub 程序运行后,单击命令按钮,窗体上显示的是A.1 2 3 246 3 69B.2 3 4 3 4
[单选题]在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:Private Sub Command1_Click()Static x As IntegerStati cy As Integery=1y=y+5x=x+5Printx;yEnd Sub程序运行时,三次单击命令按钮Commandl后,窗体上显示的结果为()A . 1516B . 156C . 1515D . 56
[单选题]在窗体上画一个命令按钮,名称为Commandl,然后编写下列程序Private Sub Commandl_Click()For i = 1 To 2For j = 1 To iPrint String(i,"Hello")Next jPrintNext iEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是A. H HH HH B. H HHHH C. HHHHH HH HHHH D. H
[单选题]在窗体上画一个名称为Commandl的命令按钮,并编写以下程序: Private Sub Commandl_Click Dim n%,b,t T=1:b=1:n=2 DO B=b*n:t=t+b:n=n+1 Loop Until n>9 Ptint t End Sub 此程序计算并输出一个表达式的值,该表达式是。 A.9! B.10! C.1! +2! +…+9! D.1!+2!+…+10!
[单选题]在窗体上画一个命令按钮Commandl,然后编写下列代码: Private Sub Commandl_Click() Dim Arrl(10)As Integer,Arr2(10)As Integer n=3 For i=1 To 5 Arrl(i)=i Arr2(n)=2*n+1 Next i Print Arr2(n);Arrl(n) End Sub 运行程序后,单击命令按钮,输出结果是A.11 3 B.3 11 C.13 3 D.3 13
[单选题]在窗体上一个名为Commandl的命令按钮,然后编写以下程序:Private Sub Commandl一Click()D.im a(10)As IntegerF.or k=10 To 1 Step-1a(k)=20—2*kNext kk=k+7Print a(k—a(k))运行程序.单击命令按钮,输出结果是A.1 8B.12C.BD.6
[单选题]在窗体上画一个命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As integer b = 1 For a = 1 To 100 If b >= 10 Then Exit For If b Mod 3 = 1 Then b = b + 3 End If Next a Print a End Sub 在命令按钮上单击后,窗体上显示的结果是 ______。A.101B.6C.5D.4
[单选题]在窗体上画一个命令按钮,然后编写如下程序: Private Sub Commandl_Click( ) Dim a AS Integer,b As Integer a=15 b=2 t N(a,B)End Sub Function N(x As Integer,y As Integer) As Integer N=IIf(x)y,x,y) End Function 程序运行后,单击命令按钮,输出结果为A.1B.2C.15D.8