在窗体上建立三个文本框，名称分别为Text1、Text2和Text3，一个命令按纽，名称为command1，如果在TEXT1中输入数200，在TEXT2中输入数150，则执行下列程序后，TEXT3的值为______。 Private Sub Command1_Click() Dim m, n As Integer m = Val (Text1. Text) n = Val (Text2. Text) If n * m = 0 ThenExit Sub End If If m ＜ n Then t =m: m= n: n = t End If Dor = m Mod nm= nn =r Loop While r ＜＞ 0 Text3. Text= m End Sub
A. 200
B. 50
C. 100
D. 150
查看答案
相关试题
换一换
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：当向文本框Text1中输入小写字母a时，文本框Text2中显示的是（）
A.A B.a C.C D.c
答案
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：Private Sub Text1_KeyUp（KeyCode As Integer，Shift As Integer)Dim c As Stringc=UCase（Chr（KeyCode))Text2.Text=Chr（Ase（c)+2)End Sub当向文本框Text1中输入小写字母a时，文本框Text2
A.A B.a C.C D.c
答案
在窗体上画3个标签、3个文本框（名称分别为Text1、Text2和Text3）和1个命令按钮（名称为Command1），外观如图所示。
A.4 B.6 C.8 D.12
答案
在窗体上画两个名称分别为Text1、Text2的文本框，Text1的Text属性为“DatBase”，如下图所示。现有如下事件过程：运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是（）
A.DataA B.DataB C.aData D.aBase
答案
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyDown事件过程如下： Private Sub Text1_KeyDown（KeyCode As Integer, Shift As Integer) Dim s As String s=Chr（KeyCode+35) Text2.Text=s End Sub 当向文本框Text1中输入小写字母a时，文本框Text2中显示的是
A.A B.a C.D D.d
答案
在窗体上建立名称为Text1、Text2和删的三个文本框，其中Text1和Text2文本框用来接受两个整数（假设为M和N)，建立一个名称为command1的命令按钮，单击它将得到数M从右边起的N位数字，并把该数字显示在Text3文本框中，如下图所示。请填空。 private Fuction digit（ByVal m As Integer, ByVal n As Integer) As Integ
答案
在窗体中添加一个命令按钮，名称为Command1，两个文本框名称分别为Text1、Text2，然后编写如下程序： Private Sub Command1_Click() a=Text1.Text b=Text2.Text c=LCase (a) d=UCase (b) Print c；d End Sub程序运行后，在文本框Text1、Text2中分别输入AbC和Efg，结果是______ 。
A.abcEFG B.abcefg C.ABCefg D.ABCEFG
答案
在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮，编写如下事件过程： Private Sub Command1_Click()Text1.Text=“计算机”Me.Text1=“等级”Text1=“考试” End Sub 程序运行后．如果单击命令按钮，则在文本框中显示的是
A.计算机 B.等级 C.考试 D.出错
答案
（ 19 ）在窗体上画两个文本框（名称分别为 text1 和 text2 ）和一个命令按钮（名称为 command1 ） , 然后编写如下事件过程：
A.Private B.Sub C.Command1_ D.Click()x = 0 E.Do F.While x x = (x + 2) * (x + 3)n = n + 1 G.Text = H.Text = I.Str(x) J.End K.Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别为 L.A ） 1 和 0 M.B ） 2 和 72 N.C) 3 和 50 O.D ） 4 和 168
答案
在窗体上画两个名称分别为Text1、Text2的文本框。Text1的Text属性为“Database”， 如图所示。现有如下事件过程： Private Sub Text1_Change（)Text2.Text=Mid（Text1,1,1)End Sub运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是：（）。
A.DataA B.DataB C.aData D.aBase
答案
热门试题
在窗体上建立名称为了ext1、Text2和Text3的三个文本框，其中Text1和Text2文本框用来接受两个整数（假设为M和N)，建立一个名称为Command1的命令按钮，单击它将得到数M从右边起的第N位数字，并把该数字显示在Text3文本框中，如图20-15如示。请填空。 Private Function digit（ByVal m As Integer，ByVal n As Integer)
在窗体上有一个文本框，其名称为Text1，编写下列事件过程：Private（）
在窗体中有一个文本框Text1，编写事件代码如下：打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是（）
在窗体上画两个文本框，名字分别为Text1和Text2，然后编写下列程序。程序运行后，如果在文本框 Text2中输入lmn，那么在文本框Text1中显示的内容将是 【8】 。 Private Sub Form_Load（) Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_KeyPress（Key
一个窗体上有三个文本框，按放置顺序分别是:Text1，Text2，Text3，若使程序运行时Text3首先获得“焦点”，那么，应设置其()属性值为0 。
一个窗体上有三个文本框,按放置顺序分别是:Text1,Text2,Text3 ,若使程序运行时Text3首先获得“焦点”,那么应设置其()属性值为 0 。
设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发
设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发______。
在窗体上有若干控件，其中有一个名称为Text1的文本框。影响Text1的Tab顺序的属性是()。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程Private Sub Command1_Click（）Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program"End Sub运行后，如果单击命令按钮，则在文本框中显示的是
新建一个工程。在窗体中画三个标签，名称分别为Label1、Label2和Label3，标题分别为“加数1”、“加数2”和“和”。在三个标签下分别有三个文本框（名称分别为Textl、Tex2和Text3)用来输入数字。要求编写一个事件过程，程序运行后在文本框Text1和Text2中输入数字，单击文本框Text3后其中输出两个数的和。如图14所示。程序中不得使用任何变量。 注意：存盘时必须存放在考生文
在窗体上画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（Te
在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程： Private Sub Command1_Click（) Text1.Text = "计算机" Text2.Text = Text1.Text Text1.Text = "等级考试" End Sub 程序运行后，单击命令按钮，两个文本框（Text1和Text2)内容分别为 （6) 和 （7) 。
在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程： Private Sub Coraraand1_Click（) Text1.Text="计算机" Text2.Text=Text1.Text Text1.Text="等级考试" End Sub 程序运行后，单击命令按钮，两个文本框（Text1和Text2)内容分别为 和 。
在窗体上画3个标签、3个文本框（名称分别为Text1、Text2和Text3)和1个命令按钮 （名称为Command1)，外观如下图所示。 编写如下程序： Private Sub Form_Load（) Text1.Text="" Text2.Text="" Text3.Text="" End Sub Private Sub Commandl_Click（) x=Val（Text1.Text) y
在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮 (名称为Command1)，外观如下图所示。 编写如下程序： Private Sub Form_Load() Text1.Text="" Text2.Text="" Text3.Text="" End Sub Private Sub Commandl_Click() x=Val(Text1.Text) y=Val(Text2.Text) Text3.Text=f(x,y) End Sub Function f(ByVal x As Integer,ByValy As Integer) DoWhiley＜＞0tmp=x ModyX=yy=tmp Loop f=X End Function 运行程序，在Textl文本框中输入36，在Text2文本框中输入24，然后单击命令按钮，则在Text3文本框中显示的内容是( )。
在窗体上画一个文本框，名称为Text1，然后编写如下程序：程序运行后，在文本框中输入一个字符串，然后单击窗体，则文本框中的内容（）
在窗体上放一个文本框Text1，在文本框中输入456，并有下列事件过程： Private Sub Form_Click() x=InputBox("请输入一个整数") Print x+Text1.Text End Sub 单击该窗体，在输入对话框中输入123，单击“确定”按钮后，窗体上显示的是( )。
在窗体上有若干控件，其中有一个名称为Text1文本框。影响Text1的Tab顺序的属性是 ______。
在窗体上添加一个命令按钮Command1和一个文本框Text1，把文本框的Tex入8和10，则文本框中显示的内容是
使用微信扫一扫登录
