[单选题]

在窗体上画两个文本框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,请阅读以下程序段: 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=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=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() Dim x As Integer, n As Integer x=1 n=0 Do While x<20 x=x*3 n=n+1 Loop Text1.Text=Str(x) Text2.Text=Str(n) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别是( )。A.9和2B.27.和3C.195和3

  • 查看答案
  • 窗体上有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

  • 查看答案
  • 在窗体上画两个文本框(其NAME属性分别为TEXT1和TEXT2)和一个命令按钮

    [单选题]在窗体上画两个文本框(其NAME属性分别为TEXT1和TEXT2)和一个命令按钮(其NAME属性为COMMAND1),然后编写如下事件过程: PRIVATE SUB COMMAND1_CLICK( ) X=0 N=0 DO WHILE X<50 x=(x+2) * (x+3) N=N+1 LOOP TEXT1=STR(N) TEXT2=STR(X) END SUB程序运行后,单击命令按钮,在两个文本框中显示的值分别为( )。A.1和0B.2和72C.3和50D.4和168

  • 查看答案
  • 在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮

    [单选题]在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下的事件过程:程序执行后,单击命令按钮,在两个文本框中显示的值分别为()A . 1和0B . 2和72C . 3和50D . 4和168

  • 查看答案
  • 在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮

    [单选题]在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(真Name属性为Command1),然后编写如下事件过程: Private Sub Command1_Click() x=0 Do While x<50 x=(x+2)*(x+3) n=n+1 Loop Text1.Text=Str (n) Text2.Text=Str (x) End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为______ 。A.1和0B.2和72C.3和50D.4和168

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