经营性道路旅客运输驾驶员超过从业资格证件有效期180日未申请换证，发证机关将注销其从业资格证件

在窗体上画一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim sb As String Str=Chr(KcyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=String(2，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“b”，则在文本框Text1中显示的内容是

A．bbb

B．BBB

C．BB

D．bb

在窗体上画一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim strAs String,n As Integer Str=UCase(Chr(KeyAscii) n=Len(str) Text1=String(n,str) End Sub 程序运行后，如果在键盘上输入单字母“k”，则在文本框Text1中显示的内容为()。

A．kk

B．kK

C．KK

D．Kk

在窗体上画一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim strAs String,n As Integer Str=UCase(Chr(KeyAscii) n=Len(str) Text1=String(n,str) End Sub 程序运行后，如果在键盘上输入单字母“k”，则在文本框Text1中显示的内容为()。

A．kk

B．kK

C．KK

D．Kk

在窗体上画一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String Str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=String(2,KeyAscii) End Sub 程序运行后，如果在键盘上输入字母"b"，则在文本框Text1中显示的内容是

A．bbb

B．BBB

C．BB

D．bb

在窗体上画一个文本框(其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中输出不定值

在窗体上画1个文本框，其名称为Text1，然后编写如下过程：

Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)

Print Chr(KeyCode)

End Sub

Private Sub Text1_Key Up(KeyCode As Integer,Shift As Integer)

Print Chr(KeyCode+2)

End Sub

程序运行后，把焦点移到文本框中，此时如果敲击“A”

在窗体上面有一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) TextText=String(2,KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则在文本框Text1中显示的内容为()。

A．aaa

B．AAA

C．AA

D．aa

在窗体上画一个名称为Text1的文本框，然后编写如下的事件过程： Private Sub Text1_KeyPress(Keyascii As Integer) ... End Sub 若焦点位于文本框中，则能够触发此事件的操作是()。

A．左键单击文本框

B．左键双击文本框

C．右键单击文本框

D．按下键盘上的某个键

在窗体上画1个文本框，其名称为Text1，然后编写如下过程：

Private Sub Text1_KeyDown（KeyCode As Integer,Shift As Integer）

Print Chr（KeyCode）

End Sub

Private Sub Text1_KeyUp（KeyCode As Integer，Shift As Integer）

Print Chr（KeyCode+2）

End Sub

程序运行后，把焦点移到文本框中，此时如果敲击“A”键，则输出结果为。

A．A

A

B．A

B

C．A

C

D．A

D

在窗体上画一个文本框(其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中输出不定值