题目内容
（请给出正确答案）
Private Sub Commandl_Click（）
Counter=0
For i=1 To 4
For j=6 To 1 Step -2
Counter=Counter+1
Next j
Next i
Label1.Caption=Str（Counter）
End Sub
程序运行后，单击命令按钮，标签中显示的内容是（）。 A．11
B．12
C．16
D．20
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
更多“在窗体上面画一个命令按钮和一个标签，其名称分别为 Command1和 Label1，然后编写如下事件”相关的问题
Sub S(X As Integer，y As Integer)
Static z As Integer
y=x*x+Z
z=y
End Sub
Private Sub Command1 Click（）
Dim i As Integer．z As Integer
m=0
z=0
For i=1 T0 3
S i，Z
m=m+z
Next i
Label1．Caption=Str(m)
程序运行后，单击命令按钮，在标签中显示的内容是（）。
A.50
B.20
C.14
D.7
A、6
B、135
C、246
D、123456
E、24
Sub S(x As Integer，Y As Integer)
Static z As Integer
y=x*x+z
z=y
End Sub
Private Sub Command1_Click()
Dim i As Integer，z As Integer
m=0
z=0
For i=1 To 3
S i，z
m=m+z
Next i
Label1．Caption=Str(m)
End Sub
程序运行后，单击命令按钮，在标签中显示的内容是
A．50
B．20
C．14
D．7
Option Base 0
Private Sub Command1_Click（）
Dim A （4）As Integer,B（4） As Integer
For k=0 To 2
A（k+1）=InputBox（“ 请输入一个整数 ”）
B（3-k）=A（k+1）
Next k
Print B（k）
End Sub
程序运行后，单击命令按钮，在输入对话框中分别输入2、4、6，输入结果为（）。 A．0
B．2
C．3
D．4
A．若 d 盘根目录下无 Text.txt 文件，则该语句创建此文件
B．用该语句建立的文件的文件号为 1
C．该语句打开 d 盘根目录下一个已存在的文件 Text.txt ，之后就可以从文件中读取信息
D．执行该语句后，就可以通过 Print# 语句向文件 Text.txt 中写入信息
A．顺序文件中的数据只能按顺序读写
B．对同一个文件，可以用不同的方式和不同的文件号打开
C．执行Close 语句，可将文件缓冲区中的数据写到文件中
D．随机文件中各记录的长度是随机的
A．软件测试的目的是证明程序是否正确
B．软件测试的目的是使程序运行结果正确
C．软件测试的目的是尽可能多地发现程序中的错误
D．软件测试的目的是使程序符合结构化原则
Private Sub Form_Click（）
Dim n As Integer, s As Integer
n = 8
s = 0
Do
s = s + n
n = n - 1
Loop While n > 0
Print s
End Sub
以上程序的功能是______。程序运行后，单击窗体，输出结果为______。
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
