原创力文档- 1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
- 2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
- 4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
- 5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传，每下载1次， 网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
1.下面所列四组数据中，全部是正确的VB常数的是____。2768,1.34D2，ABCDE，O1767
2.函数Len(Str(Val(123.4)))的值为______。6
3.下面表达式中，_Exp（-3.5） _____的运算结果与其他三个不同。
4.PictureBox、Frame、OptionButton、ListBox、TextBox、Form、ComboBox这7个对象中，具有Caption属性的有_ 3 ______个。
5.以下叙述中错误的是__如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见___。
6.使用_ AddItem ______方法可将新的列表项添加到一个列表框中。
7.执行下列程序段，输出结果为 _7 0 _________。
Dim a(10) As Integer
Dim i As Integer
For i = 1 To 10
a(i) = 2 * i - 1
Next i
Print a(4);
Erase a
Print a(4)
8.以下关于动态数组的语句中，正确的是_ReDim a(k+1)：ReDim preserve a(10)______。
9.下列程序段的执行结果为__11 3 ______。
Dim M(10), N(10)
i = 3
For j = 1 To 5
M(j) = j
N(i) = 2 * i + j
Next j
Print N(i); M(i)
10.执行下面的程序，输出结果是____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
End Function
11.调用由语句Private Sub Convert(Y As Integer)定义的Sub过程时，以下不是按值传递的是__Convert X_________。
12.下列说法正确的是_模块级变量可在模块通用声明段中用Private和Dim定义__________。
13.以下不属于Visual Basic系统的文件类型是__.Bat ______。
14.在VB中有一行程序代码：Text1.Text=Visual Basic,其中的Text1、Text和Visual Basic分别代表__对象、属性、值____。
15.以下叙述中错误的是_在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 _______。
16.VB 中三种文件访问的类型为__顺序、随机、二进制_________。
17.在使用OPEN语句打开文件时，如果省略for 子句，则打开的文件存取方式为_随机存取方式__________。
18.向已有数据的C:\test\test.txt文件添加数据，正确的文件打开命令是_Open C:\test\test.txt For Append As #511__________。
19.下面程序段的运行结果为__溢出 ______。
Dim s As Integer, i As Integer
i = 1: s = 1
Do
i = i + s
Loop Until s 10
Print i, s
20.执行以下语句后，a的值为__溢出 ______。
Dim a As Integer
a = 1
Do
a = a + 2
Loop Until a = 100
21.下面程序段的运行结果为_1 2 12 288_______。
n = 1
For i = 1 To 4
For j = 1 To i
n = n * j
Next j
Print n;
Next i
22.若执行定义语句Dim a As Integer，以下给a赋值的语句中，错误的是_a = 2 * 32760 \ 3_____。
23.执行语句：A = Inputbox(Today, Tomorrow, Yesterday)
将显示一个输入对话框，在对话框的输入区中显示的信息是_Yesterday _____。
24.在文本框Text1中输入数字12，Text2中输入数字34，执行以下语句，只有_Text3.Text=val(Text1.Text) +val(
文档评论（0）