单选题在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1的标签，窗体外观如图a所示。要求当改变任一个文本框的内容时就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：图a图b关于上述程序，以下叙述中错误的是（ ）。AShowText过程的参数类型可以是ControlBShowText过程的参数类型可以是VariantC两个过程调用语句有错，应分别改为Call ShowText（Text1.Text）、Call ShowText（Text2.Text）DShowText过程中的T是控件变量
单选题
在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1的标签，窗体外观如图a所示。要求当改变任一个文本框的内容时就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：图a图b关于上述程序，以下叙述中错误的是（ ）。
A
ShowText过程的参数类型可以是Control
B
ShowText过程的参数类型可以是Variant
C
两个过程调用语句有错，应分别改为Call ShowText（Text1.Text）、Call ShowText（Text2.Text）
D
ShowText过程中的T是控件变量
参考解析
解析：
Visual Basic允许将窗体和控件作为通用过程的参数。文本框也是控件，因此可以向过程传递。本题中是将文本框型作为参数，因此实参应为文本框对象而不是对象的某个属性值，程序代码中的两个过程调用语句是正确的。
Visual Basic允许将窗体和控件作为通用过程的参数。文本框也是控件，因此可以向过程传递。本题中是将文本框型作为参数，因此实参应为文本框对象而不是对象的某个属性值，程序代码中的两个过程调用语句是正确的。
相关考题：
在窗体上画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 y0tmp=x Mod yx=yy=tmpLoopf=xEnd Function运行程序，在Text1文本框中输入36，在Text2文本框中输入24，然后单击命令按钮，则在Text3文本框中显示的内容是（ ）。A．4B．6C．8D．12
在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labell，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labell.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是 ______。A．27B．28C．29D．30
（ 31 ） 在窗体上画一个命令按钮和一个文本框 （ 名称分别为 Command1 和 Text1 ） ， 并把窗体的Keyprewie w属性设置为 True ，然后编写如下代码：Dim SaveAll As StringPrivate Sub Form_Load ()ShowText1.Text= ” ”Text1.SetFocusEnd SubPrivate Sub Command1_Click()Text1.Text=Lcase(SaveAll)+SaveAllEnd SubPrivate Sub Form_KeyPress(KeyAscii As Integer)SaveAll=SaveAll+Chr(KeyAscii)End Sub程序运行后，直接用键盘输入： VB ，再单击命令按钮，则文本框中显示的内容为A ） vbVBB ）不显示任何信息C ） VBD ）出错
在窗体上画两个文本框，其名称分别为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中显示的内容是（ ）。A．BeijingChinaB．ChinaC．BeijingD．BeijingC
在窗体上画两个名称分别为Text1、Text2的文本框。Text 1的Text的属性为“DataBase”，如图所示。 现有如下事件过程 Private Sub Text1_Change（ ） Text 2．Text=Mid(Text1，1，5) End Sub 运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是（ ）。A.DataAB.DataBC.aDataD.aBase
在窗体上画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文本框显示的内容分别是【 】和【 】。
在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Label1，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Label1.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是： ______。A．27B．28C．29D．30
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮，要求程序运行时，单击命令按钮(如图1所示)，就可以把文本框中的内容写到文件Out．txt中，每次写 入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是（ ）。
在窗体上有一个文本框Text1和一个标签Label1，要求运行程序时，在文本框中输入的内容立即显示在标签中(如图1所示)，则空白处应填入的内容是（ ）。A. GeffocusB. ClickC. ChangeD. LostFocus
窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型声明当单击“保存”按钮时．将两个文本框中的内容写入一个随机文件Test29.dat中设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form. Load() Show Text1.Text="" Text2.Text="" Text1.SetFocus End Sub Private Sub Text1_Change() Text2.Text=Mid(Text1.Text,8) End Sub 程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2显示的内容是______。A． BeijingChinaB．ChinaC．BeijingD．BeijingC
在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1标签，窗体外观如图a所示，要求当改变任一个文本框的内容，就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：Private Sub Text1_Change（ ）Call ShowText(Text1)End SubPrivate Sub Text2_Change（ ）Call ShowText(Text2)End SubPrivate Sub ShowText(T As TextBox)Labell．Caption=文本框中的内容是：＆T．TextEnd Sub关于上述程序，以下叙述中错误的是（ ）。A.ShowText过程的参数类型可以是ControlB.ShowText过程的参数类型可以是VariantC.两个过程调用语句有错，应分别改为Call ShowText(Text1，Text)、Call Show Text (Text2，Text)D.ShowText过程中的T是控件变量
在窗体上画两个文本框(其名称分别为Text1和Text2)和一个命令按钮(其名称为 Commandl)，然后编写如下两个事件过程： Private Sub Command1_Click() Text1.Text = "Computer Rank Examination" End Sub Private Sub Text1_Change() Text2.Text = UCase(Text1.Text) End Sub程序运行后，单击命令按钮，则在Text2文本框中显示的内容是______。A．Computer Rank ExaminationB．computer rank examinationC．COMPUTER RANK EXAMINATIOND．空字符串
在窗体上画两个单选按钮(名称分别为Optionl、Option2，标题分别为“宋体”和“黑体”)、1个复选框(名称为Checkl，标题为“粗体”)和1个文本框(名称为Text1．Text属性为“改变文字字体”)，窗体外观如图所示。程序运行后，要求“宋体”单选按钮和“粗体”复选框被选中，则以下能够实现上述操作的语句序列是（ ）
在窗体上有两个文本框控件，名称分别为Text1和Text2，以下程序实现的功能是希望在文本框Text1中输入字符时，输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示，下划线处应填( )。Private Sub Text1_ _________() TextText=Text1.Text End SubA．SetFocusB．ChangeC．GetFocusD．Click
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下事件过程：Private Sub Form_ Lead()ShowText1.Text = " "Text2.Text = " "Text2.SetFocusEnd SubPrivate Sub Text2_ KeyDown (KeyCode As Integer, Shift As Integer)Text1.Text = Text1.Text + Chr (KeyCode - 4)End Sub程序运行后，如果在Text2文本框中输入efghi，则Text1文本框中的内容是______。
窗体上有名称为Text1、Text2的两个文本框，和一个由3个单选按钮构成的控件数组Opfion1，如图1所示。程序运行后，如果单击某个单选按钮，则执行Text1中数值与该单选按钮所对应的运算(乘1、乘10或乘100)，并将结果显示在Text2中，如图2所示。为了实现上述功能，在程序中的横线处应填入的内容是( )。 Private Sub Option1_Click(Index As Integer) If Text1.Text ＜＞ "" Then Select Case______ Case 0 Text2.Text=Text1.Text Case 1 Text2.Text=Text1.Text*10 Case 2 Text2.Text=Text1.Text*100 End Select End If End SubA．Option1.IndexB．IndexC．Option1(index)D．Option1(index).Value
新建一个工程。在窗体中画三个标签，名称分别为Label1、Label2和Label3，标题分别为“加数1”、“加数2”和“和”。在三个标签下分别有三个文本框(名称分别为Textl、TexQ和Text3)用来输入数字。要求编写一个事件过程，程序运行后在文本框Text1和Text2中输入数字，单击文本框删后其中输出两个数的和。如图14所示。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为ylc2.vbp，窗体丈件名为ylc2.frm。
在名称为Form1的窗体上画两个标签（名称分别为Label1和Label2，标题分别为“姓名”和“年龄”）、两个文本框（名称分别为Textl和Text2，初始内容均为空）和一个命令按钮（名称为Command1，标题为“显示”）。然后编写命令按钮的Click事件过程。程序运行后，在两个文本框中分别输人姓名和年龄，然后单击“显示”按钮，则在窗体上显示两个文本框中的内容，如图所示。要求程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl．vbp，窗体文件名保存为sjtl．frm。
在考生文件夹下有一个工程文件sjt3．vbp，窗体上有一个标题为“计算”的命令按钮，1个标题为“1!+2!+…+10!=”的标签。请画1个名称为Text1，初始内容为空的文本框，如图所示。程序功能：单击“计算”命令按钮，则计算“l!+2!+…+10!”的值，并将结果显示在Textl文本框中。请将“计算”命令按钮的Click事件过程中的注释符去掉，把?改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后，程序按原文件名存盘。
（1）在名为Form1的窗体上绘制两个标签（名称分别为Label1和Label2，标题分别为“长”和“宽”）、两个文本框（名称分别为Text1和Text2，Text属性均为空白）和一个命令按钮（名称为Command1，标题为“输入”）。编写命令按钮的Click事件过程，使程序运行后，若单击命令按钮，则先后显示两个“输入”对话框，在两个“输入”对话框中分别输入长和宽，并分别在两个文本框中显示出来，运行后的窗体如图21-1所示。注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为sj1．vbp，窗体文件名为sj1．frm。（2）在名为Form1的窗体上绘制一个标签（名称为Label1，标题为“输入”）、一个文本框（名称为Text1，Text属性为空白）和一个命令按钮（名称为Command1，标题为“显示”）。请编写命令按钮的Click事件过程，使程序运行后，在文本框中输入内容，然后单击命令按钮，则标签和文本框消失，并在窗体上显示文本框中的内容。运行后的窗体如图21-2和图21-3所示。注意：要求程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为Sj2．vbp，窗体文件名为sj2．frm。
在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2，标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为Display)。然后编写命令按钮的Click事件过程，使程序运行后，在两个文本框中分别输入姓名和年龄，然后单击命令按钮，则在窗体上显示两个文本框中的内容，如下图所示。注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise57.vbp，窗体文件名为execise57.frm。
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form_Load0 Show Text1.Text="" Text2.Text="" Text1.SetFocus End Sub Private Sub Text1 Change() Text2.Text=Mid(Text1.Text,8) End Sub 程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是( )。A．BeijingChinaB．ChinaC．BeijingD．BeijingC
在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labe11)，程序运行后，如果在文本框中输入指定的信息，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是( )。A．B．C．D．
在窗体上画一个文本框(名称为Textl)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以F可以实现上述操作的事件过程是（ ）
单选题在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1的标签，窗体外观如图a所示。要求当改变任一个文本框的内容时就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：图a图b关于上述程序，以下叙述中错误的是（ ）。AShowText过程的参数类型可以是ControlBShowText过程的参数类型可以是VariantC两个过程调用语句有错，应分别改为Call ShowText（Text1.Text）、Call ShowText（Text2.Text）DShowText过程中的T是控件变量
单选题在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：程序运行后，如果在文本框Text1中输入China Beijing，则在文本框Text2中显示的内容是（ ）。AChina BeijingBChinaCBeijingDChinaB