网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
在窗体中添加两个文本框，其名称分别为Text1和Text2;两个标签，其名称分别为Label1和Label2。编写程序，使得程序运行后，在文本框Text2中输入小写字母，能转换为比此字母的ASCII码小4的大写字母，结果显示在文本框Text1中。如输入“efg”，则输出的结果为“ABC”，能够实现上述功能的程序是
A．Private Sub Form. Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer，Shift As Integer) Text1．Text=Chr(KeyCode-4) End Sub
B．Private Sub Form_Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer，Shift As Integer) Text1．Text=Text1．Text+Chr(KeyCode-4) End Sub
C．Private Sub Form_Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer，Shift As Integer) Text1．Text=Text1．Text+Chr(KeyCOde-4) End Sub
D．Private Sub Form_Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer，Shift As Integer) Text1．Text=Chr(KeyCode-4) End Sub
参考答案
更多 “ 在窗体中添加两个文本框，其名称分别为Text1和Text2;两个标签，其名称分别为Label1和Label2。编写程序，使得程序运行后，在文本框Text2中输入小写字母，能转换为比此字母的ASCII码小4的大写字母，结果显示在文本框Text1中。如输入“efg”，则输出的结果为“ABC”，能够实现上述功能的程序是A．Private Sub Form. Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer，Shift As Integer) Text1．Text=Chr(KeyCode-4) End SubB．Private Sub Form_Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer，Shift As Integer) Text1．Text=Text1．Text+Chr(KeyCode-4) End SubC．Private Sub Form_Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer，Shift As Integer) Text1．Text=Text1．Text+Chr(KeyCOde-4) End SubD．Private Sub Form_Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer，Shift As Integer) Text1．Text=Chr(KeyCode-4) End Sub ” 相关考题
考题
（ 10 ） 在窗体上画一个名称为 Combo1 的组合框 ， 然后画两个名称分别为 Label1 、 Label2 ， 标题分别为 “ 城市名称 ” 和空白的标签 。 程序运行后 ， 在组合框中输入一个新项目并按回车键 ， 如果输入的项目在组合框的列表中不存在 ， 则自动将其添加到组合框的列表中 ， 并在 Label2 中给出提示 “ 已成功添加新输入项，如图所示。如果输入的项目已存在，则在 Label2 中给出提示 “ 输入项已在组合中。请填空。
考题
在窗体中添加一个命令按钮，名称为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．abcEFGB．abcefgC．ABCefgD．ABCEFG
考题
（ 19 ）在窗体上画两个文本框（名称分别为 text1 和 text2 ）和一个命令按钮（名称为 command1 ） , 然后编写如下事件过程：Private Sub Command1_Click()x = 0Do While x 50x = (x + 2) * (x + 3)n = n + 1Looptext1.Text = Str(n)text2.Text = Str(x)End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别为A ） 1 和 0B ） 2 和 72C) 3 和 50D ） 4 和 168
考题
在窗体上画两个文本框，其名称分别为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
考题
在名为“Form1”的窗体上添加3个文本框和一个命令按钮，其名称分别为“Text1”、“Text2”、“Text3”和“Command1”，然后编写如下两个事件过程：Private Sub Commandl Click()Text3=Text1+Text2End SubPrivate Sub Form1 Load()Text1=" "Text2=" "Text3=" "End Sub打开窗体Form1后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7，然后单击命令按钮Command1，则文本框(Text3)中显示的内容为【 】。
考题
在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2，标题分别为“身高”和“体重”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为“输入”)。编写命令按钮的Click事件过程，使程序运行后，若单击命令按钮，则先后显示两个输入对话框，在两个输入对话框中分别输入身高和体重，并分别在两个文本框中显示出来，运行后的窗体如下图所示。注意：程序中不得使用任何变量：文件必须存放在考生文件夹中，工程文件名为 execise21.vbp，窗体文件名为execise21.frm。
考题
在名为“Form1”的窗体上添加3个文本框和一个命令按钮，其名称分别为“Tem1”、“Text2”、“Text3”和“Command1”，然后编写如下两个事件过程：Private Sub Command1 Click()Text3=Text1+Text2End SubPrivate Sub Forml Load()Text1＝""Text2=""Text3=""End Sub打开窗体Form1后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7，然后单击命令按钮Command1，则文本框(Text3)中显示的内容为【 】。
考题
在窗体上画两个文本框，其名称分别为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是控件变量
考题
在窗体上画两个名称分别为Label1和Label2的标签，再画一个名称为Command1的命令按钮，然后编写如下事件过程：运行上面的程序，单击命令按钮．其输出结果是A．8 9B．8 18C．64 9D．64 18
考题
在窗体中添加一个命令按钮，名称为Command1，两个文本框名称分别为Text1和．Text2，然后编写如下程序： Private Sub Command1_Click() Dim x As String，y As String， C As String，d As String x = Text1．Text ： y = TextText c = LCase(x)：d = UCase(y) Print c； d End Sub 程序运行后，在文本框Texn、Text2中分别输入AbC和efG，结果是A．abcEFGB．abcefgC．ABCefgD．ABCEFG
考题
新建一个工程。在窗体中画三个标签，名称分别为Label1、Label2和Label3，标题分别为“加数1”、“加数2”和“和”。在三个标签下分别有三个文本框(名称分别为Textl、TexQ和Text3)用来输入数字。要求编写一个事件过程，程序运行后在文本框Text1和Text2中输入数字，单击文本框删后其中输出两个数的和。如图14所示。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为ylc2.vbp，窗体丈件名为ylc2.frm。
考题
在考生文件夹下有工程文件sj5．vbp及窗体文件sj5．frm，该程序是不完整的。在名称为Form1的窗体画两个Label控件，名称分别为Label1和Label2，其中Label1中显示“总人数”，Label2中显示“总分”，添加两个名称分别为Text1和Text2的文本框，再画两个命令按钮，名称分别为Command1与Command2、标题分别为“读取数据”与“计算总分”，数据文件in5．txt存放成绩。要求程序运行后：单击“读取数据”按钮后，从考生文件夹下的in5．txt中读出数据，并在标签Text1中显示人数；单击“计算总分”便在Text2中显示总分并将结果写入考生文件夹下out5．txt文件中；执行完毕，“读取数据”按钮变成“读取完成”，且无效（变灰），如图60-5所示。注意：请在有“?”号的地方填入正确内容，然后删除“?”及代码前的所有注释符（即“‘”号），但不能修改其他部分。存盘时不得改变文件名和文件夹，程序编写完整后执行一次操作，将结果保存到考生文件夹下的out5．txt文件中，否则没有成绩。
考题
在名称为Form1的窗体上画两个标签（名称分别为Label1和Label2，标题分别为“姓名”和“年龄”）、两个文本框（名称分别为Textl和Text2，初始内容均为空）和一个命令按钮（名称为Command1，标题为“显示”）。然后编写命令按钮的Click事件过程。程序运行后，在两个文本框中分别输人姓名和年龄，然后单击“显示”按钮，则在窗体上显示两个文本框中的内容，如图所示。要求程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl．vbp，窗体文件名保存为sjtl．frm。
考题
在窗体上绘制两个标签，名称分别为Lab1和Lab2，标题分别为“请输入一个正整数 N”和“1+2+3+…+N=”；绘制两个文本框，名称分别为Text1和Text2，内容都设为空白；绘制一个命令按钮，名为Cmd1，标题为“计算”。编写适当的程序，使程序运行时，在Text1中输入一个正整数N，单击“计算”按钮，计算出1+2+3+…+1N的和显示在Text2中。程序运行结果如下图所示。注意：程序中不得使用任何变量：文件必须存放在考生文件夹中，窗体文件名为 execise120.frm，工程文件名为execise120.vbp。
考题
在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2，标题分别为“书名”和“作者”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为Display)。然后编写命令按钮的Click事件过程，使程序运行后，在两个文本框中分别输入书名和作者，然后单击命令按钮，则在窗体的标题栏上先，后显示两个文本框中的内容，如下图所示。注意：要求程序中不得使用任何变量；文件必须存放在考生文件夹中；工程文件名为 execise51.vbp，窗体文件名为execise51.frm。
考题
在名为Form1的窗体上绘制两个文本框，名称分别为Text1和Text2；再绘制两个命令按钮，名称分别为Cmd1和Cmd2，标题分别为LeR和Right，如下图所示。要求：(1)编写适当的事件过程，使得程序运行时，单击LeR按钮，则焦点位于Text1上。(2)单击Right按钮，则焦点位于Text2上。注意：程序中不得使用变量，事件过程中只能写一条语句：文件必须存放在考生文件夹中，工程文件名为execise110.vbp，窗体文件名为execise110.frm。
考题
（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
考题
在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1)，然后编写如下程序：PrivateSubCommand1_Click()X=0DoWhileXX=(X+1)*(X+2)n=n+1LoopText1.Text=Str(n)Text2.Text=Str(X)EndSub程序运行后，单击命令按钮，在两个文本框Text1和Text2中分别显示的值是( )A、1和0B.2和12C.2和72D.3和12
考题
在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text 1、Text2,然后编写如下程序:PrivateSubCommand1_Click()a=Text1.textb=Text2.textC=Lcase( )D=Ucase( )PrintC;DEndSub程序运行后,在文本框Text 1、Text2中分别输入AbC和Efg,结果是( )
A、abcEFGB.abcefgC.ABCefgD.ABCEFG
考题
在窗体上画两个文本框(其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属性为Command1），然后编写如下事件过程（） A1和0B2和72C3和50D4和168
考题
在窗体（Name属性为Form1）上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程： 程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入“同学们，”和“你们好”，然后单击命令按钮，则输出结果为多少？
考题
在在窗体上添加一个命令按钮Command1和两个名称分别为Label1和 Label2的标签，然后编写如下事件过程： Private X AsInteger Private SubCommand1_Click（ ） X = 5: y = 3 Call proc(X, y) Label1.Caption = X Label2.Caption = y End Sub Sub proc(ByVal a As Integer, ByVal bAs Integer) X = a * a y = b + b End Sub 程序运行后，单击命令按钮，则两个标签label1和label2中显示的内容分别是（）。A、25，3B、25，6C、5，3D、5，6
考题
单选题在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：程序运行后，如果在文本框Text1中输入China Beijing，则在文本框Text2中显示的内容是（ ）。A
China BeijingB
ChinaC
BeijingD
ChinaB
热门标签
最新试卷
