在窗体上画两个对象名称分别为Text1和Text2的文本框,然后编写如下事件过程: Private Sub Form_Load() Text1.SelText = "Tianjin" End Sub 运行程序后,在Text1中用鼠标选中文本:Beijing,然后单击Text2,则Text1中的内容为
A.China
B.ChinaBeijing
C.Tianjin
D.ChinaTianjin
A.China
B.ChinaBeijing
C.Tianjin
D.ChinaTianjin
在窗体上画两个文本框,其名称分别为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
在窗体上画两个名称分别为Text1、Text2的文本框,Text属性为“database”。如图所示。
现有如下事件过程:
Private Sub text1_change()
Text2.text=mid(text1,1,5)
End Sub
运行程序,在文本框text1中原有字符之前输入a,text2中显示的是
A)dataA
B)DataB
C)aDate
D)aBase
在窗体(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属性为Text1),然后编写如下事件过程: Private Sub Form_Load() Text1.Text="" Text1.SetFocus For i=1 To 10 Sum=Sum+i Next i Text1.Text=Sum End Sub 上述程序的运行结果是 ______。
A.在文本框Text1中输出55
B.在文本框Text1中输出0
C.出错
D.在文本框Text1中输出不定值
A.10
B.20
C.30
D.40
在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2,Text属性均为空白)和一个命令按钮(名称为Cmd1,标题为Display)。然后编写命令按钮的Click事件过程,使程序运行后,在两个文本框中分别输入姓名和年龄,然后单击命令按钮,则在窗体上显示两个文本框中的内容,如下图所示。
注意:
程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为 execise57.vbp,窗体文件名为execise57.frm。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是______。
A.5
B.4
C.3
D.2
A.15和1
B.27和3
C.195和3
D.600和4