VB试题与程序设计任务二.docVIP

  1. 1、本文档共8页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
一、单项选择题(共?25?道试题,共?50?分。) 1.??6+10 Mod 4*2+1的值是( )。 A. 9 B. 11 C. 1 D. 3 ??????满分:2??分 2.?? A. Form2.Load B. Form2.Visible=False C. Form2.Show D. Form2.Visible=True ??????满分:2??分 3.?? A. GeyFocus B. TabIndex C. Refresh D. SetFocus ??????满分:2??分 4.??Do…Loop循环,可使用的语句是()语句。 A. Exit B. Exit For C. End Do D. Exit Do ??????满分:2??分 5.?? Private Sub Command1_Click() x = 1:n=0 Do While x 100 x = x * 10 n = n + 1 Loop Text1.Text = Str(n) Text2.Text = Str(x) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为( B )。 A. 10 和0 B. 2和100 C. 3和50 D. 4和168 ??????满分:2??分 6.??Caption属性的是(  ) A. 框架 B. 列表框 C. 复选框 D. 单选按纽 ??????满分:2??分 7.?? B )。 A. 公有、私有、系统 B. 全局变量、模块级变量、过程级变量 C. 动态、常数、静态 D. Public、 Private、 Protected ??????满分:2??分 8.?? A. Time B. Year C. Now D. Date ??????满分:2??分 9.?? 如果要在窗体代码编辑器的“通用”部分定义私有Sub过程,则正确的语句是(  )。 A. Public Sub B. Private Sub C. Public Function D. Private Function ??????满分:2??分 10.?? A. 一个工程中可以包含多个窗体文件 B. 在一个窗体文件中用Private定义的通用过程能被其它窗体调用 C. 在设计Visual Basic程序时,窗体、标准模块、类模块等需要分别保存为不同类型的文件 D. 全局变量必须在标准模块中定义 ??????满分:2??分 11.??4 + 19 \ 6 * 7 / 8 Mod 2的值是( )。 A. 4 B. 5 C. 6 D. 7 ??????满分:2??分 12.?? B)。 A. 一行只能写一条语句 B. 一条语句可以分多行书写 C. 每行的首字符必须大写 D. 长度不能超过255个字符 ??????满分:2??分 13.??ASCⅡ码的函数是( C )。 A. Val B. Fi C. Asc D. Chr ??????满分:2??分 14.?? A. 一个工程中只能有一个Sub Main过程 B. 窗体的Show方法的作用是将指定的窗体载入内存并显示该窗体 C. 窗体的Hide方法和Unload方法的作用完全相同 D. 若工程文件中有多个窗体,可以根据需要指定一个窗体为启动窗体 ??????满分:2??分 15.?? A. 36 B. 49 C. 42 D. 动态变化 ??????满分:2??分 16.?? Private Sub Command1_Click() x = 0 Do While x 50 x = (x + 2) * (x + 3) n = n + 1 Loop Text1.Text = Str(n) Text2.Text = Str(x) End Sub A. 1和0 B. 2和72 C. 3和50 D. 4和168 ??????满分:2??分 17.??Click事件的参数是(  )。 A. Index B. Caption C. Tag D. 没有参数 ??????满分:2??分 18.?? A. List1.AddItemChina,0 B. List1.AddItemChina,1 C. List1.AddItemChina, D. List1.AddItem1,China ??????满分:2??分 19.?? )。 A. a=1 b=2 c=3 B. a=1:b=2:c=3 C. a=1, b=2, c=3 D. a=1 ;b=2; c=3 ??????满分:2??分 20.?? )。 Dim A(-3 To 5)As Integer A. 6 B. 7 C. 8 D. 9 ?????

文档评论(0)

82393aa + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档