窗体上画一个名为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

查看完整题目与答案

随机题目

【单选题】体现国家环境法律的根本意志，国家的根本大法是?

① 宪法

② 法律

③ 行政法规

④ 地方性法规

查看完整题目与答案

【单选题】国务院依照宪法和法律制定的关于环境与资源保护方面的规范性文件是?

① 宪法

② 法律

③ 行政法规

④ 地方性法规

查看完整题目与答案

【单选题】在日本环境与资源保护法一般称为?

① 公害法

② 污染控制法

③ 环境保护法

④ 自然保护法

查看完整题目与答案

【单选题】下列对人类与环境的关系表述有误的是?

① 环境是人类赖以生存和发展的基本条件

② 人类能够主动地适应和改造环境

③ 随着科学技术的进步，人类可以逐步摆脱环境对人类的限制

④ 人类是环境的产物

查看完整题目与答案

【判断题】外国当事人可以向我国法院申请承认和执行外国法院作出的判决。

① 正确

② 错误

查看完整题目与答案

【多选题】仲裁裁决被人民法院裁定不予执行的，当事人（）。

① 可以根据双方达成的书面仲裁协议重新申请仲裁

② 可以向人民法院起诉

③ 不可以向人民法院起诉

④ 不可以申请重新仲裁

查看完整题目与答案

【多选题】消费者合同，适用消费者经常居所地法律；（），适用商品、服务提供地法律。

① 消费者选择适用商品、服务提供地法律

② 经营者在消费者经常居所地没有从事相关经营活动的

③ 经营者侵权的

④ 产品发生产品责任的

查看完整题目与答案

【多选题】我国（）涉外关系的法律适用中，当事人可以协议选择法律。

① 合同关系

② 夫妻财产关系

③ 动产物权关系

④ 侵权关系

查看完整题目与答案

【多选题】根据我国《民事诉讼法》和有关条约的规定，外国法院向位于我国领域内的当事人送达司法文书和司法外文书时，下列（）属于不得采用的送达方式？

① 外交途径送达

② 通过外交人员或领事向非派遣国国民送达

③ 邮寄直接送达

④ 司法程序中的利害关系人直接通过我国司法人员送达

查看完整题目与答案

【多选题】因在中华人民共和国履行的（）发生纠纷提起的诉讼，由中华人民共和国人民法院管辖。

① 中外合作经营企业合同

② 中外合资经营企业合同

③ 中外合作勘探开发自然资源合同

④ 中外买卖合同

查看完整题目与答案