单选题
在窗体（Name 属性为Form1）上画两个文本框（其Name 属性分别为Text1和Text2）和一个命令按钮（Name属性为Co mmand1），然后编写如下两个事件过程：
在窗体（Name 属性为Form1）上画两个文本框（其Name 属性分别为Text1和Text2）和一个命令按钮（Name属性为Co mmand1），然后编写如下两个事件过程：
Private Sub Co mmand1＿Click（）
a＝Text1．Text ＋Text2．Text Print a
End Sub
Private Sub Form＿Load（）
Text1．Text ＝＂＂ Text2．Text ＝＂＂
End sub
程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和321，然后单击命令按钮，则输出结果为（ ）。
发布于 2022-05-11 10:00:07
登录后免费查看答案
关注者
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答案
-
在窗体上画两个文本框（其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答案
-
在窗体上画两个文本框（名称分别为Text1和Text2）和一个命令按钮（名称为Co mmand1），然后编写下列事件过程：Private Sub Co mmand1＿Click（）x＝0DO While x＜50x＝（x＋2）＊（x＋3）n ＝n ＋lLoopText1．Text ＝Str（n）Text2．Text ＝Str（x）End Sub程序运行后，单击命令按钮，在两个文本框中显示的值分别为（ ）。
2022-05-11 关注 0 浏览10 1答案
-
在窗体上画一个命令按钮和两个文本框，其名称分别为Command1、Text1和Text2，在属性窗口中把窗体的KeyPreview属性设置为True，然后编写如下程序：Diln S1 As String，S2 As StringPrivate Sub Form Load（ ）Text1．Text=""Text2．Text=""Text1．Enabled=FalseText2．Enabled=FalseEnd SubPrivate Sub Form KeyDown(KeyCode As Integer，Shift As Integer)S2=S2＆Chr(KeyCode)End SubPri vate Sub Form KeyPress(KeyAscii As Integer)S1=S1＆Chr(KeyAscii)End SubPrivate Sub Command1 Click（ ）Text1．Text=S1Text2．Text=S2S1=""S2=""End Sub程序运行后，先后按“a”、“b”、“c”键，然后单击命令按钮，在文本框Text1和Text2中显示的内容分别为（ ）。
2022-05-11 关注 0 浏览16 1答案
-
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp 的事件过程如下：Private Sub Text1＿KeyUp（KeyCode As Integer ，shiftAs Integer）Di m CAs stri ngText2．Text ＝Chr（Asc（c）＋2）End Sub当向文本框Text1中输入小写字母a 时，文本框Text2中显示的是（ ）。
2022-05-11 关注 0 浏览24 1答案
-
在窗体上画一个命令按钮和两个文本框，其名称分别为Commandl、Textl和Text2，在属性窗口中把窗体的KeyPreview属性设置为True，然后编写如下程序：Dim S1 As String, S2 As StringPrivate Sub Form_Load()Text1.Text = ""Text2.Text = ""Text1.Enabled = FalseText2.Enabled = FalseEnd SubPrivate Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)S2 = S2 & Chr(KeyCode)Print S2End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)S1 = S1 & Chr(KeyAscii)Print S1End SubPrivate Sub Command1_Click()Text1.Text = S1Text2.Text = S2S1 = ""S2 = ""End Sub程序运行后，先后按“a”、“b”、“c”键，然后单击命令按钮，在文本框Textl和Text2中显示的内容分别为（ ）。
2022-05-11 关注 0 浏览17 1答案
-
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1)，并把窗体的KeyPreview属性设置为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，再单击命令按钮，则文本框中显示的内容为（ ）。
2022-05-11 关注 0 浏览15 1答案
-
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程Private Sub Command1_Click()Text1.Text = "Visual"Me.Text1 = "Basic"Text1 = "Program"End Sub程序运行后，如果单击命令按钮，则在文本框中显示的是
2022-05-11 关注 0 浏览17 1答案
-
在窗体上画一个命令按钮和两上文体，其名称分别为 Command1 、 Text1 和 Text2 ，然后编写如下程序：Dim S1 As String, S2 As StringPrivate Sub Form_Load()Text1. Text=””Text2. Text=””End SubPrivate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)S2=s2 & Chr(KeyCode)End SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)S1=S1 & chr(KeyAscii)End SubPrivate Sub Command1_Click()Text1.Text=S2Text2.Text=S1S1= “”S2= “”End Sub程序运行后，在 Text1 中输入“ abc ”，然后单击命令按钮，在文本框 Text1 和 Text2 中显示的内容分别为 （ ） 。
2022-05-11 关注 0 浏览17 1答案
-
在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：Private Sub Command1_Click()strText = InputBox("请输入")Text1.Text = strTextEnd SubPrivate Sub Text1_Change()Label1.Caption = Right(Trim(Text1.Text), 3)End Sub程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是
2022-05-11 关注 0 浏览11 1答案
