（ 17 ）设窗体中有一个文本框 Text1 ，若在程序中执行了 Text1.SetFocus ，则触发

A． ） Text1 的 SetFocus 事件

B． ） Text1 的 GotFocus 事件

C． ） Text1 的 LostFocus 事件

D． ）窗体的 GotFocus 事件

[单选题]设窗体中有一个文本框Text1，若在程序中执行了TextSetFocus，则触发（　　）。A.Text1的SetFocus事件B.Text1的GotF

[单选题]设窗体上有一个名为Text1的文本框，并编写如下程序：Private Sub Form_Load（）ShowText1.Text = ""Text1.SetFocusE．nd SubPrivate Sub Form_MouseUp（Button As Integer, _Shift As Integer, X As Single, Y As Single）Print "程序设计"E．nd SubPrivate Sub Text1_KeyDown（KeyCode As Integer, S

[单选题]在表单Form1中有一个文本框text1，text1的InteractiveChange事件代码如下：CHAR1=ALLTRIM（THIS.VALUE）ASC1=ASC（CHAR1）+32THIS.VALUE=CHR（ASC1）该表单运行后，在文本框中输入一个大写ASCII码“T”，则文本框中显示内容将是（）。A . T+32B . T32C . tD . 97

[单选题]窗体上添加一个文本框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、Text2的2个文本框，要求文本框Text1中输入的数据小于500，文本框Text2中输入的数据小于1000，否则重新输入。为了实现上述功能，在以下程序中问号（?）处应填入的内容是。Private Sub Text1_LostFocus（）C．all CheckInput（Text1，500）E．nd SubPrivate Sub Text2_LostFocus（）C．all CheckInput（Text2，1000）E．nd SubSub CheckInput（

[单选题]设窗体上有一个文本框，名称为text1,程序运行后，要求该文本框只能显示信息，不能接受输入的信息，以下能实现该操作的语句是（ ）。A．Text1.MaxLength=0B．Text1.Enabled=FlaseC．Text1.Visible=FlaseD．Text1.Width=0

[单选题]设窗体上有一个文本框，名称为Text1，程序运行后，要求该文本框只能显示信息，不能接收输入的信息，以下能实现该操作的语句是A．Text1．Maxength=0B．Text1．Enabled=FalseC．Text1．Visible=FalseD．Text1．Width=0

[单选题]设窗体上有一个文本框，名称为Text1，程序运行后，要求该文本框只能显示信息，不能接收输入信息，以下能实现该操作的语句是______。A．Text1. MaxLength=0B．Text1. Enabled=FalseC．Text1. Visible=FalseD．Text1. Width=0