更多"______内主要安排文本框或其他类型控件显示分组统计数据。"的相关试题:
[填空题]______内主要安排文本框或其他类型控件显示分组字段等数据信息。
[填空题]窗体上有一个文本框控件,名称为txt1,要求每隔一秒在文本框中显示一次当前时间。请填空。
Private Sub Form Load( )
Me.TimerInterval=1000
End Sub
Private Sub
Me! txt1=Now( )
End Sub
[填空题]在窗体上有一个文本框控件,要求每隔一秒在文本框中显示一次当前时间,除了要设置窗体的计时器间隔为1秒外,还需要设计______事件。
[填空题]在窗体上有一个文本框控件,要求每隔一秒在文本框中显示一次当前时间,除了要没置窗体的计时器间隔为1秒外,还需要设计______事件。
[填空题]要使文本框获得输入焦点,则应采用文本框控件的______方法。
[单项选择]在窗体上画四个文本框,并用这四个文本框建立一个控件数组,名称为Text1(下标从0开始,依次增大),然后编写如下事件过程:
Private Sub Command1_Click( )
For Each TextBox In TeXt1
Text1(i)=Text1(i).Index
i=i+1
Next
End Sub
程序运行后,单击命令按钮,四个文本框中显示的内容分别为 ______。
A. 0 1 2 3
B. 1 2 3 4
C. 0 1 3 2
D. 出错信息
[单项选择]在窗体上画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 3
B. 1 2 3 4
C. 0 1 3 2
D. 出错信息
[单项选择]在窗体上画四个文本框(如图所示),并用这四个文本框建立一个控件数组,名称为Text1(下标从0开始,自左至右顺序增大),然后编写如下事件过程: Private Sub Command1_Click( ) For Each Text Box ln Text1 Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后,单击命令按钮,四个文本框中显示的内容分别为
A. 01 2 3
B. 1 2 3 4
C. 01 3 2
D. 出错信息
[填空题]对窗体test上文本框控件txtAge中输入的学生年龄数据进行验证。要求:该文本框中只接受大于等于15且小于等于30的数值数据,若输入超出范围则给出提示信息。该文本控件的BeforeUpdate事件过程代码如下,请在空白处填入适当的语句,使程序可以完成指定的功能。
Private Sub txtAge_BeforeUpdate(Cancel As Integer)
If Me!txtAge=" "or______(Me! txtAge)Then
数据为空时的验证
MsgBox"年龄不能为空!",vbCritical,"警告"
Cancel=True 取消BeforeUpdate事件
ElseIf IsNumeric(Me! txtAge)=False Then
非数值数据输入的验证
MsgBox"年龄必须输入数值数据!",vbCritical,"警告"
Cancel=True 取消BeforeUpdate事件
ElseIf Me!txtAge<15 Or Me!txtAge______Then
非法范围数据输入的验证
MsgBox”年龄为15~30范围数据!",vbCritical,"警告"
Cancel=True 取消BeforeUpdate事件
Else 数据验证通过
MsgBox"数据验证OK!",vblnformation,"通告"
End If
Fnd Sub
[填空题]VisualBasic中有一种控件组合了文本框和列表框的特性,这种控件是______。
[填空题]对窗体Test上文本框控件txtAge中输人的学生年龄数据进行验证。要求:该文本框中只接受大于等于15且小于等于30的数值数据,若输入超出范围则给出提示信息。该文本控件的BeforeUpdate事件过程代码如下,请在空白处填入适当的语句,使程序可以完成指定的功能。
Private Sub txtAge_BeforeUpdate(Cancel As Integer)
If Me!txtAge=" "Or (14) (Me!txtAge)Then
’数据为空时的验证
MegBox"年龄不能为空!",vbCritical,"警告"
Cancel=Ture ’取消BeforeUpdate事件
Else If IsNumeric(Me!txtAge)=False Then
’非数值数据输入的验证
MsgBox"年龄必须输入数值数据!",vbCritical,"警告"
Cancel=True ’取消BeforeUpdate事件
Else If Me!txtAge<15 Or Me! txtAge (15) Then
’非法范围数据输入的验证
MsgBox"年龄为15-30范围数据!",vbCritical,"警告"
Cancel=True
Else
MsgBox"数据验证OK!",vblnformation,"通告"
End If
End Sub