会VB的帮忙做几个简单的题!

#结束VB程序运行的命令是_________.
在文本框中通过______________属性能获得选取的文字。
启动窗体时为了初始化窗体中的各控件,可以在窗体的_______事件中编写代码。
产生一个10—99的随机整数的表达式是___________
要使标签Label1显示的文字为红色,在设计代码中可加入语句________________________
下列程序,文本框显示的结果是___________ private sub command1_click() Dim x as string, y as string x=”5” : y=”3” text1.text=x+y end sub
使命令按钮Command3获得焦点,应使用语句___________
使在某一条件下复选框check1禁用,应使其__________属性值为_____。
打开菜单编辑器进行菜单设计,应在VB的____________菜单下选取“菜单编辑器”。
要在列表框中第三条加上“上海”项目,应使用语句________________
判断题
Visual Basic是一个面象对象程序设计语言。( )
双击设计窗体中某个控件,该控件将出现在窗体左上角 ( )
标签控件只能显示文本信息,不能响应鼠标单击事件。( )
Visual Basic是事件驱动的编程机制。( )
VB中的所有对象都必须放置在窗体中。( )
命令按钮控件能分别响应鼠标单击事件和双击事件。( )
当窗体的Enabled属性为True时,窗体上的按钮、文本框等控件都会响应用户操作。( )
当窗体的Enabled属性为False时,窗体上的按钮、文本框等控件就不会响应用户操作。( )
当文本框编写有KeyPress事件时,在文本框中输入一个字符后,就立即执行了一次其KeyPress事件。( )
Rem和英文单引号(‘)都可用于注释语句( )
多个IF语句可共有一个End IF语句。( )
Do Until……Loop语句执行时,先判断条件,如果满足条件则执行循环体中的语句。( )
Do……Loop While语句执行时,先判断条件是否满足以决定是否执行循环体中的语句。( )
数组的下界一定是大于0的整数。( )
在调用函数时默认是按传值方式进行参数传递的。( )
如果要让某单选按钮处于选中状态,则Value属性应设为0。( )
同一数组中的各元素的数据类型必须一致。( )
使在某一条件下复选框check1处于选中,应使其Index属性值为1。
如果要时钟控件每秒钟发生一个Timer事件,则Interval属性应设为1。( )
编程 无图!
如图是一个系统登录界面,请编写其VB功能代码,要求单击“确定”command1按钮时实现:(1)如果用户名不是admin,则提示用户出错;(2)如果密码不是“123456”,则提示密码错误,之后输口令的文本框text2获得焦点;(3)文本框text2获得焦点则其文本处于选定状态;(4)连输三次口令不正确则结束程序;(5)单击“取消”command2按钮则程序结束。
#结束VB程序运行的命令是___End____.
在文本框中通过____Text______属性能获得选取的文字。
启动窗体时为了初始化窗体中的各控件,可以在窗体的__Load__事件中编写代码。
产生一个10—99的随机整数的表达式是___rnd()*89+10____
要使标签Label1显示的文字为红色,在设计代码中可加入语句____Label1.ForeColor=vbRed_____
下列程序,文本框显示的结果是____53_____ private sub command1_click() Dim x as string, y as string x=”5” : y=”3” text1.text=x+y end sub
使命令按钮Command3获得焦点,应使用语句____Command3.SetFocus____
使在某一条件下复选框check1禁用,应使其__Enabled__属性值为__False__。
打开菜单编辑器进行菜码灶灶单设计,应在VB的__工具__菜单下选取“菜单编辑器”。
要在列表框中第三条加上“上海”项目,应使用语句___list1.list(2)="上海"_____
判断题
Visual Basic是一个面象对象程序设计语言。(√)
双击设计窗体中某个控件,该控件将出现在窗体左上角 (×)
标签控件只能显示文本信息,不能响应鼠标单击事件。(×)
Visual Basic是事件驱动的编程机制。(√)
VB中的所有对象都必须放置在窗体中。(×)
命令按钮控件能分别响应鼠标单击事件和双击事件。(×)
当窗体的Enabled属性为True时,窗体上的按钮、文本框等控件都会响应用户操作。(√)
当窗体的Enabled属性为False时,窗体上的按钮、文本框等控件就不会响应用户操作。(√)
当文本框编写有KeyPress事件时,在文本框中输入一个字符后,就立即执行了一次其KeyPress事件。(√)
Rem和英文单引号(‘)都可用于注释语句(√)
多个IF语句可共有一个End IF语辩销句。(×)
Do Until……Loop语句执行时,先判断条件,如果满足条件则执行循环体中的语句。(×)
Do……Loop While语句执行时,先判断条件是否满足以决定是否执行循环体中的语句。(×)
数组的下界一定是大于0的整数。(×)
在调用函数时默认是按传值方式进行参数传递的。(×)
如果要让某单选按钮处于选中状态,则Value属性应设为0。(×)
同一数组中的各元素的数据类型必须一致。(√)
使在某一条件下复选框check1处于选中,应使其Index属性值为1。(×)
如果要时钟控件每秒钟发生一个Timer事件,则Interval属性应设为1。(×)
编程 无图!
如图是一个系统登录界面,请编写其VB功能代码,要求单击“确定”command1按钮时实现:(1)如果用户名不是admin,则提示用户出错;(2)如果密码不是“123456”,则提示密码错误,之后输口令的文本框text2获得焦点;(3)文本框text2获得焦点则其文本处于选定状态;(4)连输三次口令不正确则结束程序;(5)单击“取消”command2按钮则程序结束。

'包含注释的答案
dim n as integer
private sub command1_click()
'(1)如果用迟扮户名不是admin,则提示用户出错;
if text1.text <> "admin" then
msgbox "用户出错",64,"提示"
exit sub
end if
'(2)如果密码不是“123456”,则提示密码错误,之后输口令的文本框text2获得焦点;
if text2.text <> "123456" then
msgbox "密码错误",64,"提示"
text2.setfocus
'(3)文本框text2获得焦点则其文本处于选定状态;
text2.selstart=0
text2.sellength=len(text2.text)
'(4)连输三次口令不正确则结束程序;
n=n+1
if n>=3 then end
exit sub
end if
end sub
'(5)单击“取消”command2按钮则程序结束。
private sub command2_click()
end
end sub

'没注释的完整答案
dim n as integer
private sub command1_click()
if text1.text <> "admin" then
msgbox "用户出错",64,"提示"
exit sub
end if
if text2.text <> "123456" then
msgbox "密码错误",64,"提示"
text2.setfocus
text2.selstart=0
text2.sellength=len(text2.text)
n=n+1
if n>=3 then end
exit sub
end if
end sub
private sub command2_click()
end
end sub

保证合格!
前几次,都是这样的题,给人做了,很费辛苦,最后根本没分。所以,这样的题就不做了,太费精力。
我也留个脚印,看到100分,心痒痒,但是没心思做。
留个脚印,吃了饭,没人做,我做。
采纳答案留QQ