A.《卓越绩效评价准则》标准的内容比ISO 9001标准更全面、系统
B.《卓越绩效评价准则》标准兼容了ISO 9001、ISO 9004标准的要求
C.ISO 9001侧重于关注满足顾客要求,《卓越绩效评价准则》标准更关注组织绩效
D.《卓越绩效评价准则》不包含ISO 9004的要求
第1题
单击命令按钮,并在对话框内依次输入5,7,6下列程序段的执行结果为______。 Private Sub Command1_Click() Dim n AS Integer, a As Integer, b As Integer, c As Integer n = 0 For i = 1 To 3 a = InputBox ("请输入数字") n = n+a*a If n > 50 Then GoTo ex End If Next i ex: Print n End Sub
A.25
B.74
C.85
D.110
第2题
下列程序执行后,按住Cbl键并在文本框中输入a,则在窗体上输出的结果为 ______。 Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print keyCode, Shift End Sub
A.a 2
B.65 2
C.97 1
D.97 2
第3题
下列程序执行后,按住<Ctrl>键,并在文本框中输入“a”,则在窗体上输出结果为()。 Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print KeyCode,Shift End Sub
A.a 2
B.65 2
C.97 1
D.97 2
第4题
运行下面的程序,单击命令按钮后,当输入分别为123和456时,输出结果为 ______。 Private Sub Command1_Click() a=InputBox("请输入一个数字:") b=Val(InputBox("请再输入一个数字:")) PrInt a+b End Sub
A.123
B.456
C.123123
D.579
第5题
执行下列程序后,鼠标单击窗体,输出结果为
Private Sub Form_Click()
Print "Click";
End Sub
Private Sub Form_mouseDown(Button As Integer,Shift
As Integer, X As Single, Y As Single)
Print "Donw"
End Sub
Private Sub Form_MouseUp(ButtonAsInteger,Shift
As Integer, X As Single, Y As Single)
Print "Up"
End Sub
A.DownUpClick
B.ClickDownUp
C.DownClickUp
D.UpDownClick
第6题
执行下列程序后,鼠标单击窗体,输出结果为
Private Sub Form_Click()
Print "Click";
End Sub
Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
Print "Donw"
End Sub
Private Sub Form_MouseUp(ButtonAs Integer,Shift As Integer,X As Single,Y As Single)
Print "Up"
End Sub
A.DownUpClick
B.ClickDownUp
C.DownClickUp
D.UpDownCliek
第7题
执行下列程序后,鼠标单击窗体,输出结果为。 Private Sub Form_Click() Print“Click”; End Sub Private Sub Form_MouseDown(Button As Integer,Shift_ As Integer,X As Single,Y As Single) Print “Donw” End Sub Private Sub Form_MouseUp(Button As Integer,Shift_ As Integer,X As Single,Y As Single) Print“Up” End Sub
A.DownUpClick
B.ClickDownUp
C.DownClickUp
D.UpDownClick
第8题
执行下列程序后,鼠标单击窗体,输出结果为 Private Sub Form_Click() Print "Click"; End Sub Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) Print "Donw" End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As single) Print "Up" End Sub
A.DownUpClick
B.ClickDownUp
C.DownClickUp
D.UpDownclick
第9题
执行下列程序后,鼠标单击窗体,输出结果为 Private Sub Form_Click() Print"Click": End Sub Private Sub Form_MouseDown(Button As Integer,Shift_As Integer,X As Single,Y As Single) Print"Donw" End Sub Private Sub Form_MouseUp(Button As Integer,Shift_As Integer,X As Single,Y As Single) Print"Up" End Sub
A.DownUpClick
B.CfickDownUp
C.DownClickUp
D.UpDownClick
第10题
窗体上有一个按钮和一个列表框,执行下列程序后的输出结果为【 】。
Private Sub Command1_Click()
List1.Addltem"China"
List1.Addltem"USA"
List1.Addltem"Japan",1
Print List1.List(2)
End Sub
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!