《可视化程序设计（VB）模拟题.docx》由会员分享，可在线阅读，更多相关《可视化程序设计（VB）模拟题.docx（13页珍藏版）》请在金锄头文库上搜索。
1、窗体顶端一、单项选择题：（每小题2分，共24分）1、下列哪个符号能作为VB中的变量名（）。A、AB7B、7ABC、IFD、AB72、“X是小于100的非负数”，用VB表达式表示正确的是（）。A、0x100B、0=X100C、0X OR X100D、0=X AND X1003、数学式子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=AB：A=ABD、A=（A+B）/2：B=（A=B）/25、函数Int(Rnd (0)*
2、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过程时，实参必须
3、用括号括起来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、定时
4、器的Interval属性以（）为单位指定Timer事件之间的时间间隔。A、分B、秒C、毫秒D、微秒窗体底端二、填空题：（每空1分，共26分）1、VB程序执行的基本方法是由来驱动子程序的运行。2、开发一个VB应用程序的步骤分别是、。 3、在VB程序中，工程项目文件的扩展名为，窗体文件的扩展名为，模块文件的扩展名为，用户控件文件的扩展名为，执行文件的扩展名为。4、VB程序中，变量的作用域是指，根据作用域的不同将变量分为和。5、VB中，常用的两种说明变量类型的声明语句是和。6、VB中，用于处理文字信息的输入和显示信息的控件分别是、，用于处理图形信息的控件分别是、。7、VB中，在预定对话框里有两种对话
5、框分别称为和，它们所用函数分别为和。8、一个多文档界面的应用程序可以包含三类窗体分别是、。三、阅读程序，写出结果：（每小题6分，共30分）1、执行下面的程序，单击窗体后在窗体上显示的三行结果。Private Sub Form_Click()Dim Astr, Astr1, Astr2 As StringAstr1=BFor I=1 To 3Astr2=LCase(Astr1)Astr1=Astr1 & Astr2Astr=Astr & Astr1Print AstrAstr1=Chr(Asc(Astr1)+1)Next IEnd Sub2、下面程序的功能是什么?Private Sub Comm
6、andl _Click ( )S1=0: S2=0M1=0: M2=0N=1Do while N=100A=INT(101*RND)If a mod 2=0 THENS1=S1+A : M1=M1+1ElseS2=S2+A : M2=M2+1End if N=N+1LoopPrint S1,S2Print 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
7、 J=J+I ：S=S+J Next I Label3.Caption=Str$(S) END Sub4、执行下面的程序，单击命令按钮Command1后在窗体上显示的图形功能是什么?Private Sub Command1_Click()ClsPrintFor n=1 To 8Print Tab(2 * n + 2);For m=1 To 8Print Spc(1); *;Next mPrintNext nEnd Sub5、下面程序的功能是什么?Private Sub Form_Click()Dim a As IntegerDim b As IntegerDim c As IntegerDim
8、 s As LongDim tot As Longa=10b=6c=4Call fact(a,tot)s=totCall fact(b,tot)s=s/totCall fact(c, tot)s=s/totPrint a;!/;b;!/;c;!=; sEnd SubSub fact(m As Integer, total As Long)Dim I As Integertotal=1For I=1 To mtotal=total*INext IEnd Sub 四、程序设计：（每小题10分，共20分）1、编写程序：利用文本框检查用户口令，而且使用静态变量来限制输入口令的次数。界面如下图所示：2、
9、编写程序：设计一个计时器，能够设置倒计时的时间，并进行倒计时。界面如图所示：一、单项选择题（每小题 2 分,共24分）123456789101112ADDCCBBDBD DC二、填空题（每空1分，共26分）1、事件2、设计用户界面；设置属性；编写事件过程代码；运行3、VBP；FRM；BAS；CLS；EXE4、变量的有效范围；全局变量和局部变量5、Dim 变量名(as数据类型)和static变量名(as数据类型)6、文本框；标签框；图片框；图像框7、消息框；输入对话框；Msgbox；Inputbox函数8、MDI父窗体(MDI窗体，即主窗体)；MDI子窗体(简称子窗体)；普通窗体(或称标准窗体)
10、三、阅读程序，写出结果：（每小题6分，共30分）1、程序运行后，窗体上显示的结果为： 第一行结果：Bb； 第二行：BbCc； 第三行结果：BbCcDd。2、程序的功能是：找出101间能被2整除的随机数并且累加出和。3、程序的功能是：分两重循环，内循环求1N的累加，外循环求内循环的每次累加结果的形式：S=1+(1+2)+(1+2+3)+(1+2+3+n)4、显示的图形为：由“*”号组成的平行四边形。5、程序的功能是：利用子程序计算阶乘为：四、程序设计：（每小题10分，共20分）1、编写文本框Text1的KeyPress事件代码：Private Sub Text1_KeyPress(KeyAsci
11、i As Integer)Static n As IntegerIf KeyAscii=13 ThenIf LCase(Text1.Text)=longxb ThenLabel1.Caption=欢迎使用本系统Elsen=n+1If n=3 ThenLabel1.Caption=对不起，您无权使用Text1.Enabled=FalseElseLabel1.Caption=对不起，口令错Text1.SelStart=0Text1.SelLength=Len(Text1.Text)End IfEnd IfEnd IfEnd Sub2、程序代码如下：Private Sub Command1_Clic
12、k（）Timer1.Enabled=TrueTimer1.Tag=Text1.Text*60Frame1.Caption=“现在开始倒计时”End SubPrivate Sub Timer1_ Timer（）Timer1.Tag=Timer1.Tag-1If m0 ThenTimer1.Enabler=FalseMsgBox“预定的时间到了！”，0，“倒计时”Frame1.Caption=“请输入计时的分钟数：”Text1.Text=0Exit SubEnd Ifn1=Format（m Mod 60,“00”）n2=Format（m60）Mod 60,“00：”）n3=Format（m3600）,“00：”）Text1.Text=n3&n2&n1End Sub
