窗体上画一个名为Command1的命令按钮，然后编写以下程序： Private Sub Command1_Click() Dim m(10) As Integer For k = 1 To 10 m(k) = 12 - k Next k x = 8 Print m(2 + m(x)) End Sub 运行程序，单击命令按钮，在窗体上显示的是。

【单选题】【消耗次数：1】

① 6

② 5

③ 7

④ 8

参考答案：

复制

纠错

相关题目

【单选题】设有如下程序： Option Base 0 Private Sub Form_Click() ??? Dim a ??? Dim i As Integer ??? a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9) ??? For i = 0 To 3 ??????? Print a(5 - i); ??? Next End Sub 程序运行后，单击窗体，则在窗体上显示的是？

① 6?5?4 3

② 5?4?3?2

③ 4?3?2 1

④ 7?6?5?4

查看完整题目与答案

【单选题】在窗体上画1个命令按扭（名称为Command1）和1个文本框（名称为Text1），然后编写如下事件过程： ???? Private Sub Command1_Click() ???? ? x=Val(Text1.Text) ???? ? Select Case x ???????? Case 1,3 ????????????? y=x*x ???????? Case Is>=10,Is<=-10 ????????????? y=x ???????? Case -10 To 10 ????????????? y=-x ?End Select ?????? End Sub 程序运行后，在文本框中输入3，然后单击命令按扭，则以下叙述中正确的是______。

① 先执行y=x*x，再执行y=-x

② 执行y=-x

③ 执行y=x*x

④ 程序出错

查看完整题目与答案

【单选题】假定在窗体是有两个命令按钮Command1和Command2及一个文本框Text1。有如下事件过程代码： Private Sub command1_click() Text1.Text = 中国 End Sub Private Sub command2_click() Text1.Text = China End Sub 若首先单击command1，再单击Command2，则在文本框中显示（）。

① China

② 中国

③ China中国

④ 中国China

查看完整题目与答案

【单选题】在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() ??? a = InputBox(Enter an integer) ??? b = InputBox(Enter an integer) ??? Text1.Text = b + a End Sub 程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示的内容是______。

① 出错

② 18

③ 810

④ 108

查看完整题目与答案

【简答题】已知函数。下面是实现计算该函数的程序，请填空完成以下程序。 Private Sub Command1_Click() Dim k As Integer, i As Integer, s As Long n = 5 : k = 1 For i = 1 To n s = s +[填空] Next i Print s End Sub Function pow(a As Integer, b As Integer) As Long Dim i As Integer, t As Long t = 1 For i = 1 To a [填空] Next i pow = t End Function

查看完整题目与答案

【单选题】在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程： Private Sub Command1_Click() ??? CommonDialog1.FileName = ??? CommonDialog1.Filter=All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt ??? CommonDialog1.FilterIndex=2 ??? CommonDialog1.DialogTitle=VBTest ??? CommonDialog1.Action=1 End Sub 对于这个程序，以下叙述中错误的是______。

① 在该对话框中指定的默认文件类型为文本文件(*.Txt)

② 在该对话框中指定的默认文件名为空

③ 该对话框的标题为VBTest

④ 该对话框被设置为打开对话框

查看完整题目与答案

【单选题】设执行以下程序段时依次输入1、3、5，执行结果为______。 ??? Dim a(4) As Integer, b(4) As Integer ??? For K = 0 To 2 ??????? a(K + 1) = Val(InputBox(请输入数据)) ??????? b(3 - K) = a(K + 1) ??? Next K ??? Print b(K)

① 0

② 3

③ 5

④ 1

查看完整题目与答案

【单选题】有以下程序，执行后输出结果是（） main（　） { int m[][3]={1,4,7,2,5,8,3,6,9}; int i,j,k=2; for(i=0;i { printf(%d ,m[k][i]); } }

① 4 5 6

② 2 5 8

③ 3 6 9

④ 7 8 9

查看完整题目与答案

【单选题】以下程序段运行后变量k的值为（）。intm=7,n=2,k;k=(m^n)

① 0

② 98

③ 20

④ 10

查看完整题目与答案

【简答题】下列程序段的运行结果是[填空] 。 Private Sub Form_Click() Dim a(3) As Long a(0) = 1: a(1) = 2: a(2) = 3: a(3) = 4 j = 1 For i = 3 To 0 Step -1 s = s + a(i) * j j = j * 10 Next i Print s End Sub

查看完整题目与答案

随机题目

【多选题】以下各项应在“税金及附加”账户核算的有（）。

① 城市维护建设税

② 消费税

③ 资源税

④ 教育费附加

查看完整题目与答案

【单选题】对于哪类客户，推销员不要给对方提供太多的选择或者建议。（　）　

① 孤独型

② 犹豫不决型

③ 谨小慎微型

④ 擅长交际型

查看完整题目与答案

【单选题】对推销人员进行业绩评估时，最重要的资料来源是(　)。　

① 推销记录

② 推销报告

③ 客户意见

④ 同事意见

查看完整题目与答案

【单选题】当企业的产品种类繁多或产品技术复杂、产品间毫无关联时，通常可考虑采用哪种组织形式（　）　　

① 地区式组织

② 产品管理式组织

③ 市场管理式组织

④ 职能式组织

查看完整题目与答案

【单选题】哪种报酬形式缺乏灵活性和激励性，还可能造成推销成本失控，以致企业出现亏损？（　）　

① 薪金制

② 佣金制

③ 薪金加奖励制

④ 奖励制

查看完整题目与答案

【单选题】善于分析，喜欢收集信息，提出的问题比其他类型的购买者多，这类客户我们称之为（　　）客户。　

① 孤独型

② 犹豫不决型

③ 谨小慎微型

④ 理智型

查看完整题目与答案

【单选题】建议客户购买与某件商品相关的物品时，最好的时机应当是：（　）　　

① 在商品买卖成交前

② 在客户完成购买准备离开时

③ 在包装商品和收款前

④ 客户购买商品付款后

查看完整题目与答案

【单选题】在客户逛商店时，再次回到了原先看过的某个商品时，售货员此时应当（　），能够更好地实现交易？　

① 给客户较大的空间

② 采取主动法为客户介绍商品

③ 采取松动模式

④ 多向客户提问题以了解基本情况

查看完整题目与答案

【单选题】以下哪种类型的客户，接待工作是最容易的？（　）　

① 有明确的寻求模式

② 有寻求模式但不具体

③ 没有明确的寻求模式

④ 有模糊的寻求模式

查看完整题目与答案

【单选题】企业可先把推销力量集中在企业的主要产品、主要市场上，然后根据企业推销量的增加，市场范围的扩大，逐步增加推销人员。这种确定推销人员量的方法叫做（　）　

① 工作量法

② 估量法

③ 增量法

④ 减量法

查看完整题目与答案