[单项选择]设有命令按钮 Command1 的单击事件过程，代码如下： Private Sub Command1_Click（　） Dim a(3,3) As Integer For i=1 To 3 For j=1 To 3 a(i,j)=i*j+i Next j Next i Sum=0 For i=1 To 3 Sum=Sum+a(i,4-i) Next i Print Sum End Sub 运行程序，单击命令按钮，输出结果是______。
A. 20
B. 7
C. 16
D. 17

更多"设有命令按钮 Command1 的单击事件过程，代码如下： Priv"的相关试题:

查看答案

[单项选择]在窗体上画一个命令按钮，名称为Command1。 Private Sub Command1 Click（　） Dim x As Integer，y As Integer x=10:y:0 Do x=x+2:y=y+x Print "x=", x; "y=",y If y＞20 Then Exit Do Loop Until x=18 End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是 ______。
A. x=12y=12 x = 14 y = 16 x=16 y=18
B. x=12 y=12 x= 16 y =28 x= 18 y=24
C. x=12 y=12 x= 14 y=44
D. x= 12 y=12 x= 14 y=26

查看答案

[单项选择]单击命令按钮，下列事件过程的执行结果为　　 Private Sub Command1_Click( )　　　　Dim x As Integer, y As Integer　　　　x=40：y=72　　　　Call PtoP(x, y)　　　　Print x; y　　 End Sub　　 Public Sub PtoP(Byval n AS Integer, ByVal m Aa Integer)　　　　n = n / 10+2　　　　m = m / 10+2　　 End Sub
A. 0 8
B. 40 72
C. 4 50
D. 78 50

查看答案

[单项选择]单击命令按钮时，下列的执行结果为　　Private Sub Command1_Click（　）　　　　Dim x As Integer，y As Integer　　　　x=86：y=29　　　　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
A. 12 32
B. 6 29
C. 2 3
D. 12 3

查看答案

[单项选择]单击命令按钮时，下列程序的执行结果为　　Private Sub Command1 Click（　）　　　　Dim x As Integer，y As Integer 　　　　x=12：y=32 　　　　Call PCS(x，y) 　　　　Print x；y 　　End Sub 　　Public Sub PCS(ByVal n As Integer，ByVal m As Integer) 　　　　n=n Mod 10 　　　　m=m Mod 10 　　End Sub
A. 1232
B. 232
C. 23
D. 123

查看答案

[单项选择]单击窗体上Command1命令按钮时，执行如下事件过程： Private Sub Command1-Click（　） a$="software and hardware" b$=Right(a$，8) c$=Mid(a$，1，8) Msgbox a $,,b$；c$,1 End sub 则在弹出的信息框的标题栏中显示的信息是( )。
A. software and hardware
B. software
C. hardware
D. 1

查看答案

[单项选择]单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click（　）　　BT 4 End Sub Private Sub BT(x As Integer) 　　x=x*2+1 　　If x＜6 Then 　　　　Call BT(x) 　　End If 　　x=x*2 　　Print x； End Sub
A. 15
B. 16
C. 17
D. 18

查看答案

[单项选择]单击命令按钮时，下列程序的执行结果为（）。　　Private Sub Command1 Click（　）　　　　Dim x As Integer，y As Integer 　　　　x=12：y=32 　　　　Call PCS(x，y) 　　　　Print x；y 　　End Sub 　　Public Sub PCS(ByVal n As Integer，ByVal m As Integer) 　　　　n=n Mod 10 　　　　m=m Mod 10 　　End Sub
A. 1232
B. 232
C. 23
D. 123

查看答案

[单项选择]单击命令按钮时，下列程序的执行结果为 Private Sub Command1_click（　） Dim X As Integer，Y As Integer 　　x=12:y=32 　　Call PCS(x,y) 　　Print x；y End Sub Public Sub PCS(ByVal n As Integer，ByVal m As Integer) 　　n=n Mod 10 　　m=m Mod 10 End Sub
A. 12 32
B. 2 32
C. 2 3
D. 12 3

查看答案

[单项选择]单击命令按钮时，下列的执行结果为( )。　　Private Sub Command1_Click（　）　　　　Dim x As Integer，y As Integer 　　　　x=86：y=29 　　　　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
A. PictureBox和Data
B. Frame和Image
C. PictureBox和Frame
D. Image和Data

查看答案

我来回答:

提交