原创力文档- 1、本文档共8页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
VB计算机题1
选择题
1、下列符号常量的声明中，___Const a As Double =Sin(1) ___是不合法的。
2、表达式(-1)*Sgn(-100+Int(Rnd*100))的值是___1___。
3、以下叙述中错误的是__在同一窗体的菜单项中，不允许出现标题相同的菜单项。
4、如果单击一个当前没有被选中的复选框，其他已被选中的复选框会处于_选中__状态。
5、程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是___Load 。
6、下列程序段的执行结果为 _____0 2 2 3 ___。
Dim M(2)
For i=1 To 2
M(i)=0
Next i
K=2
For i=1 To k
For j=1 TO k
M(j)=M(i)+1
Print M(k);
Next j
Next i
7、下列程序段的执行结果为_____18_______
Dim A(5, 5) As Integer
For i = 1 To 3
For j = 1 To 4
A(i, j) = i * j
Next j
Next i
Print A(2, 3) + A(3, 4) + A(4, 5)
8、假设通用声明段中有语句Option base 1，过程中定义数组：Dim a(6) as Integer，则以下引用数组元素的语句中正确的是___a(n + 3) = a(n+1) + a(n+2)。
9、执行下面的程序，输出结果是_____18 30______。
Option Explicit
Private Sub Form_Click()
Dim M As Integer,N As Integer
M=1:N=2
Print M+N+F(M,N)
M=2:N=1
Print F(M,N)+F(M,N);
End Sub
Private Function F(X As Integer,Y As Integer)
X=X+Y
Y=X+3
F=X+Y
10、调用由语句Private Sub Convert(Y As Integer)定义的Sub过程时，以下不是按值传递的是______Convert X_____。
11、设有如下程序
Option Base 1 GetArray过程的参数n 是按值传送的
Private Sub Command1_Click()
Dim a(10) As Integer
Dim n As Integer
n = InputBox(输入数据)
If n 10 Then
Call GetArray(a, n)
End If
End Sub
Private Sub GetArray(b() As Integer, n As Integer)
Dim c(10) As Integer
j = 0
For i = 1 To n
b(i) = CInt(Rnd() * 100)
If b(i) / 2 = b(i) \ 2 Then
j = j + 1
c(j) = b(i)
End If
Next i
Print j
End Sub
12、以下叙述中错误的是____在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件____。
13、向已有数据的C:\test\test.txt文件添加数据，正确的文件打开命令是____Open C:\test\test.txt For Append As #511。
14、执行以下语句后，a的值为__ 3___。
Dim a As Integer
a = 1
Do
a = a + 2
Loop While a = 100
15、有程序段如下：
For i = 1 To 3
For j = 5 To i Step -1
Print i * j
Next j
Next i
其中Print i*j语句执行的次数为____12_____。
16、设有语句X=InputBox(输入数值，0，示例)，程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是___变量X的值是字符串10。
17、若执行定义语句Dim a As Integer，以下给a赋值的语句中，错误的是___a =
文档评论（0）