- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
《Visual_Basic程序设计》模拟试卷六《Visual_Basic程序设计》模拟试卷六
《Visual Basic程序设计》
模拟试卷六
一.选择题(20*1.5)
1.在窗体中添加一个列表框(ListBox1)和一个命令按钮,并编写如下代码:
Private Sub Command1 _ Click()
Dim Entry,I,Msg
Msg=″Choose OK to add 100 items to your list box.″
MsgBox Msg
For I=1 To 100
Entry=″Entry″I
List1.AddItem Entry
Next I
End Sub
程序完成的功能是
A.本示例使用Addltem方法增加100项给一个列表框
B.本示例使用Addltem方法向一个列表框中添加的内容是1~100的罗列
C.本示例使用Addltem方法向一个列表框中添加的内容是1~100的和
D.本示例使用Addltem方法增加101项给一个列表框
2.可以同时删除字符串前导和尾部空白的函数是
A.Ltrim
B.Rtrim
C.Trim
D.Mid
3.InputBox函数返回值的类型为
A.数值
B.字符串
C.变体
D.数值或字符串(视输入的数据而定)
4.在设计阶段,当双击窗体上的某个控件时,所打开的窗口是
A.工程资源管理器窗口
B.工具箱窗口
C.代码窗口
D.属性窗口
5.窗体上有一公共对话框Commondialog1和一个命令按钮Command1,当单击按钮时程序的功能是
Private Sub Command1 _ Click()
Commondialog1.ShowColor
End Sub
A.打开文件对话框
B.打开颜色对话框
C.打开字体对话框
D.打开保存对话框
6.在窗体上添加如下命令按钮,然后编写如下事件过程:C
Private Sub Command1 _ Click()
Dim a(10)As Integer
Dim p(3)As Integer
k=5
For i=1 To 10
a(i)=i
Next i
For i=1 To 3
p(i)=a(i*i)
Next i
For i=1 To 3
k=k+p(i)*2
Next i
Print k
End Sub
该过程的运行结果为:
A.35 B.33 C.31 D.29
7.下列可以立即打开窗口的操作是
A.Ctrl+D B. Ctrl+G C. Ctrl+F D. Ctrl+E
8.为了把焦点移到某个指定的控件,所使用的方法是
A.SetFocus
B.Visible
C.Refresh
D.GetFocus
9.VB表达式Cos(0)+Abs(1)+Int(Rnd(1))的值是
A.1 B. -1 C. 0 D. 2
10.由单精度浮点型的数据组成的字节数是
A.2 B.4 C.8 D.16
11.目录列表框的Path属性的作用是:
A.显示当前驱动器或指定驱动器上的路径
B.显示当前驱动器或指定驱动器上的某目录下的文件名
C.显示根目录下的文件名
D.只显示当前路径下的文件1
12.若m,x,y,均为Integer型变量,则执行下面语句后m值是
m=1:X=2:Y=3
m=IIf(X>Y,X+Y,X-Y)
A.-1 B.0 C.1 D. 2
13.下面程序运行后,输出的结果是:
Private Sub Command1 _ Click()
K=0
A=0
While K<10
K=K+2
A=A+K
Wend
Print A
End Sub
A.2 B.10 C.20 D.30
14.设a=″Visual Basic″,下面使b=″Basic″的语句是
A.b=Left(a,8,12) B.b=Mid(a,8,5) C.b=Right(a,5,5) D.b=Left(a,8,5)
15.下列对象中没有焦点属性的是
A.命令按钮控件 B.标签控件 C.文本框控件 D.单选框控件
16.以下不能运行工程的操作是
A..执行运行菜单中的启动命令 B.单击工具栏中的启动命令
D.按下F5键 C.按下Ctrl+F5键
17.下列关于面向对象程序设计的叙述不正确的是
A.对象具有属性、方法等特性 B.对象之间的通信产生了消息
C.一个对象是一个软件构造块,它包含数据与相关的操作 D.对象的属性不能被改变
18.设有如下程序:
Option Base 0
Private Sub Form _ Click()
Dim a
Dim i As Intege
文档评论(0)