夜大高级语言程序设计V复B习资料.docVIP

  1. 1、本文档共6页,可阅读全部内容。
  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文档。上传文档
查看更多
夜大高级语言程序设计V复B习资料

夜大高级语言程序设计VB复习资料 一、选择题 1、 VB是一种_________的可视化程序设计语言。 A). 面向机器 B) 面向过程 C) 面向问题 D) 面向对象 2、 程序运行中用鼠标双击当前窗体时,会触发窗体的_________事件。 A) Load B) Unload C) DblClick D) KeyPress 3、 下列各项中,可以作为变量名的是_________。 A) a1_0 B) Dim C) K6/600 D) CD[1] 4、 设m=”morning”,下列_________表达式的值是”mor”。 A) Mid(m,5,3) B) Left(m,3) C) Right(m,3) D) Mid(m,3,1) 5、 语句s=s+1的正确含义是_________。 A) 变量s的值与s+1的值相等 B) 将变量s的值存到s+1中去 C) 将变量s的值加1后赋给变量s D) 变量s的值为1 6、 下列程序段执行后,输出结果是_________。 a = 0: b = 1 a = a + b: b = a + b Print a; b a = a + b: b = a + b Print a; b a = b – a: b = b - a Print a; b A) B) C) D) 7、 有以下程序段: x=”ABC” m=Lcase(x) n=Ucase(y) Print Mid(m+n,3,2) 则程序的输出结果是_________。 A) Ca B) cA C) ccA D) ca 8、表达条件“X是大于等于5,且小于95的数”的条件表达式是_________。 A) 5=X95 B) 5=X,X95 C) X=5 and X95 D) X=5 and 95 9、 有如下的程序段: s=0 For k=10 to 50 step 15 S=s+k Next k If k50 Then s=s+k Else s=s-k End if Print s 程序运行的结果是:_________。 A) 20 B) 130 C) 75 D) 55 10、 语句Dim Ay(3 to 6,-2 to 2) As integer所定义的数组的元素个数为_________。 A) 20 B) 16 C) 24 D) 25 11、 下列程序段的运行结果是_________。 Dim a(3,3) As Integer For i=1 to 3 For j=1 to 3 If i=j Then a(i,j)=1 else a(i,j)=0 Print a(i,j); Next j Print Next i A) B) C) D) 12、 阅读下面的程序段: a=0 For? i=1 To 3 For? j=1 To i For k=j To 3 a=a+1 Next k Next j Next i 执行上面的三重循环后,a 的值为?????? 。 A) 3???????? B) 9??????????? C) 14?????????? D) 21 13、 在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签,然后编写如下代码: Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n = 10 z = n + z y = y + z

您可能关注的文档

文档评论(0)

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

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

1亿VIP精品文档

相关文档