计算机二级模拟试题(visualbasic语言)七.docVIP

计算机二级模拟试题(visualbasic语言)七.doc

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
计算机二级模拟试题(visualbasic语言)七

计算机二级模拟试题(visual basic 语言)七 试题一、基础知识填空题(共30分,每空2分) 说明变量类型有二种方法,其中一种是在变量名后加隐含类型说明符,如变量sum$类型为 。 VB的窗体和控件是具有自己的 、 方法的对象。 VB的坐标系统是可以自定义的,使用对象的刻度属性和 方法,就可设置对象的坐标系统。 表达Int(9.5)=Fix(9,5) and Int(-7.2)=Fix(-8.2)的值是 。 启动窗体时,为了初始化该窗体中的各控件,可选用窗体的 事件。 在VB中,控件的命名是由用户决定的,为了说明控件类型,在命名一个文本框控件时常在其名字前加 英文缩写。 窗体对象具有CLS方法,另外 对象也有具有该方法。 菜单设计中每一个菜单项是一个控件,这些控件都只有一个 事件。 由下列循环语句控制的循环次数是 。 For k=25 to 0 step-2 Next k 已知a=3,b=4,c=5,下面表达式的值是 。(值用True 或False表示) ab And Not ca or cb and ca+b 按要求写出VISUAL Basic算术表达式或逻辑表达式: 用随机函数产生一个界于20至80的整数 下列代数式 (3)|a-b|c 下述语句执行后,Y的值是 。 Y=10-sgn(35 mod 17-6)+val(m.10 m.) 试题二、程序填空题(共10分,每空2分): 以下程序是利用通用对话框功能对窗体中的图片框添加图片。要求将c:\windows设置为初始目录,打开文件的默认文件扩展名为.bmp ,界面和程序如下: private sub command1_click() commondialog1.initdir= (1) commondialog1.filter=”所有文件(*.*)|*.*|bmp文件(*.bmp)|*.bmp|gif文件(*.gif)|*.gif ” commondialog1.filterindex=2 (2) ‘打开通用对话框 Picture1.picture= (3) (Commondialog1.filename) End sub 以下程序是验证100至200之间的所有偶数都能分解为两个素数之和。 Private sub form_click() Dim n as integer,m as integer Dim I as integer,j as integer For n=100 to 200 step 2 For m=2 to (n/2) For I=2 to int(sqr(m)) If m mod I=0 then exit for Next I If (4) then For j=2 to (5) If(n-m) mod j=0 then exit for Next j If jint (sqr(n-m)) then print n,m,n-m End if Next m Next n End sub 试题三、程序阅读(20分,每题5分) 仔细阅读下列各小题程序,在试卷的相应位置上写出下列程序运行后单击窗体,在窗体上的输出结果。(注意打印格式) 程序1 private sub form_click() dim x() as string ‘定义为可变数组 a$=”How ary you!” n=len(a$) redim x(1 to n) ‘重新定义数组 for I=n to 1 step-1 x(i)=mid(a$,I,1) next I print a$ for I=1 to n print x(i);” “; next I print end sub 答案:(1) 2、程序2 private sub form_click() dim x as double,y as double x=width/4 y=he

文档评论(0)

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

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

1亿VIP精品文档

相关文档