A.公司宣传部没有事先跟其他部门沟通,宣传中缺少针对性。
B.由于忽视了奥斯卡获奖片自身具有免费宣传效应,公司宣传部的投入事实上过大。
C.公司宣传部的投入力度不足,《泰坦尼克号》在滨海上映时,滨海公司宣传投入了300万元。
D.公司宣传部的宣传在创意和形式上没有新的突破。
第1题
程序代码如下,当单击窗体上的Command1控件时,窗体上显示的结果是()。 Private Sub Command1_Click() Dim i As Integer,a(9)As Integer For i=9 To 0 Step-1 a(i)=10-i Next i Print a(2); a(5);a(8) End Sub
A.2 5 8
B.7 4 1
C.8 5 2
D.3 6 9
第2题
程序代码如下,当单击窗体上的Command1控件时,在窗体上输出的结果是()。 Private Sub Command1_Click() Dim aa(3,3)As Integer Dim i As Integer,j As Integer Dim s As Integer For i=0 To 3 For j=0 To 3 aa(i,j)=i*4+j+1 Next j Next i For i=0 To 3 s=s+aa(i,1) Next i Print s End Sub
A.32
B.28
C.30
D.36
第3题
程序代码如下,当单击窗体上的Command1控件时,窗体上显示的结果是()。 Private Sub Command1_Click() Dim i As Integer,k As Integer Dim a(9) As Integer,p(2)As Integer k=5 For i=0 To 9 a(i)=i Next i For i=0 To 2 p(i)=a(i*(i+1)) Next i For i=0 To 2 k=k+p(i)*2 Next i Print k End Sub
A.20
B.21
C.22
D.23
第4题
程序代码如下,当单击窗体上的Command1控件时,窗体上显示的结果是()。 Option Base 1 Private Sub Command1_Click() Dim i As Integer Dim x(3,3)As Integer For i=1 To 3 For j=1 To 3 x(i,j)=(i-1)*3+j Next j Next i For i=1 To 3 Print x(i,4-i); Next i End Sub
A.1 5 9
B.1 4 7
C.3 5 7
D.3 6 9
第5题
在窗体上画了两个按钮控件Command1和Command2,有如下程序: Private Sub Command1_Click() Print "Visual"; End Sub Private Sub Command2_Click() Print "Basic"; End Sub Private Sub Form_Load() CommandCancel=True Command1.Cancel=True End Sub 执行程序后,按键盘Cancel键,在窗体上输出的结果是
A.Basic
B.Visual
C.Cancel
D.True
第6题
在窗体上添加一个名称为Command1的命令按钮,然后编写如下事件代码:
private Sub Command1 Click()
Dima(10,10)
Form=2 To 4
Forrn=4 To 5
a(m,n)=m*n
Next n
Next m
MsgBoxa(2,4)+a(3,5)+a(4,5)
End Sub
打开窗体运行后,单击命令按钮,则消息框的输出结果是()。
A.23
B.33
C.43
D.53
第7题
在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:
Private Sub Command1_Cliek
Dim b, k
For k = 1 to 6
b=23+k
Next k
MsgBox b + k
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是【 】。
第8题
(15 )在窗体上添加一个命令按钮(名为 Command1 ),然后编写如下事件过程:
Private Sub Command1_Click ()
Dim b,k
For k=1 to 6
b=23+k
Next k
MsgBox b+k
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是 【 15 】 。
第9题
单击窗体上的命令按钮Command1,程序的输出为【 】。 Private Sub Command1_Click() a="AbC" b="dEF" c=UCase(A)+LCase(B) Print Asc(C) End Sub
第10题
在窗体上添加一个名称为Command1的命令按钮,然后编写如下事件代码:
Private Sub Command1_Click()
A=75
If A<60 Then x=1
If A<70 Then x=2
If A<80 Then x=3
If A<90 Then x=4
MsgBox x
End sub
打开窗体运行后,单击命令按钮,则消息框的输出结果是()。
A.1
B.2
C.3
D.4
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!