在窗体上有一个命令按钮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
打开窗体运行后,单击命令按钮,文本框中显示的结果是
发布于 2022-05-13 21:24:54
登录后免费查看答案
关注者
0
被浏览
16
1 个回答
推荐阅读
-
在窗体中有一个命令按钮Command1和一个文本框Text1,编写事件代码如下:Private Sub Command1_Click(.For I =1 To 4x = 3For j = 1 To 3For k = 1 To 2x = x + 3Next kNext jNext IText1.value = Str(x.End Sub打开窗体运行后,单击命令按钮,文本框Text1输出的结果是
2022-05-13 关注 0 浏览16 1答案
-
在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下:Private Sub Commandl一Click( )Dim i,j,XFor i=1 TO 20 step 2X=0For j=i TO 20 step 3X=X+1Next jNext i.Textl.Value=Str(x)End Sub打开窗体运行后,单击命令按钮,文本框中显示的结果是( )。
2022-05-13 关注 0 浏览19 1答案
-
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x = 0n = InputBox("")For i = 1 To nFor j = 1 To ix = x + 1Next jNext iPrint xEnd Sub程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是
2022-05-11 关注 0 浏览20 1答案
-
在窗体中有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下:Private Sub Commandl—Click( )For i=1 T04X=3For j=1 T03For k=1 T02x=x+3Next kNext jNext iText1.Value=Str(x)End Sub打开窗体运行后,单击命令按钮,文本框Text1中输出的结果是( )。
2022-05-13 关注 0 浏览11 1答案
-
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim array1(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 1 To 3For j = 2 To 4array1(i, j) = i + jNext jNext iText1.Text = array1(2, 3) + array1(3, 4)End Sub程序运行后,单击命令按钮,在文本框中显示的值是
2022-05-11 关注 0 浏览11 1答案
-
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim array1(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 1 To 3For j = 2 To 4array1(i, j) = i + jNext jNext iText1.Text = array1(2, 3) + array1(3, 4)End Sub程序运行后,单击命令按钮,在文本框中显示的值是
2022-05-11 关注 0 浏览14 1答案
-
窗体有命令按钮Commandl和文本框Text1,对应的事件代码如下:Private Sub Commandl Click( )For i=1T04X==3For i=1t03For k=1T02x=x+3Next kNext jNext iText1.Value=Str(x)End Sub运行以上事件过程,文本框中的输出是( )。
2022-05-13 关注 0 浏览14 1答案
-
设有如下通用过程:Public Sub Fun(a() As Integer, x As Integer)For i = 1 To 5x = x + a(i)NextEnd Sub在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程:Private Sub Command1_Click()Dim arr(5) As Integer, n As IntegerFor i = 1 To 5arr(i) = i + iNextFun arr, nText1.Text = Str(n)End Sub程序运行后,单击命令按钮,则在文本框中显示的内容是( )。
2022-05-11 关注 0 浏览8 1答案
-
窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框,事件代码如下:Private Sub Command1_Click()Dim a(10)As Integer,b(10)As Integern=3For i=1 T0 5a(i)=ib(n)=2*n+iNext iMe!Text1=a(n)+b(n)End Sub打开窗体,单击命令按钮,文本框Text1中显示的内容是( )。
2022-05-13 关注 0 浏览12 1答案
-
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim array1(10,10) As IntegerDim i,j As IntegerFor i=1 To 3For j=2 To 4array1(i,j)=i+jNext jNext IText1.Text=array1(2,3)+array1(3,4)End Sub程序运行后,单击命令按钮,在文本框中显示的值是
2022-05-11 关注 0 浏览10 1答案