网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

窗体有命令按钮Commandl和文本框Text1,对应的事件代码如下:

For i=1T04X==3

For i=1t03

For k=1T02

x=x+3

Next k

Next j

Next i

Text1.Value=Str(x)

End Sub

运行以上事件过程,文本框中的输出是( )。

A.6

B.12

C.18

D.21


参考答案

更多 “ 窗体有命令按钮Commandl和文本框Text1,对应的事件代码如下:For i=1T04X==3For i=1t03For k=1T02x=x+3Next kNext jNext iText1.Value=Str(x)End Sub运行以上事件过程,文本框中的输出是( )。A.6B.12C.18D.21 ” 相关考题
考题 ( 10 )在窗体上有一个命令按钮 Commandl ,编写事件代码如下:Private Sub Command1_Click()Dim a(10), p(3) As Integerk = 5For i = 1 To 10a(i) = i * iNext iFor i = 1 To 3p(i) = a(i * i)Next iFor i = 1 To 3k = k + p(i) *2Next iMsgBox kEnd Sub打开窗体运行后,单击命令按钮,消息框中输出的结果是 【 10 】 。

考题 在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮,然后编写如下事件过程:Private Commandl_Click()Dim i As Integer, n As IntegerFor i=0 To 50i = i+3n = n+1If i10Then Exit ForNextTextl.Text=Str(n)End Sub程序运行后,单击命命令按钮,在文本框中显示的值是( )。 A.5B.4C.3D.2

考题 设有如下通用过程: Public Sub Fun(a()As Integer,x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮。然后编写如下的事件过程: Private Sub Commandl_Click() Dim arr(5)As Integer,n As Integer For i=1 To 5 arr(i)=i+i Next Fun arr,n Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是______。A. 30B.25C.20D.15

考题 在窗体上添加一个命令按钮(名为Commandl) 和一个文本框(名为Text1) ,并在命令按钮中编写如下事件代码: Private Sub Commandl_click() m=2.17 n=Len(Str$(m) +Space(5) ) Me!Text1=n End Sub 打开窗体运行后,单击命令按钮,在文本框中显示( )。A.5B.8C.9D.10

考题 在窗体上有一个命令按钮Commandl,编写事件代码如下:Private SuB commandl_Click()Dim a(10),p(3)As Integerk=5For i=1 To 10a(i)=i+iNext iFor i=1 To 3P(i)=a(i*i)Next iFor i=1 To 3k =k+p(i)*2Next iMsgBox kEnd SuB打开窗体运行后,单击命令按钮,消息框中输出的结果是【 】。

考题 窗体有命令按钮Commandl和文本框Text1,对应的事件代码如下:Private Sub Commandl Click( ) For i=1T04X==3 For i=1t03 For k=1T02 x=x+3 Next k Next j Next i Text1.Value=Str(x) End Sub 运行以上事件过程,文本框中的输出是( )。A.6B.12C.18D.21

考题 在窗体上添加一个命令按钮(名为Commandl)和一个文本框(名为Textl),并在命令按钮中编写如下事件代码:PrivateSubCommandlClick()m=17n=Len(Str$(m)+Sp2ace(5))Me!Text1=nEndSub打开窗体运行后,单击命令按钮,在文本框中显示______。A.5B.8C.9D.10

考题 在窗体中有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下:Private Sub Commandl—Click( ) For i=1 T04 X=3 For j=1 T03 For k=1 T02 x=x+3 Next k Next jNext iText1.Value=Str(x) End Sub 打开窗体运行后,单击命令按钮,文本框Text1中输出的结果是( )。A.6B.12C.18D.21

考题 窗体中有一个名为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.13B.14C.15D.16