可视化程序设计(VB)模拟题.pdf

《可视化程序设计(VB)模拟题.pdf》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、一、单项选择题：（每小题2分，共24分）1、下列哪个符号能作为VB中的变量名（）。A、AB7B、7ABC、IFD、A[B]72、“X是小于100的非负数”，用VB表达式表示正确的是（）。A、0≤x＜100B、0＜=X＜100C、0≤XORX＜100D、0＜=XANDX＜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

2、－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，Capti

3、onD、Label1，Label18、在调用过程时，下述说明正确的是（）。A、只能使用Call语句用Sub过程B、调用Sub过程时，实参必须用括号括起来C、在表达式中调用Function过程时可以不用括号把实参括起来D、Function过程也可使用Call调用9、设S1、S2均为字符串变量，S1=“VisualBasic”S2=“b”，则下面关系表达式中结果为True的是（）。A、len（S2）＞len（S1）B、Chr（66）&Right（S1，4）=“Basic”C、Left（S1，8）＜S2D、Mid（S1，8，1）＞S2

4、10、下面哪个关键字是将光标设置到指定的文本框上（）。A、TextB、NameC、selectD、SetFocus11、在用菜单编辑器设计菜单时，必须输入的项有（）。A、快捷键B、标题C、索引D、名称12、定时器的Interval属性以（）为单位指定Timer事件之间的时间间隔。A、分B、秒C、毫秒D、微秒重置二、填空题：（每空1分，共26分）1、VB程序执行的基本方法是由来驱动子程序的运行。2、开发一个VB应用程序的步骤分别是、、、。3、在VB程序中，工程项目文件的扩展名为，窗体文件的扩展名为，模块文件的扩展名为，用户控件文件

5、的扩展名为，执行文件的扩展名为。4、VB程序中，变量的作用域是指，根据作用域的不同将变量分为和。5、VB中，常用的两种说明变量类型的声明语句是和。6、VB中，用于处理文字信息的输入和显示信息的控件分别是、，用于处理图形信息的控件分别是、。7、VB中，在预定对话框里有两种对话框分别称为和，它们所用函数分别为和。8、一个多文档界面的应用程序可以包含三类窗体分别是、、。三、阅读程序，写出结果：（每小题6分，共30分）1、执行下面的程序，单击窗体后在窗体上显示的三行结果。PrivateSubForm_Click()DimAstr,Ast

6、r1,Astr2AsStringAstr1="B"ForI=1To3Astr2=LCase(Astr1)Astr1=Astr1&Astr2Astr=Astr&Astr1PrintAstrAstr1=Chr(Asc(Astr1)+1)NextIEndSub2、下面程序的功能是什么?PrivateSubCommandl_Click()S1=0:S2=0M1=0:M2=0N=1DowhileN<=100A=INT(101*RND)Ifamod2=0THENS1=S1+A:M1=M1+1ElseS2=S2+A:M2=M2+1EndifN

7、=N+1LoopPrintS1,S2PrintM1,M2ENDSub3、下面程序的功能是什么?PrivateSubCommand1_Click()DimNAsInteger,IAsInteger,jAslong,SAslongN=Val(Text1.Text)J=0：S=0ForI=1TonJ=J+I：S=S+JNextILabel3.Caption=Str$(S)ENDSub4、执行下面的程序，单击命令按钮Command1后在窗体上显示的图形功能是什么?PrivateSubCommand1_Click()ClsPrintFor

8、n=1To8PrintTab(2*n+2);Form=1To8PrintSpc(1);"*";NextmPrintNextnEndSub5、下面程序的功能是什么?PrivateSubForm_Click()DimaAsIntegerDimbAsIntegerDi