- 1、本文档共13页,可阅读全部内容。
- 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模拟题1
窗体顶端一、单项选择题:(每小题2分,共24分)1、下列哪个符号能作为VB中的变量名( )。A、AB7B、7ABC、IFD、A[B]72、“X是小于100的非负数”,用VB表达式表示正确的是( )。A、0≤x<100B、0<=X<100C、0≤X OR X<100D、0<=X AND X<1003、数学式子Sin25°写成VB表达式是( )。A、Sin25B、Sin(25°)C、Sin(25)D、Sin(25*3.14/180)4、下列哪组语句可以将变量A、B的值互换( )。A、A=B:B=AB、A=C:C=B:B=AC、A=A+B:B=A-B:A=A-BD、A=(A+B)/2:B=(A=B)/25、函数Int(Rnd (0)*10)是在哪个范围内的整数( )。A、(0,1)B、(1,0)C、(0,10)D、(1,9)6、一个对象可以执行的动作与可被对象识别的动作分别称为( )。A、事件、方法B、方法、事件C、属性、方法D、过程、事件7、在窗体Form1的Click事件过程中有以下语句:Label1.Caption=“欢迎使用VB”该语句执行后标签控制的名称属性和Caption属性取值分别为( )。A、Label,欢迎使用VBB、Label1,欢迎使用VBC、Label1,Caption D、Label1,Label18、在调用过程时,下述说明正确的是( )。A、只能使用Call语句用Sub过程B、调用Sub过程时,实参必须用括号括起来C、在表达式中调用Function过程时可以不用括号把实参括起来D、Function过程也可使用Call调用9、设S1、S2均为字符串变量,S1=“Visual Basic”S2=“b”,则下面关系表达式中结果为True的是( )。A、len(S2)>len(S1)B、Chr(66)Right(S1,4)=“Basic”C、Left(S1,8)<S2D、Mid(S1,8,1)>S210、下面哪个关键字是将光标设置到指定的文本框上( )。A、TextB、NameC、selectD、SetFocus11、在用菜单编辑器设计菜单时,必须输入的项有( )。A、快捷键B、标题C、索引D、名称12、定时器的Interval属性以( )为单位指定Timer事件之间的时间间隔。A、分B、秒C、毫秒D、微秒窗体底端二、填空题:(每空1分,共26分)1、VB程序执行的基本方法是由来驱动子程序的运行。2、开发一个VB应用程序的步骤分别是、、、。3、在VB程序中,工程项目文件的扩展名为,窗体文件的扩展名为,模块文件的扩展名为,用户控件文件的扩展名为,执行文件的扩展名为。4、VB程序中,变量的作用域是指,根据作用域的不同将变量分为和。5、VB中,常用的两种说明变量类型的声明语句是和。6、VB中,用于处理文字信息的输入和显示信息的控件分别是、,用于处理图形信息的控件分别是、。7、VB中,在预定对话框里有两种对话框分别称为和,它们所用函数分别为和。8、一个多文档界面的应用程序可以包含三类窗体分别是、、。三、阅读程序,写出结果:(每小题6分,共30分)1、执行下面的程序,单击窗体后在窗体上显示的三行结果。Private Sub Form_Click() Dim Astr, Astr1, Astr2 As String Astr1=B For I=1 To 3 Astr2=LCase(Astr1) Astr1=Astr1 Astr2 Astr=Astr Astr1 Print Astr Astr1=Chr(Asc(Astr1)+1)Next IEnd Sub2、下面程序的功能是什么?Private Sub Commandl _Click ( ) S1=0: S2=0 M1=0: M2=0 N=1 Do while N=100 A=INT(101*RND) If a mod 2=0 THEN S1=S1+A : M1=M1+1 Else S2=S2+A : M2=M2+1 End if N=N+1 Loop Print S1,S2 Print M1,M2END Sub3、下面程序的功能是什么?Private Sub Command1_Click() Dim N As Integer, I As Integer, j As long, S As long N=Val (Text1.Text) J=0:S=0 For I=1 To n J=J+I :S=S+J Next I Label3.Caption=Str$(S) END Sub4、执行下面的程序,单击命令按钮Command1后在窗体上显示的图形功能是什么?Private Sub Command1_Click()
文档评论(0)