text1暂缺

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

[单选题]有应用代码：Text1.Text="VisualBasic"，其中的Text1、Text和"VisualBasic"分别代表（）A . 对象、方法、属性B . 属性、对象、值C . 对象、属性、值D . 对象、值、属性

[单选题]窗体上有两个名称分别为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．AB．aC．CD．c

[单选题]窗体上添加一个文本框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．text="Visual Basic" 其中的Text1、text和"Visual Basic"分别代表( )。A．对象、值、属性B．对象、方法、属性C．对象、属性、值D．属性、对象、值

[单选题]执行Text1.Move200，300，1500，1000语句后，控件Text1的宽度是（）twip。A . 200B . 300C . 1500D . 1000

[单选题]窗体上有名称分别为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、Text2的2个文本框，要求文卒框Text1中输入的数据小于500，文本框Text2中输入的数据小于1000，否则重新输入。为了实现上述功能，在以下程序中问号(?)处应填入的内容是______。 Private Sub Text1 LostFocus() Call CheckInput(Text1,500) End Sub Private Sub Text2 LostFocus() Call CheCkInput(Text2,1000) End Sub Sub Ch