【单选题】在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下: Private SuB cormmandl_Click() Dim i,j,x For i=i To 20 step 2 x=0 For j=1 To 20 step 2 x=x+1 Next j Next i Text1.Value=Str(x) End SuB 打开窗体运行后,单击命令按钮,文本框中显示的结果是
【单选题】在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下: Private Sub Commandl一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.Textl.Value=Str(x) End Sub 打开窗体运行后,单击命令按钮,文本框中显示的结果是( ...
【单选题】在窗体上有一个命令按钮Commandl,通用过程fun和命令按钮的事件过程如下: Private Function fun(By m As Integer) If m Mod 2=0 Then fun=2 Else Fun=1 Else If End Funcion Private Sub Commandl_Click() Dim i Integer,s As Integer s=0 For i=...