A．Text4
B．"Text4"
C．Locked
D．Name
[判断题] 文本框的默认属性是text属性。A . 正确B . 错误
[单选题]能清除文本框Text1中内容的语句是( )。A． Text = ""B． Text 1.Text = ""C． Text 1.clearD． Text 1.Cls
[单选题]（28）在窗体上画4个文本框，并用这4个文本框建立一个控件组，名称为Text1(下标从0开始，自左至右顺序增大)，然后编写下列事件过程：Private Sub Command1_Click() For Each TextBox In Text1 Text1(i)=Text1(i).Index i=i+1 Next End Sub程序运行后，单击命令按钮，4个文本框中显示的内容分别为A.0 1 2 3 B.1 2 3 4 C.0 1 3 2 D.出错信息
[单选题]在窗体上画4个文本框，并用这4个文本框建立一个控件数组，名称为Text1 (下标从0开始，自左至右顺序增大)，然后编者按写如下事件过程： Private Sub Command1_Cliek() For Each TextBox In Text1 Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮，4个文本框中显示的内容分别为( )。A．0 1 2 3B．1 2 3 4C．0 1 3 2D．出错信息
[单选题]在窗体上有一个文本框Text1，Text属性值为空，然后编写如下事件过程：Private Sub Text1_KeyPress(Key Ascii As Integer)Dim str As String, n As Integer str=UCase(Chr(Key Ascii)) n=Len(str) Text1.Text=String(n,str) End Sub 程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为( )。A．ppB．pPC．PPD．Pp
[单选题]在窗体上画4个文本框，并用这4个文本框建立一个控件数组，名称为Text1(下标从0开始，自左至右顺序增大)，然后编写下列事件过程：Private Sub Command1_Click()F．or Each TextBox In Text1Text1(i)=Text1(i).Indexi=i+1NextE．nd Sub程序运行后，单击命令按钮，4个文本框中显示的内容分别为( )。A．0 1 2 3B．1 2 3 4C．0 1 3 2D．出错信息
[单选题]在窗体上画两个名称分别为Text1、Text2的文本框，Text1的Text属性为“Data Base”，如下图所示。现有如下事件过程：运行程序，在文
[单选题]（18）在窗体上有一个文本框Text1、Text属性值为空，然后编写下列事件过程： Privte Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String,n As Integer Str=UCase(Chr(KeyAscii) n=Len(str) Text1.Text=String(n,str) End Sub 程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为。A.pp B.pP C.PP D.Pp
[单选题]在窗体上有一个文本框Text1，Text属性值为空，然后编写下列事件过程：Private Sub Text1 KeyPress(KeyAscii As Integer)D．im str As String,n As Integerstr=UCase(Chr(KeyAscii))n=Len(str)Text1.Text=String(n,str)E．nd Sub程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为( )。A．ppB．pPC．PPD．Pp
[单选题]窗体上有名称分别为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（