原创力文档- 1、本文档共4页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
vb基础第7章习题
第七章习题
班级（专业） ______________ 姓名 ______________ 学号 ______________
选择题
1、下面的数组声明语句中正确的是（ ）。
（A）Dim A [3,4] As Integer （B）Dim A (3,4) As Integer
（C）Dim A [3;4] As Integer （D）Dim A (3:4) As Integer
2、设有数组声明语句：
Option Base 0
Dim B(-1 To10，2 To9，20) As Integer
则数组B中共有（ ）个元素。
（A）1800 （B）1848 （C）2016 （D）2310
3、以下说法不正确的是（ ）。
使用ReDim语句可以改变数组的维数
使用ReDim语句可以改变数组的类型
使用ReDim语句可以改变数组每一维的大小
使用ReDim语句可以对数组中的所有元素进行初始化
4、使用复制、粘贴的方法建立了一个命令按钮数组Command1，以下对该数组的说法错误的是（ ）。
命令按钮的所有Caption属性都是Command1
在代码中访问任意一个命令按钮只需使用名称Command1
命令按钮的大小都是相同的
命令按钮共享相同的事件过程
5、在窗体上用复制、粘贴的方法建立了一个命令按钮的数组，数组名为M1。设窗体Form1标题为“myform1”，双击控件数组中的第三个按钮，打开代码编辑器，写下如下代码：
Private Sub M1_Click (Index As Integer)
Form1.Caption=”myform2”
End Sub
运行时，单击按钮数组中的第一个按钮，窗体标题为（ ）。
（A）Form1 （B）M1 （C）myform1 （D）myform2
写出下列程序段的执行结果。
Dim A(5) 运行结果：
For I =1 To 5
A(I)=I*I
Next I
Print A(I-1)
2、 Dim X(3，5) 运行结果：
For I =1 To 3
For J =1 To 5
X（I，J）=X（I-1，J-1）+I+J
Next J
Next I
Print X(3，4)
3、Dim A(4) 运行结果：
N=3
A(1)=1
For K =0 To N-1
For L =1 To K+1
X=K+2-L
A(X)= A(X)+ A(X-1)
If KN-1 Then Exit For
Print A(X);
Next L
Next K
4、Dim A(5) 运行结果：
For I =0 To 4
A(I)=I+1
M=I+1
If M=3 Then A(M-1)= A(I-2) Else A(M)= A(I)
If I=3 Then A(I+1)= A(M-4)
A(4)=I
Print A(I);
Next I
Dim A(5，5) As Integer 运行结果：
For I =1 To 5
For J =1 To 5
A（I，J）= I –J
Print A（I，J）;
Next J
Print
Next I
For Each X In A
S=S+X
Next X
Print “S=”;S
二 、程序填空
下面程序代码实现单击命令按钮Command1时输出如下结果：
1 -1 -1
1 1 -1
1 1 1
Private Sub Command1_Click ()
Dim X(3,3)
For I= 1 To 3
For J= 1 To 3
If (1) Then X(I,J)=1
If (2) Then X(I,J)= -1
Next J
Next I
For I= 1 To 3
For J= 1 To 3
Print X(I, J);
Next J
(3)
Next I
End Sub
2、以下程序代码实现单击命令按钮Command1时生成20个（0，1
文档评论（0）