[单选题]

在窗体上有两个命令按钮Command1和Commnd2,三个文本框Text1,Text2和Text3,有如下事件过程: Private Sub Comuand1_Click() Text3.Text= Text1.Text+Text2.Text End Sub Private Sub Command2_Click() Text3.Text= Text3.Text+Str(Val(Text1.Text)+Val (Text2.Text)) End Sub程序运行后,在Text1和Text2中分别输入123、456,然后依次单击Command1和Command2,则在Text3中显示的内容依次是______ 。

A.123456 579

B.123456 123456

C.579 579

D.579 123456

参考答案与解析:

相关试题

在窗体上画两个文本框Text1和Text2,一个命令按钮Command1,请阅读

[单选题]在窗体上画两个文本框Text1和Text2,一个命令按钮Command1,请阅读以下程序段: Private Sub Command1_Click() x=0 Do Until x>=50 x=(x+4)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 运行程序后,单击命令按钮,在两个文本框中显示的值分别为( )。A.1和0B.2和240C.3和50D.4和168

  • 查看答案
  • 在窗体上画两个文本框Text1和Text2,一个命令按钮Command1,请阅读

    [单选题]在窗体上画两个文本框Text1和Text2,一个命令按钮Command1,请阅读下列程序段: Private Sub Command1_Click() x=0 Do Until x>=50 X=(x+4)﹡(x+3) N=n+1 Loop Text1.Text=Str(n) Text2.Text=str(x) End Sub运行程序后,单击命令按钮,在两个文本框中显示的值分别为A. 1和0 B. 2和240 C. 3和50 D. 4和168

  • 查看答案
  • 窗体上有两个文本框Text1、Text2以及一个命令按钮Command1,编写下

    [单选题]窗体上有两个文本框Text1、Text2以及一个命令按钮Command1,编写下列程序:D.im y As IntegerPrivate Sub Command1_Click()D.im x As Integerx=2Text1.Text=p2(p1(x),y)Text2.Text=p1(x)E.nd SubPrivate Function p1(x As Integer)As Integerx=x+y:y=x+yp1=x+yE.nd FunctionPrivate Function p2(x

  • 查看答案
  • 窗体上有两个文本框Text1、Text2以及一个命令按钮Command1,编写下

    [单选题]窗体上有两个文本框Text1、Text2以及一个命令按钮Command1,编写下列程序: Dim y As IntegerPrivate Sub Command1_Click()Dim x As Integer x=2 Text1.Text=p2(p1(x), y) Text2.Text=pi(x)End SubPrivate Function p1(x As Integer) As Integer x=x+y:y=x+y p1=x+yEnd FunctionPrivate Function p

  • 查看答案
  • 在窗体下画两个文本框Text1和Text2,一个命令按钮Command1,请阅读

    [单选题]在窗体下画两个文本框Text1和Text2,一个命令按钮Command1,请阅读下列程序段:Private Sub Command1_Click()x=0D.o Until x>=50x=(x+4)*(x+3)n=n+1LoopText1.Text=Str(n)Text2.Text=Str(x)E.nd Sub运行程序后,单击命令按钮,在两个文本框中显示的值分别为( )。A.1和0B.2和240C.3和50D.4和168

  • 查看答案
  • 窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列

    [单选题]窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:D.im y As IntegerPrivate Sub Command1_Click()D.im x As Integerx=2Text1.Text=Fun2(Fun1(x),y)Text2.Text=Fun1(x)E.nd SubPrivate Function Fun1(x As Integer) As Integerx=x+y:y=x+yF.un1=x+yE.nd FunctionPrivate Fun

  • 查看答案
  • 窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列

    [单选题]窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序D.im y As IntegerPrivate Sub Command1_Click()D.im x As Integerx=2Text1.Text=Fun2(Funl(x),y)Text2.Text=Funl(x)E.nd SubPrivate Function Funl(x As Integer) As Integerx=x+y ∶y=x+yF.unl=x+yE.nd FunctionPrivate Fun

  • 查看答案
  • (24)在窗体上有文本框Text1和命令按钮Command1,并有下列事件过程:

    [单选题](24)在窗体上有文本框Text1和命令按钮Command1,并有下列事件过程: Private Sub Command1_Click() Dim i As Integer For j=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next Text1.Text=Str(n) End Sub 单击命令按钮,程序运行后,在文本框中显示的值是 A.2 B.3 C.4 D.5

  • 查看答案
  • 在窗体上有文本框Text1和命令按钮Command1,并有下列事件过程:Priv

    [单选题]在窗体上有文本框Text1和命令按钮Command1,并有下列事件过程:Private Sub Command1_Click()D.im i As Integer,n As IntegerF.or i=0 To 50i=i+3n=n+1If i>10 Then Exit ForNextText1.Text=Str(n)E.nd Sub单击命令按钮,程序运行后,在文本框中显示的值是( )。A.2B.3C.4D.5

  • 查看答案
  • 在窗体上有一个命令按钮Command1和一个文本框Text1,编写事件代码如下:

    [单选题]在窗体上有一个命令按钮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打开窗体运行后,单击命令按钮,文本框中显示的结果是( )。A.1B.7C.17D.400

  • 查看答案
  • 在窗体上有两个命令按钮Command1和Commnd2,三个文本框Text1,T