对文本框Text1编写如下事件过程：

Private Sub Text1_KeyPress(KeyAscii As Integer)

D．im b As String

b = Chr(KeyAscii)

KeyAscii = Asc(UCaseB、)

E．nd Sub

运行时，下列叙述正确的是( )。

A． Text1中无法输入字符

B． Text1中内容为"b"

C． Text1中输入的字符都变为大写

D． Text1中输入的字符都被转换成ASCII码

[单选题]文本框Text1的KeyDown事件过程如下： Private Sub Text 1_KeyDown(KeyCode As Integer,Shift As Integer) … End Sub 其中参数KeyCode的值表示的是发生此事件时( )。A．是否按下了＜Alt＞键或＜Ertl＞键B．按下的是哪个数字键C．所按的键盘键的键码D．按下的是哪个鼠标键

[单选题]设在窗体上有个文本框,然后编写如下的事件过程Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)C．onst Alt=4C．onst Key_F2=&H71altdown%=(Shift And Alt) > 0f2down%=(KeyCode=Key_F2)If altdown% And f2down% ThenText1.Text="BBBBB"E．nd IfE．nd Sub上述程序运行后,如果按(S

[单选题]设在窗体上有个文本框，然后编写如下的事件过程。 Private Sub Text1_KeyDown(KeyCode As Integef，Shift As Integer) Const Alt=4 ConstKey_F2=&H71 altdown%=(Shift And Alt)＞0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1.Text= "BBBBB" End If End Sub 上述程序运行后，如果按[

[单选题]设在窗体上有个文本框，然后编写如下的事件过程：Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer)C．onst Alt=4C．onst Key_F2=&H71altdown%=(Shift And Alt)＞0f2down%=(KeyCode=Key_F2)If altdown% And f2down% ThenText1.Text="BBBBB"E．nd IfE．nd Sub上述程序运行后，如果按“Shift+

[单选题]窗体上添加一个文本框Text1，编写如下代码： Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode+5) & KeyCode End Sub 程序运行时，在文本框中输入“ab”，则在窗体上输出为( )。A．F65 G66B．F65 F66C．G66 F65D．G65 G66

[单选题]窗体上添加一个文本框Text1，编写如下代码： Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) Print Chr(KeyCode+5)&KeyCode End sub 程序运行时，在文本框中输入“ab”，则在窗体上输出为( )。A．F65 G66B．F65 F66C．G66 F65D．G65 G66

[单选题]窗体上添加一个文本框Text1，编写下列代码： Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+5)& KeyCode End Sub 程序运行时，在文本框中输入“ab”，则在窗体上输出为( )。A．F65 G66B．F65 F66C．G66 F65D．G65 G66

[单选题]在窗体上画—个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text==" " Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single，Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer,

[单选题]在窗体上画—个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text=" " Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single) Print "程序设计" End Sub Private Sub Text1_KeyDown(KeyCode As Integer

[单选题]（ 32 ）在窗体中有一个文本框 text1, 编写事件代码如下：Private sub form_click()X=val(inputbox( “ 输入 x 的值 ” ))Y=1If x<> then y=2Text1.value=yE．nd sub打开窗体运行后。在输入框中输入整数 12 ，文本框 text1 中输出的结果是A． ） 1B． ） 2C． ） 3D． ） 4