题目内容（请给出正确答案）

[主观题]

作业人员的培训教育，包括：（） A．入厂安全培训教育B．车间安全培训教育C．岗位安全培训

作业人员的培训教育，包括：（）

A．入厂安全培训教育

B．车间安全培训教育

C．岗位安全培训培育

D．安全三级教育

查看答案

如搜索结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装上学吧APP，拍照搜题省时又省心！

更多“作业人员的培训教育，包括：（） A．入厂安全培训教育B．车间…”相关的问题

第1题

运行下列程序：Private Sub Form_Click（)Dim sum As Double, i As IntegerFor i = 1 To 20If i

运行下列程序：

Private Sub Form_Click()

Dim sum As Double, i As Integer

For i = 1 To 20

If i Mod 5 = 0 Then

sum = sum + i

End If

Next i

Print sum

End Sub

单击窗体后，则在窗体上显示的结果是()。

A.50

B.100

C.4

D.5050

点击查看答案

第2题

有如下程序：Private Sub Form_Click（)Dim i As Integer, Sum As Integer Sum = 0 For i = 2 To

有如下程序： Private Sub Form_Click() Dim i As Integer, Sum As Integer Sum = 0 For i = 2 To 10 If i Mod 2＜＞0 And i Mod 3=0 Then Sum = Sum + i End If Next Print Sum End Sub 程序运行后，单击窗体，输出结果为

A．12

B．30

C．24

D．18

点击查看答案

第3题

有如下程序：Private Sub Form_Click（) Dim i As Integer, Sum As Integer sum=0 For i=2 To 10 I

有如下程序： Private Sub Form_Click() Dim i As Integer, Sum As Integer sum=0 For i=2 To 10 If i Mod 2＜＞0 And i Mod 3=0 Then sum=sum+i End If Next i Print sum End Sub 程序运行后，单击窗体，输出结果为______。

A．12

B．30

C．24

D．18

点击查看答案

第4题

有如下程序: Private Sub Form_Click（)Dim i As Integer, Sum As Integer Sum=0 For i=2 To 10 I

有如下程序:

Private Sub Form_Click()

Dim i As Integer, Sum As Integer

Sum=0

For i=2 To 10

If i Mod 2=0 And i Mod 3<>0 Then

Sum=Sum+i

End If

Print Sum

End Sub

程序运行后,单击窗体,输出结果为

A．12

B．30

C．24

D．18

点击查看答案

第5题

有如下程序：Option Base 1 Private Sub Form_Click（) Dim arr,Sum Sum=0 For i=1 To 10If arr（i)

有如下程序：

Option Base 1

Private Sub Form_Click()

Dim arr,Sum

Sum=0

For i=1 To 10

If arr(i)/3=arr(i)\3 Then

End If

Next i

End Sub

程序运行后，单击窗体，消息框的输出结果为()。

点击查看答案

第6题

有如下程序: Private Sub Form_Click（)Dim i As Integer, Sum As Integer Sum=0 For i=2 To 10 I

有如下程序:

Private Sub Form_Click()

Dim i As Integer, Sum As Integer

Sum=0

For i=2 To 10

If i Mod 2<>0 And i Mod 3=0 Then

Sum=Sum+i

End If

Print Sum

End Sub

程序运行后,单击窗体,输出结果为

A．12

B．30

C．24

D．18

点击查看答案

第7题

有如下程序：Private Sub Form_Click（)Dim i As Integer，Sum As IntegerSum=0For i=2 To 10If i M

有如下程序：

Private Sub Form_Click()

Dim i As Integer，Sum As Integer

Sum=0

For i=2 To 10

If i Mod 2＜＞0 And i Mod 3=0 Then

Sum=Sum+i

EndIf

Print Sum

End Sub

程序运行后，单击窗体，输出结果为

A．12

B．30

C．24

D．18

点击查看答案

第8题

设有如下程序：Private Sub Form_Click（)Dim ary（1 To 5)As IntegerDim i As IntegerDim sum As I

设有如下程序：

Private Sub Form_Click()

Dim ary(1 To 5)As Integer

Dim i As Integer

Dim sum As Integer

For i=1 To 5

ary(j)=i+1

sum=sum+ary(i)

Next 1

Print sum

Eud Sub

程序运行后，单击窗体，则在窗体上显示的是

A．15

B．16

C．20

D．25

点击查看答案

第9题

有如下程序： Private Sub Form_Click（) Dim i As Integer, Sum As IntegerSum = 0For i = 2 To

有如下程序： Private Sub Form_Click() Dim i As Integer, Sum As Integer Sum = 0 For i = 2 To 10 If i Mod 2=0 And i Mod 3＜＞0 Then Sum = Sum + i End If Next Print Sum End Sub 程序运行后，单击窗体，输出结果为

A．12

B．30

C．24

D．18

点击查看答案

第10题

阅读程序： Option Base 1 Private Sub Form_Click（)Dim arr，SumSum=0arr=Array（1，3，5，7，9，11，13，

阅读程序： 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

点击查看答案