单选题
在窗体上画两个文本框（名称分别为Text1和Text2）和一个命令按钮（名称为Co mmand1），然后编写下列事件过程：
在窗体上画两个文本框（名称分别为Text1和Text2）和一个命令按钮（名称为Co mmand1），然后编写下列事件过程：
Private Sub Co mmand1＿Click（）
x＝0
DO While x＜50
x＝（x＋2）＊（x＋3）
n ＝n ＋l
Loop
Text1．Text ＝Str（n）
Text2．Text ＝Str（x）
End Sub
程序运行后，单击命令按钮，在两个文本框中显示的值分别为（ ）。
发布于 2022-05-11 09:59:53
登录后免费查看答案
关注者
0
被浏览
10
1 个回答
推荐阅读
-
在窗体上画两个文本框（其Name 属性分别为Text1和Text2）和一个命令按钮（其Name 属性为Co mmand1），然后编写如下事件过程：Private Sub Co mmand1＿Click（）x＝0Do While x＜50x＝（x＋2）＊（x＋3）n ＝n ＋1LoopText1．Text ＝Str（n）Text2．Text ＝Str（x）End Sub程序运行后，单击命令按钮，在两个文本框中显示的值分别为（ ）。
2022-05-11 关注 0 浏览14 1答案
-
在窗体上画两个文本框（名称分别为Textl和Text2）和一个命令按钮（名称为Command1），然后编写如下事件过程：Private Sub Command1_Click()x=0Do While x<50x=(x+2) * (x+3)n=n+1LoopTextl.Text=Str(n)Text2.Text=Str(x)End Sub程序运行后，单击命令按钮，在两个文本框中显示的值分别为（ ）。
2022-05-11 关注 0 浏览13 1答案
-
在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim x As Integer,n As Integerx=1n=0Do While x<20x=x*3n=n+1LoopText1.Text=Str(x)Text2.Text=Str(n)End Sub程序运行后，单击命令按钮，在两个文本框中显示的值分别是
2022-05-11 关注 0 浏览8 1答案
-
在窗体（Name 属性为Form1）上画两个文本框（其Name 属性分别为Text1和Text2）和一个命令按钮（Name属性为Co mmand1），然后编写如下两个事件过程：Private Sub Co mmand1＿Click（）a＝Text1．Text ＋Text2．Text Print aEnd SubPrivate Sub Form＿Load（）Text1．Text ＝＂＂ Text2．Text ＝＂＂End sub程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和321，然后单击命令按钮，则输出结果为（ ）。
2022-05-11 关注 0 浏览15 1答案
-
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：Private Sub Form_Load()ShowText1.Text = ""Text2.Text = ""Text1.SetFocusEnd SubPrivate Sub Text1_Change()Text2.Text = Mid(Text1.Text, 8)End Sub程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是
2022-05-11 关注 0 浏览17 1答案
-
在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：Private Sub Command1_Click()n = Val(Text1.Text)If n\2 = n/2 Thenf = f1(n)Elsef = f2(n)End IfPrint f; nEnd SubPublic Function f1(ByRef x)x=x*xf1=x+xEnd FunctionPublic Function f2(ByVal x)x=x*xf2=x+x+xEnd Function程序运行后，在文本框中输入6，然后单击命令按钮，窗体上显示的是
2022-05-11 关注 0 浏览16 1答案
-
在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮(名称为Command1)，外观如图所示。 编写如下程序：Private Sub Form_Load()Text1.Text=""Text2.Text=""Text3.Text=""End SubPrivate Sub Command1_Click()x=Val(Text1.Text)y=Val(Text2.Text)Text3.Text=f(x，y)End SubFunction f(ByVal x As Integer,ByVal y As Integer)Do While y<>0tmp=x Mod yx=yy=tmpLoopf=xEnd Function运行程序，在Text1文本框中输入36，在Text2文本框中输入24，然后单击命令按钮，则在Text3文本框中显示的内容是。
2022-05-11 关注 0 浏览10 1答案
-
窗体上有两个文本框Textl、Text2以及一个命令按钮Commandl ，编写下列程序：Di mY As IntegerPrivate Sub Commandl＿Click（）Di m X As Integerx＝2Textl ．Text ＝p2（p1（X），Y）Text2．Text ＝pl（x）End SubPrivate Function pl（X As Integer）As Integerx＋x＋y∶y ＝x＋ypl ＝x＋yEnd FunctionPrivate Function p2（X As Integer ，Y As Integer）As Integerp2＝2＊x＋yEnd Function当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别为（ ）。
2022-05-11 关注 0 浏览9 1答案
-
在窗体上画1个名称为Command1的命令按钮和2个名称分别为Text1、Text2的文本框，如图所示，然后编写如下程序： Function Fun(x As Integer,ByVal y As Integer)As Integerx=x+yIf x<0 ThenFun=xElseFun=yEnd IfEnd FunctionPrivate Sub Command1_Click()Dim a As Integer,b As Integera=-10：b=5Text1.Text=Fun(a，b)Text2.Text=Fun(a，b)End Sub程序运行后，单击命令按钮，Text1和Text2文本框显示的内容分别是______和______。
2022-05-11 关注 0 浏览12 1答案
-
在窗体上画1个命令按钮(名称为Command1)和1个文本框(名称为Text1)，然后编写如下事件过程：Private Sub Command1_Click()x=Val(Text1.Text)Select Case xCase 1，3y=x*xCase Is>=10，Is<=-10y=xCase -10 To 10y=-xEnd SelectEnd Sub程序运行后，在文本框中输入3，然后单击命令按钮，则以下叙述中正确的是。
2022-05-11 关注 0 浏览19 1答案
