( 33 )在窗体中有一个命令按钮 command1 和一个文本框 text1, 编写事件代码如下:
Private sub command1_click()
For i=1 to 4
X=3
For j=1 to 3
For k=1 to 2
X=x+3
Next k
Next j
Next i
Text1.value=str(x)
End sub
打开窗体运行后,单击命令按钮,文本框 text1 输出的结果是
A ) 6
B ) 12
C ) 18
D ) 21
第1题:
在窗体中有一个命令按钮Command1和一个文本框Text1,编写事件代码如下:
Private Sub Command1_Click()
For I=1 To 4
X=3
For j=i To 3
For k=1 To 2
X=x+3
Next k
Next j
Next I
Text].value=Str(x)
End Sub
打开窗体运行后,单击命令按钮,文本框Text1输出的结果是
A.6
B.12
C.18
D.21
第2题:
窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框,事件代码如下: Private Sub Command1_Click Dim a(10)As Integer,b(10)As Integer n=3 For i=1 T0 5 a(i)=i b(n)=2*n+i Next i Me!Text1=a(n)+b(n) End Sub 打开窗体,单击命令按钮,文本框Text1中显示的内容是( )。
A.13
B.14
C.15
D.16
第3题:
在窗体上添加一个命令按钮Command1和一个文本框Text1,并在命令按钮的Click事件过程中编写如下代码: Private Sub Command1_Click() A = 1.2 C = Len(Str$(A) + Space(10)) Text1.Text = C End Sub 程序运行后,单击命令按钮,在文本框中显示()。
A.3
B.8
C.14
D.10
第4题:
在窗体中有一个命令按钮Command1和一个文本框Text1,编写事件代码如下: Private Sub Command1_Click(. For I =1 To 4 x = 3 For j = 1 To 3 For k = 1 To 2 x = x + 3 Next k Next j Next I Text1.value = Str(x. End Sub 打开窗体运行后,单击命令按钮,文本框Text1输出的结果是
A.6
B.12
C.18
D.21
第5题:
( 32 ) 在窗体上添加一个命令按钮 ( 名为 Command1 ) 和一个文本框 ( 名为 Text1 ) , 并在命令按钮中编写
如下事件代码:
Private Sub Command1_Click( )
m=2.17
n=Len(Str$(m)+Space(5))
Me!Text1 =n
End Sub
打开窗体运行后,单击命令按钮,在文本框中显示
A ) 5
B ) 8
C ) 9
D ) 10