题目内容 (请给出正确答案)
[单选题]

获得奥斯卡大奖的影片《泰坦尼克号》在滨州上映,滨州独家经营权给了滨州电影发行放映公司。公司各部门可忙坏了,宣传部投入了史无前例的170万元进行各种形式的宣传,业务部组织了8家大影院超前放映和加长档期,财务部具体实施与各影院的收入分账,最终几乎全市的老百姓都去看了这部片子,公司赚了750万元。而公司在总结此项工作时却批评了宣传部此次工作中的失误。以下哪项如果为真,最能合理地解释上述情况?

A.公司宣传部没有事先跟其他部门沟通,宣传中缺少针对性。

B.由于忽视了奥斯卡获奖片自身具有免费宣传效应,公司宣传部的投入事实上过大。

C.公司宣传部的投入力度不足,《泰坦尼克号》在滨海上映时,滨海公司宣传投入了300万元。

D.公司宣传部的宣传在创意和形式上没有新的突破。

查看答案
如搜索结果不匹配,请 联系老师 获取答案
您可能会需要:
您的账号:,可能会需要:
您的账号:
发送账号密码至手机
发送
更多“获得奥斯卡大奖的影片《泰坦尼克号》在滨州上映,滨州独家经营权…”相关的问题

第1题

程序代码如下,当单击窗体上的Command1控件时,窗体上显示的结果是()。Private Sub Command1_Click(

程序代码如下,当单击窗体上的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_Clic

程序代码如下,当单击窗体上的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(

程序代码如下,当单击窗体上的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 1Private Sub Co

程序代码如下,当单击窗体上的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 "

在窗体上画了两个按钮控件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(

在窗体上添加一个名称为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_CliekDim

在窗体上添加一个命令按钮(名为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_C

(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

单击窗体上的命令按钮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(

在窗体上添加一个名称为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

点击查看答案
热门考试 全部 >
相关试卷 全部 >
账号:
你好,尊敬的上学吧用户
发送账号至手机
获取验证码
发送
温馨提示
该问题答案仅针对搜题卡用户开放,请点击购买搜题卡。
马上购买搜题卡
我已购买搜题卡, 登录账号 继续查看答案
重置密码
确认修改
谢谢您的反馈

您认为本题答案有误,我们将认真、仔细核查,
如果您知道正确答案,欢迎您来纠错

警告:系统检测到您的账号存在安全风险

为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!

微信搜一搜
上学吧
点击打开微信
警告:系统检测到您的账号存在安全风险
抱歉,您的账号因涉嫌违反上学吧购买须知被冻结。您可在“上学吧”微信公众号中的“官网服务”-“账号解封申请”申请解封,或联系客服
微信搜一搜
上学吧
点击打开微信