在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
Private Sub Command1_Click()
Dim I As Integer
If Text1.Text<>"Gong" Then
I = MsgBox("密码错误", 5 + vbExclamation, "输入密码")
If I<>4 Then
End
Else
Text1.Text = ""
Text1.SetFocus
End If
Else
MsgBox "密码帐号正确!"
End If
End Sub
若在text1中输入字符串"Gong",则程序运行结果为()
A.显示对话框,提示"密码帐号正确!"
B.显示对话框,提示"密码错误"
C.程序出错
D.没有任何提示
第1题
在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序:
Private Sub Text1_LostFocus( )
If Not IsNumeric(Text1) Then
MsgBox "帐号有非数字字符错误"
Text1.Text = ""
Text1.SetFocus
else
MsgBox "帐号正确"
End If
End Sub
当在text1文本框中输入字符"abc"之后,单击命令按钮,结果为()
A.显示对话框,提示信息为"帐号正确"
B.显示对话框,提示信息为"帐号有非数字字符错误"
C.程序出错
D.没有任何提示
第2题
以下程序段运行的结果为()
Private Sub Form_Click( )
MyDate = #7/21/1997#
Print Format(MyDate, "dddd,mmmm,dd,yyyy")
End Sub
A.21,07,1997
B.21,07,21,1997
C.Monday,July,21,1997
D.Monday,07,21,1997
第3题
以下程序段运行的结果为()
Private Sub Form_Click( )
MyTime = #9:21:30 PM#
MyDate = #7/21/1997#
Print Tab(2); Format(MyDate, "mmmm-yy")
Print Tab(2); Format(MyTime, "hh:mm:ss A/P")
End Sub
A.July-97 9:21:30 P
B.July-97 09:21:30 P
C.07-97 9:21:30 P
D.July-97 9:21:30
第4题
确定一个窗体或控件的大小的属性是()
A.Width或Height
B.Top和Width
C.Top或Left
D.Top和Left
第5题
确定一个控件在窗体上的位置的属性是()
A.Width或Height
B.Top和Height
C.Top或Width
D.Top和Left
第6题
为了同时改变一个活动控件的高度和宽度,正确的操作是()
A.拖拉位于控件左上角
B.只能拖拉位于控件右下角
C.只能拖拉位于控件左下角
D.不能同时改变控件的高度和宽度
第7题
用户在屏幕上画出应用程序界面,并设置好对象的属性,系统便可以自动生成程序代码,这称为()
A.面向对象的程序设计
B.结构化程序设计
C.事件驱动的编程机制
D.程序设计
第8题
,预先应执行的操作是()
A.单击窗体上有控件的地方
B.单击任一个控件
C.不执行任何操作
D.双击窗体的标题栏
第9题
VB集成开发环境开发的应用程序不适宜的运行环境是()
A.WINDOS 32
B.WINDOWS 9X
C.WINDOWS NT
D.WINDOWS 2000
第10题
为了把窗体上的某个控件变为活动的,应执行的操作是()
A.单击窗体的空白处
B.单击该控件的内部
C.双击该属性列表框
D.双击窗体
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!