（23）在窗体上画一个名为 Command1 的命令按钮，然后编写以下程序：Private Sub Command1_Click( )Dim M(10) As IntegerFor k=1 To 10M(k)=12-kNext kx=8Print M(2+M(x))End Sub运行程序，单击命令按钮，在窗体上显示的是（ ）。A）6B）5C）7D）8
题目
（23）在窗体上画一个名为 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
运行程序，单击命令按钮，在窗体上显示的是（ ）。
A）6
B）5
C）7
D）8
相似考题
参考答案和解析
23）【答案】A)
【解析】运算过程中K与m（k）的取值如下表所示：
更多“(23)在窗体上画一个名为 Command1 的命令按钮,然后编写以下程序: Private Sub Command1_Click( ) ”相关问题
-
第1题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A．
B．H
C．
D．
正确答案：A
【解析】分析程序，程序开始循环时i=1，j=1to1，PrintSUing(i，“Hello”)语句输出一个H，然后执行Print进行换行；当i=2时，j=1to2，PrintString(i，“Hello”)语句输出两行分别为两个HH，然后执行Print换行：当i=3时，退出循环。 -
第2题：
在窗体上画一个名为Command1的命令按钮，编写如下程序：
程序运行后，单击命令按钮，输出的结果是_________。
正确答案：
4
【解析】本题考查了数组的嵌套使用。程序首先通过一个For循环给数组M的各个数组元素赋值，然后通过数组下标嵌套本身。注意：这样的嵌套时，要保证数组下标不出界，否则程序将出错。 -
第3题：
在窗体上画一个名为Command1的 命令按钮,然后编写以下程序 Private Sub Command1_Click（) Dim a（10) as integer For k=10 to 1 Step -1 a（k)=20-2*k Next k k=k+7 Print a（k-a（k)) End Sub 运行程序后,单击命令按钮,输出结果是 。
A．18
B．12
C．8
D．6
B 解析：考查考生对文件操作语句的掌握情况。打开随机文件的一般格式为Open'文件名'For Random As#文件号[Len=记录长度]随机文件的写操作通过Put语句来实现,其格式为:Put#文件号,[记录号],变量文件指针的定位、读取文件等。 -
第4题：
在窗体上画一个名为Command1的命令按钮，然后编写以下程序：
Private Sub Command1 Click（ ） Dim a(10)As Integer Fork=10 To 1 Step-1 a(k)=20-2*k Next k k=k+7 Print a(k-a(k)) End Sub 运行程序，单击命令按钮，输出结果是（ ）。
A.18
B.12
C.8
D.6
正确答案：A
A。【解析】根据for循环先计算出数组a的值以及k的当前值是1，则a(k-a(k))=a(7-a(7))=a(7-6)=a(1)=18。 -
第5题：
(29）在窗体上画一个名为Command 1的命令按钮，然后编写以下程序：
Private Sub Commandl_lick()
Dim a(10) As Integer
For k＝10 To 1 Step-1
a(k)＝20-2*k
Next k
k＝k＋7
Print a(k-a(k))
End Sub
运行程序，单击命令按钮，输出结果是
A）18
B）12
C）8
D）6
正确答案：A