单项选择题
在窗体上有一个命令按钮Command1和一个文本框Text1,编写事件代码如下:
Private Sub Command1_Click()
Dim i,j,x
For i=1 To 20 step 2
x=0
For j=i To 20 step 3
x=x+1
Next j
Next i
Text1.Value=Str(x)
End Sub
打开窗体运行后,单击命令按钮,文本框中显示的结果是______。
A.1
B.7
C.17
D.400
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上有一个命令按钮Command1,编写事件代码如下: Private Sub Command1_Click() Dim x As Integer,y As Integer x=12:y=32 Call Proc(x,y) Debug.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.2 32
B.12 3
C.2 2
D.12 32
点击查看答案&解析
单项选择题
如果X是一个正的实数,保留两位小数、将千分位四舍五入的表达式是______。
A.0.01*Int(X+0.05)
B.0.01*Int(100%(X+0.005))
C.0.01*Int(X+0.005)
D.0.01*Int(100%(X+0.05))
点击查看答案&解析
相关试题
在已建窗体中有一命令按钮(名为Command1...
能够实现从指定记录集里检索特定字段值的函...