有哪些信誉好的足球投注网站- 1、本文档共7页，可阅读全部内容。
- 2、有哪些信誉好的足球投注网站（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
- 5、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
- 6、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传，每下载1次， 网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
VB试题
一.选择题(20*1.5)
1.在窗体中添加一个列表框(ListBox1)和一个命令按钮，并编写如下代码：
PrivateSubCommand1_Click()
DimEntry,I,Msg
Msg=″ChooseOKtoadd100itemstoyourlistbox.″
MsgBoxMsg
ForI=1To100
Entry=″Entry″I
List1.AddItemEntry
NextI
EndSub
程序完成的功能是
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,当单击按钮时程序的功
能是
PrivateSubCommand1_Click()
Commondialog1.ShowColor
EndSub
A.打开文件框
B.打开颜色框
C.打开字体框
D.打开保存框
6.在窗体上添加如下命令按钮，然后编写如下过程：C
PrivateSubCommand1_Click()
Dima(10)AsInteger
Dimp(3)AsInteger
k=5
Fori=1To10
a(i)=i
Nexti
Fori=1To3
p(i)=a(i*i)
Nexti
Fori=1To3
k=k+p(i)*2
Nexti
Printk
EndSub
该过程的运行结果为:
A.35B.33C.31D.29
7.下列可以立即打开窗口的操作是
A.Ctrl+DB.Ctrl+GC.Ctrl+FD.Ctrl+E
8.为了把焦点移到某个指定的控件，所使用的方法是
A.SetFocus
B.Visible
C.Refresh
D.GetFocus
9.VB表达式Cos(0)+Abs(1)+Int(Rnd(1))的值是
A.1B.-1C.0D.2
10.由单精度浮点型的数据组成的字节数是
A.2B.4C.8D.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.-1B.0C.1D.2
13.下面程序运行后，输出的结果是:
PrivateSubComma
文档评论（0）