A.+
B.-
C.|
D.空格
第1题
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下: Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Dim c As String c=UCase(Chr(KeyCode)) Text2.Text=Chr(Asc(C+2) ) End Sub 当向文本框Text1中输入小写字母a时,文本框Text2中显示的是()。
A.A
B.a
C.C
D.c
第2题
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下: Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Dim c As String c=UCase(Chr(KeyCode)) Text2.Text=Chr(Asc(C+2) ) End Sub 当向文本框Text1中输入小写字母a时,文本框Text2中显示的是()。
A.A
B.a
C.C
D.c
第3题
在窗体上画两个名称分别为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
第4题
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下事件过程:
Private Sub Form_ Lead()
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
程序运行后,如果在Text2文本框中输入efghi,则Text1文本框中的内容是______。
第5题
在窗体上画两个名称分别为Text1、Text2的文本框。Text 1的Text的属性为“DataBase”,如图所示。
现有如下事件过程
Private Sub Text1_Change()
Text 2.Text=Mid(Text1,1,5)
End Sub
运行程序,在文本框Text1中原有字符之前输入a,Text2中显示的是()。
A.DataA
B.DataB
C.aData
D.aBase
第6题
A.China
B.ChinaBeijing
C.Tianjin
D.ChinaTianjin
第7题
在名为Form1的窗体上绘制两个文本框,名称分别为Text1和Text2(如下图所示),初始情况下都没有内容。请编写适当的事件过程,使得程序在运行时,在Text1中输入的任何字符,立即显示在Text2中。
注意:
程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为execise7/vbp,窗体文件名为execise7.frm。
第8题
在窗体上画两个文本框,其名称分别为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.Chima
C.Beijing
D.BeijingC
第9题
在窗体上画两个文本框,其名称分别为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
第10题
在窗体上画两个文本框,其名称分别为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.BeijingChina
B.China
C.Beijing
D.BeijingC
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!