Private Sub Commandl_Click()
F.or i=1 To 4
x=3
F.or j=l to 3
F.or k=1 To 2
x=x+3
Next k
Next j
Next i
Textl.Value=Str(x)
E.nd Sub
运行以上事件过程,文本框中的输出是( )。
A.6
B.12
C.18
D.21
[单选题]窗体有命令按钮Commandl和文本框Text1,对应的事件代码如下:F.or i=1T04X==3F.or i=1t03F.or k=1T02x=x+3Next kNext jNext iText1.Value=Str(x)E.nd Sub运行以上事件过程,文本框中的输出是( )。A.6B.12C.18D.21
[单选题]在窗体中有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下:F.or i=1 T04X=3F.or j=1 T03F.or k=1 T02x=x+3Next kNext jNext iText1.Value=Str(x)E.nd Sub打开窗体运行后,单击命令按钮,文本框Text1中输出的结果是( )。A.6B.12C.18D.21
[单选题]在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下:Private SuB cormmandl_Click()D.im i,j,xF.or i=i To 20 step 2x=0F.or j=1 To 20 step 2x=x+1Next jNext iText1.Value=Str(x)E.nd SuB打开窗体运行后,单击命令按钮,文本框中显示的结果是A.1B.7C.17D.400
[单选题]窗体中有命令按钮Command1和文本框Text1,事件过程如下:F.unction result(ByVal x As Integer)As BooleanIf x Mod 2=0 Thenresult=Trueelseresult=FalseE.nd IfE.nd FunctionPrivate Sub Command1_Click()x=Val(InputBox(“请输入一个整数”))If______ ThenTextl=Str(x)&“是偶数.”E.lseTextl=Str(x)
[单选题]在表单中有命令按钮Commandl和文本框Text1,将文本框的InputMask属性值设置为$9,999.9,然后在命令按钮的Click事件中输入代码ThisForm.Text1.Value=123456.789,当运行表单时,单击命令按钮,此时文本框中显示的内容为______。A.$123456.789B.$23456.7C.123456.7D.**,***.*
[单选题]( 31 )在窗体上有一个命令按钮 Commandl 和一个文本框 Textl ,编写事件代码如下:Private Sub Command1_Click()D.im i,j,xF.or i = 1 To 20 step 2x = 0F.or j = To 20 step 3x = x + 1Next jNext iTextl.Value=Str(x)E.nd Sub打开窗体运行后,单击命令按钮,文本框中显示的结果是A. ) 1B. ) 7C. ) 17D. ) 400
[单选题]34 )在窗体上有一个命令按钮 Commandl ,编写事件代码如下:Private Sub Commandl_Click()D.im d1 As DateD.im d2 As Datedl = #12/25/2009#d2 = #1/5/2010#MsgBox DateDiff( ” ww ” , d1, d2)E.nd Sub打开窗体运行后,单击命令按钮,消息框中输出的结果是A. ) 1B. ) 2C. ) 10D. ) 11
[单选题]在窗体中有一个文本框Textl,编写事件代码如下:Private Sub Form. Cl ick() ’X=val(Inputbox(“输入X的值”))Y=1If X<>0 Then Y:2Textl.Value=YE.nd Sub打开窗体运行后,在输入框中输入整数12,文本框Textl中输出的结果是A.1B.2C.3D.4
[单选题]在窗体上面一个命令按钮Commandl和一个文本框Textl,然后编写下列程序: Private Sub Commandl_ClickO A=InputBox("请输入日期(1~31)") T="旅游景点:"_ ﹠IIf(A>0And A ﹠IIf(A>10And A ﹠IIf(A>20And A Text1.Text=t End Sub程序运作后,如果从键盘输入5,则在文本框中显示的内容。A.旅游景点:长城 B. 旅游景点:长城颐和园C. 旅游景点:颐和园 D. 旅游景点:故宫
[单选题]在窗体上画1个命令按钮和1个文本框,其名称分别为Commandl和Textl,再编写如下程序:D.im 88 As StringPrivate Sub Textl—KeyPress(KeyAscii As Integer)If Chr(KeyAscii)<>””Then ss=ss+Chr(KeyAscii)E.nd SubPrivate Sub Commandl_Click()D.im m As String,i As IntegerF.or i=ten(ss)To 1 Step-