单项选择题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim m(10)As Integer
Dim b(3)As Integer
s = 0
For i=1 To 10
m(i)=i
Next i
For i=1 To 3
b(i)=m(i * i)
Next i
For i=1 To 3
s = s + b(i)*3
Next i
Print s
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是
A.78
B.10
C.33
D.42
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
阅读下面的程序: Private Sub Form_Click() Dim m,n As Integer m=InputBox( 请输入M的值 ) m=Val(m) m1=m n=InputBox( 请输入N的值 ) n=Val(n) n1=n Do While n<>0 remin=m Mod n m=n n=remin Loop Print m1,n1,m End Sub 程序运行后,单击窗体,在对话框中分别输入16和24,则程序在窗体上的输出结果为
A.16 24 4
B.16 24 8
C.24 16 6
D.24 16 8
点击查看答案&解析
单项选择题
下列语句正确的是
A.If x≠y Then Print "x不等于y"
B.If x<>y Then Print "x不等于y"
C.If x><y Then Print "x不等于y"
D.If x<>y Print "x不等于y"
点击查看答案&解析
相关试题
编写如下事件过程: Option Explicit Pr...
阅读如下程序: Option Base 1 Privat...
在窗体中添加一个命令按钮和一个文本框,并...
编写如下事件过程: Option Base 1 Pr...
在窗体上画一个文本框Text1、一个标签Labe...