重要提示：
请勿将账号共享给其他人使用，违者账号将被封禁！
题目内容
（请给出正确答案）
A．大家一定要齐心协力地工作，创造一个良好的环境，发表各种不同看法。要做好经理。
B．为了共同的目标，好经理应该尊重各种不同意见，与大家一起工作，创造良好的氛围。
C．好经理能够创造一种氛围，让不同意见受到重视并且每个人都能为共同目标合作奋斗。
D．为了共同的目标，好经理应该能够提出各种宝贵的意见，为大家创造良好的工作氛围。
更多“Good managers can create an environment in which different opinions are valued and everyon”相关的问题
第1题
请阅读程序． 0ption Base 1 Private Sub Fo,m Click（） Dim Arr(4，4)As Integer For i=1 To 4 For j=1 To 4 Arr(i，j)=(i=1)*2+j Next j Next i For i=3 To 4 For j=3 To 4 Print Arr(j，i)； Next j Print Next i End Sub 程序运行后，单。旨窗体，则输出结果是（）。
A.5 7 6 8
B.6 8 7 9
C.7 9 8 10
D.8 10 8 11
第2题
阅读程序： Option Base 1 Private Sub Form. Click() Dim arr，Sum Sum= 0 arr=Array(1，3，5，7，9，11，13，15，17，19) For i=1 To 10 If arr(i)/3=arr(i)\3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为
A．13
B．14
C．27
D．15
第3题
执行以下Command1的Click事件过程在窗体上显示 Option Base 1 Private Sub Command1 Click() Dim a a= Array("a"， "b"， "C"， "d"， "e"， "f"， "g") Print a(1)； a(3)； a(5) End Sub
A．ab；
B．bdf
C．ace
D．出错
第4题
执行以下Command1的Click事件过程在窗体上显示 Option Base 1 Private Sub Command1_Click() Dim a a=Array("a"，"b"，"c"，"d"，"e"，"f"，"g") Print a(1)； a(3)； a(5) End Sub
A．abc
B．bdf
C．ace
D．出错
第5题
阅读程序： Option Base 1 Dim arr() As Integer Private Sub Form. Click() Dim i As Integer，i As Integer ReDim arr(3，2) For i=1 To 3 For j=1 To 2 arr(i，j)=i*2+j Next j Next i ReDim arr(3，2)+arr(3，4) End Sub 程序运行后，单击窗体，输出结果为
A．21
B．13
C．8
D．25
第6题
阅读程序： Option Base 1 Private Sub Form_Click() Dim art,Sum Sum=0 art=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3=arr(i)\3 Then Sum=Sum+art(i) End If Next i Pdnt Sum End Sub 程序运行后，单击窗体，输出结果为()。
A．13
B．14
C．27
D．15
第7题
阅读程序： Option Base 1 Private Sub Form_Click() Dim arr Sum Sum=0 arr=Array(1，3，5，7，9，11，13，15，17，19) For i=1 TO 10 If arr(i)/3=arr(i)\3 Then Sum=Sum+art(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为
A．13
B．14
C．27
D．15
第8题
有如下程序： Option Base 1 Private Sub Form. Click() Dim arr,Sum Sum=0 alt=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3=arr(i)\3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输出结果为______。
A． 25
B．26
C．27
D．28
第9题
有如下程序：
Option Base 1
Private Sub Command1 Click（）
Dim arr(10)
arr=Array(10，35，28，90，54，68，72，90)
For Eaeh a In arr
If a>50Then
Sum=Sum+a
End If
Next a
End Sub
运行上述程序时出现错误，错误之处是（）。
A.数组定义语句不对，应改为Dim arr
B.没有指明For循环的终值
C.应在For语句之前增加Sum=0
D.Next a应改为Next
客服
TOP
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“上学吧”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
