题目内容
（请给出正确答案）
在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl)，然后编写如下事件过程：
A. 1和0
B. 2和72
C. 3和50
D. 4和168
如果结果不匹配，请 联系老师 获取答案
更多“在窗体上画两个文本框（Name属性分别为Textl和Text…”相关的问题
在窗体(Name属性为form1)上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮 (Name属性为Command1)，然后编写如下两个事件过程，该过程的运行结果为______。Private Sub Command1_Click() a = Text1, Taxt + Text2, Text Print aEnd SubPrivate Sub form_ Load() Text1.Text = "123" Text2.Text = "321"End Sub
A．444
B．321123
C．123321
D．132231
在窗体(Name属性为Forml)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl)，然后编写如下两个事件过程： Private Sub Commandl_Click() a=Text1.Text+Text2.Text Printa End Sub Private Sub Form_Load() Text1.Text="" Text2.Text="" End Sub 程序运行后，在第一个文本框(
A．165
B．8778
C．7788
D．7887
在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程： Private Sub Form_Load() Text1.Text="" Text1.SetFocus For i=1 To 9 Sum=Sum+i Next i Text1.Text=Sum End Sub 上述程序的运行结果是
A．在文本框Text1中输出45
B．在文本框Text1中输出0
C．出错
D．在文本框Text1中输出不定值
在窗体上画一个命令按钮Command1和两个文本框，名称分别为Text1和Text2。编写如下两个事件过程： Dim Str1 As String，str2 As String Private Sub form_load() Text1.Text="" Text2.Text="" Text1.Enabled=False Text2.Enabled=False End Sub Private Sub Form_KeyPress(KeyAscii As Integer) str1=str1&Chr(KeyAscii) End Sub Prirate Sub Form_KeyDown(KeyCode As Integer，Shift As Integer) str2=str2&Chr(KeyCode) End Sub Private Sub Command1_Click() Text1.Text=str1 Text2.Text=str2 str1="" str2="" End Sub 当在设计阶段的窗体的KeyPreview属性设置为True时，程序运行过程中，在键盘上输入小写字母abc，然后单击命令按钮，则文本框Text1中显示的内容为
A．abc
B．不显示任何信息
C．ABC
D．出错
Dim S1 As String，S2 As String
Private Sub Form_Load()
Text1．Text=””
Text2．Text=””
TeXt1．Enabled=False
Text2．Enabled=False
End Sub
Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)
S2=S2&Chr(KeyCode)
End Sub
Privtee Sub Form_KeyPress(KeyAscii As Integer)
S1=S1&Chr(KeyAscii)
End Sub
Pfivtee Sub Command 1_Click()
Text1．Text=S1
Text2．Text=S2
S1=””
S2=””
End Sub
程序运行后，先后按“a”、“b”、“c”键，然后单击命令按钮，在文本框Text1和Text2中显示的内容分别为()。
A．abc和ABC
B．空白
C．ABC和abc
D．出错
.jpg)
A．Optionl. Value=True Checkl. Value=False
B．Optionl. Value=True Checkl. Value=True
C．Option2. Value=False Checkl. Value=True
D．Optionl. Value=True Checkl. Value=1
A) Option1. value = False
Check1. value = True
B) Option1. value = True
Check1. value = 0
C) Option1. value = True
Check1. value = 2
D) Option1. value = True
Check1. value = 1
在窗体上画两个文本框，其名称分别为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．BeijingChina
B．China
C．Beijing
D．BeijingC
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1)，并把窗体的KeyPreview属性设置为True，然后编写下列代码： Dim SaveAll As String Private Sub Form. Load（） Show Text1．Text="" Text1．SetFocus End Sub Private Sub Command1 Click（） Text1．Text=LCase(SaveAll)+SaveAll End Sub Private Sub Form. KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii) End Sub 程序运行后，直接用键盘输入VB，再单击命令按钮，则文本框中显示的内容为（）。
A.vbVB
B.不显示任何信息
C.VB
D.出错
注意：下面出现的“考生文件夹”均为c：\wexam\25160001。
(1) 在名称为Form1的窗体上画一个名称为H1的水平滚动条，请在“属性”窗口中设置它的属性值，使之满足以下要求：它的最大刻度值为100，最小刻度值为1，在运行时鼠标单击滚动条上滚动框以外的区域(不包括两边按钮)，滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1和L2的标签，并分别显示1和100，运行时的窗体如图19-1所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm
(2) 在名称为Form1的窗体上画两个文本框，名称分别为Text1和Text2，均无初始内容；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个子菜单项，名称分别为Cooy和Clear、标题分别为“复制”和“清除”。请编写适当的事件过程，使得程序运行时，单击“复制”菜单项，则把 Text1中的内容复制到Text2中，单击“清除”菜单项，则清除Text2中的内容(即在Text2中填入空字符串)。程序运行界面如图19-2所示。要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
.jpg)
