VB练习题.pdf

《VB练习题.pdf》由会员分享，可在线阅读，更多相关《VB练习题.pdf（190页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、一、判 断 共 5 题（共计5 分）第1 题（1 分）答案：NV B支持弹出菜单,所谓 弹出菜单”是指单击鼠标后打开的菜单.第2 题（1 分）答案：NV B通过窗体管理构成应用程序的各类文件的集合.第3 题（1 分）个窗体启动.答案：YV isu a l Ba sic 程序的运行可以从Ma in（）过程启动,也可以从某第4 题（1 分）答案：YV B是一种面向对象的程序设计语言.第5 题（1 分）V isu a l Ba sic 程序的运行,仅能从某一窗体启动，如Fo r ml 窗体.答案：N二、单 项 选 择 共 5 题（共计5 分）第1 题（1 分）V isu a l Ba sic 的编程

2、机制是0.A:可视化B:面向对象C:面向图形D:事件驱动答案：D第2 题（1 分）R G B 函数通过红.绿.蓝三基色混合产生某种颜色，某语法为R G B（红.绿.蓝），括号中红、绿、蓝三基色的成分使用0 2 5 5 之间的整数.若使用三个滚动条分别输入三种基色,为保证输入数值有效,则应设置（）属性.A:Ma x 和MinB:S ma 1 1 c ha n g e 和 La r g e Cha n g eC:S c r o l 1 和Cha n g eD:V a l u e答案：A第3 题（1 分）V B应用程序的运行模式是0.A:解释运行模式B:编译运行模式C:两者都有D:汇编模式答案：C第

3、4 题（1 分）v b 程序设计中的窗体在O O P 中称为0.A:屏幕B:事件C:对象D:控件答案：C第5 题（1 分）vb中的坐标系最小刻度为0.A:斐B:象素C:厘米D:一个标准字符宽度答案：A三、程 序 填 空 共 1 题（共计2 0 分）第1 题（2 0 分）【程序填空】功能：要求在T e x tl 中输入一段字符，选中“大写转为小写小写转为大写”,单击转换按钮后，T e x t2 显示大小写相反的字符串；选中“全部小写”，单击转换按钮后，T e x t2 显示全部小写的字符串；选中“全部大写”，单击转换按钮后，T e x t2 显示全部大写的字符串。Pr iv a te S u b

4、 Co mma n d 1 _C1 i c k()Dim n As I n te g e r,k As I n te g e r,c h As S tr in g,a As S tr in g*S PACE*n =Le n(?)Fo r k =1 T o n*S PACE*a =Mid(T e x tl.T e x t,?,1 )I f O ptio n l.V a l u e =T r u e T he nI f a =a An d a =A An d a =Z T he nc h=c h+LCa se(a)El sec h=c h+aEn d I fEn d I fI f 0 ptio n

5、 2.V a l u e =T r u e T he nc h=U Ca se(T e x t1)En d I fI f 0 ptio n 3.V a l u e =T r u e T he nc h=LCa se(T e x t1)*S PACE*【？】T e x t2 =c hN e x t kEn d S u b答案：=(答案 1)二 二=T e x tl=或=te x tl.te x t=(答案 2)=kk%=(答案 3)=e n d if四、程序改错 共1 题（共计2 0 分）第1 题（2 0 分）【程 序 改 错】题 目：挑选单数并排序程序：程序启动后由计算机自动产 生2 0个 属

6、 于 1 0 0,3 0 0 之间的随机整数，单击显 示全体按钮时，在Fo r m l上显示这2 0个随机数；单击显示奇数按钮时，在Fo r m l上显示其中的奇数；单击排序按钮时，在Fo r m l上将这些奇数从小到大显示。要求显示格式为每行显示5个 数 据。Op t i o n Ex p l i ci tPr i v at e a(2 0)As In t e g e r,b(2 0)As In t e g e rPr i v at e k As In t e g e rPr i v at e Su b cm do dd_Cl i ck()Di m I As In t e g e rk =0

7、Fo r I=1 To 2 0*FOUND*If a(I)/2 =In t(a(I)/2)Th e nk =k +1b(k)=a(I)En d IfNe x t IFo r I=1 To kPr i n t b(I);*FOUND*If In t(I/5)I/5 Th e n Pr i n tNe x t IPr i n tEn d Su bPr i v at e Su b cm dAl l _Cl i ck()Ran do m i z eDi m I As In t e g e rFo r I=1 To 2 0*FOUND*a(I)=In t (Rn d()*2 0 +1 0 0)Pr i

8、n t a(I),If In t (I/5)=1/5 Th e n Pr i n tNe x t IPr i n tEn d Su bPr i v at e Su b cm ds o r t _Cl i ck()Di m I As In t e g e rDi m J As In t e g e rDi m Te m p As In t e g e rFo r I=1 To k -1Fo r J=I To kIf b(I)b(J)Th e n Te m p =b(I):b(I)=b(J):b(J)=Te m pNe x t JNe x t IFo r I=1 To kPr i n t b(I)

9、;If In t(I/5)=1/5 Th e n Pr i n tNe x t IEn d Su b答案：=(答案 1)=If a(I)/2 In t(a(I)/2)Th e n=或=If a(I)m o d 2 0 Th e n=或=If 0 a(I)m o d 2 Th e n=或=If a(I)/2 a(I)2 Th e n=或=If i n t (a(I)/2)a(I)/2 Th e n=或=If a(I)2 a(I)/2 Th e n=(答案 2)=If In t (I/5)=1/5 Th e n Pr i n tIf I m o d 5=0 Th e n Pr i n tIf 0

10、=I m o d 5 Th e n Pr i n tIf I/5=i n t(I/5)Th e n Pr i n tIf I/5=I 5 Th e n Pr i n tIf I 5=1/5 Th e n Pr i n t（答案3）(I)=In t(Rn d()*2 0 0 +1 0 0)五、程 序 设 计 共1题（共计3 0分）第1题（3 0分）【程 序 设 计】题 目：（事件）单击按钮。（响应）随机产生N个 两 位 正 整 数（N由输入对话框 输 入，且N0）,求出其中的最大数和最小 数，并在标签框Labe l 1上显示最大数与最 小数的差。注 意：请在指定的事件内编写代码。答 案：-x =

11、In p u t Bo x (请输入 x )n =1t =xS=XDo Un t i l Abs (t)0.0 0 0 0 0 0 0 1n =n +1t =t *(-1)/ns =s +tLo o pLabe l 1.Cap t i o n =s=&s六、VB窗 体 设 计 共1题（共计2 0分）第1题（2 0分）【窗体设计】题 目：请按照题目要求设计指定的窗体。（本题有6个项目要完成）建立如图0 0 9所 示 界 面：注 意：保存时不得修改窗体和工程文件的名称及路径，否则后果自负。1、窗体设置1）名称为“模板”2）标题为“南京工程学院”2、在窗体上方添加一个标签控件1）对齐方式为右对齐2）

12、设置背景透明，边框风格为13）内容为“透明右对齐”3、在前一个标签下方添加另一个标签控件1）能自动调整大小2）背景色为白色，值为HOOFFFFFF3）标题为“0”4）字体大小为3 64、在窗体上添加一个时钟控件1）时间间隔为1 秒2）在Ti m e r 事件过程中添加代码，使第二个标签的标题的值加一。5、在窗体下方添加一个列表框控件1）名称为“列表”2）设置为不可用3）排序属性设为真4）To p 为3 3 6 0,Le f t 为2 2 806、在窗体右下角添加一个命令按钮1）名称为“计时切换”2）标题为“计时”3）在单击事件过程中添加代码，使时钟控件的En abl e d属性值取反。一、判

13、断 共 5 题（共计5 分）第1 题（1 分）VB支持弹出菜单，所谓“弹出菜单”是指单击鼠标后打开的菜单.答案：N第2题（1 分）V B 通过窗体管理构成应用程序的各类文件的集合.答案：N第3题（1 分）V i s u a l B a s i c 程序的运行可以从M a i n。过程启动，也可以从某个窗体启动.答案：Y第4题（1 分）V B 是一种面向对象的程序设计语言.答案：Y第5题（1 分）V i s u a l B a s i c 提供的几种标准坐标系统的原点都是在绘图区域的左上角，如果要把坐标原点放在其它位置,则需使用自定义坐标系统.答案：Y二、单 项 选 择 共 5题（共计5分）第1

14、 题（1 分）V i s u a l B a s i c 是一种0程序设计语言.A:过程式B:非过程式C:机器D:低级答案：B第2题（1 分）V i s u a l B a s i c 的编程机制是（）.A:可视化B:面向对象C:面向图形D:事件驱动答案：D第3题（1 分）窗体的C a p t i on 属性的作用是0.A:确定窗体的名称B:确定窗体的标题C:确定窗体的边界类型D:确定窗体的字体答案：B第4题（1 分）窗体的E n a b l e 属性的属性值是0类型的数据.A:整型B:字符型C:逻辑型D:实型答案：C第5题（1 分）对象”是计算机系统运行的0.A:程序单位B:逻辑单位C:物理

15、实体D:基本实体答案：D三、程 序 填 空 共 1 题（共计20 分）第1 题（20 分）【程序填空】功能：在窗体上有两个列表框L i s t l （处理前数据）和L i s t 2（处理 后数据），以及标签L a b e l l。程序功能为：随机生成1 0 0 个 0-20 （不包括0 和20）的随机数填入L i s t l,并将这些随机 数中的零元素删除，填入L i s t 2中。最后在L a b e l l 中显示零 元素个数P r i v a t e Su b F or m _ L oa d()D i m n A s I n t e g e rD i m i,x,k A s I n t

16、 e g e rD i m a(1 0 0)A s I n t e g e r,b(1 0 0)A s I n t e g e rR a n d om i z en =1 0 0*SPACE*F or i =1 T o【？】*SPACE*x =I n t(20 *?!)L i s t l.A d d i t e m xa(i)=xN e x t ik =0F or i =1 T o n 删除零元素I f a(i)0 T h e n*SPACE*?：b(k)=a(i)L i s t 2.A d d i t e m b(k)E n d I fN e x t iL a b e l 1.C a p t

17、 i on =数组中零元素个数：+St r (n -k)E n d Su b答案：=(答案 1)=n=或=1 0 0=(答案 2)=R n d=或=R n d(l)=(答案 3)=k =k +1k =l+k四、程 序 改 错 共 1 题（共计20 分）第1 题（20 分）【程序改错】题目：挑选单数并排序程序：程序启动后由计算机自动产 生20 个属于 1 0 0,30 0 之间的随机整数，单击显 示全体按钮时，在Fo r m l 上显示这2 0 个随机数；单击显示奇数按钮时，在Fo r m l 上显示其中的奇数；单击排序按钮时，在Fo r m l 上将这些奇数从小到大显示。要求显示格式为每行显示

18、5个数据。Op t i o n Ex p l i c i tPrivate a(20)As Integer,b(20)As IntegerPrivate k As IntegerPrivate Sub cmdodd_Click()Dim I As Integerk=0For I=1 To 20*FOUND*If a(I)/2=Int(a(I)/2)Thenk=k+1b(k)=a(I)End IfNext IFor I=1 To kPrint b(I);*FOUND*If Int(I/5)I/5 Then PrintNext IPrintEnd SubPrivate Sub cmdAll_Cli

19、ck()RandomizeDim I As IntegerFor I=1 To 20*FOUND*a(I)=Int(RndO*20+100)Print a(I),If Int(I/5)=1/5 Then PrintNext IPrintEnd SubPrivate Sub cmdsort_Click()Dim I As IntegerDim J As IntegerDim Temp As IntegerFor I=1 To k-1For J=I To kIf b(I)b(J)Then Temp=b(I):b(I)=b(J):b(J)=TempNext JNext IFor I=1 To kPr

20、int b(I);If Int(I/5)=1/5 Then PrintNext IEn d Su b答案：=(答案 1)=If a(I)/2 In t(a(I)/2)T h e n=或=If a(I)m o d 2 0 T h e n=或=If 0 a(I)m o d 2 T h e n=或=If a(I)/2 a(I)2 T h e n=或=If i n t(a(I)/2)a(I)/2 T h e n=或=If a(I)2 a(I)/2 T h e n=(答案 2)=If In t(I/5)=1/5 T h e n Pr i n t=或=If I m o d 5=0 T h e n Pr i

21、 n t=或=If 0 =I m o d 5 T h e n Pr i n t=或=If I/5=i n t(I/5)T h e n Pr i n t=或=If I/5=I 5 T h e n Pr i n t=或=If I 5=1/5 T h e n Pr i n t=(答案 3)=a(I)=In t(Rn d O*2 0 0 +1 0 0)五、程 序 设 计 共 1 题（共计30 分）第1 题（30 分）【程序设计】题目：已知，猴子吃一堆桃子，每天吃桃子总数的一半多一个。到第n 天时，桃子只剩一个。编写函数f u n,函数的功能是：求出开始桃子的数量并显示。如:n 为7时，则显示1 90”

22、要求使用Fo r 语句来实现。注意：请在指定的事件内编写代码 代码只能写在两行标识之间 不得修改已有代码 保存时不得修改窗体和工程文件的名称及路径，否则后果自负。Pr i v at e Fu n c t i o n f u n(n As Lo n g)As St r i n g*Pr o g r am*En d *En d Fu n c t i o nPr i v at e Su b Fo r m _Lo ad()Sh o wPr i n t f u n(7)NJIT _V BEn d Su bPr i v at e Su b NJIT _V B()Di m i As In t e g e r

23、Di m a(1 0)As St r i n gDi m f i n As In t e g e rDi m f Ou t As In t e g e rf i n =Fr e e Fi l eOp e n Ap p.Pat h&i n.d at Fo r In p u t As#f Inf Ou t =Fr e e Fi l eOp e n Ap p.Pat h&o u t.d at Fo r Ou t p u t As#f Ou tFo r i =1 T o 1 0 St e p 1Li n e In p u t#f l n,a(i)Pr i n t#f Ou t,f u n(V ai(a

24、(i)Ne x tCl o s e#f l nCl o s e#f Ou tEn d Su b答案：x =1Fo r i =1 T o n -1x =(x +1)*2Ne x t if u n =x六、V B窗 体 设 计 共 1 题(共 计 2 0 分)第1 题(2 0 分)-【窗体设计】题目：请按照题目要求设计指定的窗体。建立如(图1)所示界面。1、添加控件文本框(T e x t 1)。框架(Fr am e l,框架Fr am e 2)。框架(Fr am e l)内添加2 个单选框(Op t i o n l,0 p t i o n 2)(.框架(Fr am e 2)内添加3个单选框(0 p

25、 t i o n 3,0 p t i o n 4,0 p t i o n 5)2、窗体设置窗体名称(Nam e)为Fo r m l”。窗体标题(Cap t i o n)为“字体样式”。3、文本框设置文本框(T e x t l)文本(T e x t)属性值为“V B窗体设计”。字体属性为“宋体”。文字对齐方式属性为“居中对齐文字颜色为&H0 0 FF0 0 0 0&。4、框架设置框架(Fr am e l)标题(Cap t i o n)属性为字体框架(Fr am e 2)标题(Cap t i o n)属性为“颜色5、单选框设置单选框(Op t i o n l)标题(Cap t i o n)属性为“

26、宋体”。单选框(0 p t i o n 2)标题(Cap t i o n)属性为隶书单选框(0 p t i o n 3)标题(Cap t i o n)属性为红。单选框(0 p t i o n 4)标题(Cap t i o n)属性为“绿单选框(0 p t i o n 5)标题(Cap t i o n)属性为“蓝一、判 断 共 5题(共 计 5分)第1 题(1 分)V i s u al Bas i c 提供的几种标准坐标系统的原点都是在绘图区域的左上角，如果要把坐标原点放在其它位置,则需使用自定义坐标系统.答案：Y第2 题(1 分)V B支持弹出菜单，所谓弹出菜单是指单击鼠标后打开的菜单.答案：

27、N第3题(1 分)V i s u al Bas i c 程序的运行,仅能从某一窗体启动，如Fo r m l 窗体.答案：N第4 题(1 分)V B是一种面向对象的程序设计语言.答案：Y第5题(1 分)V i s ual B as i c程序的运行可以从M ai n。过程启动，也可以从某个窗体启动.答案：Y二、单 项 选 择 共 5题(共 计 5分)第1 题(1 分)窗体的En abl e属性的属性值是0类型的数据.A:整型B:字符型C:逻辑型D:实型答案：C第2 题(1 分)变量未赋值时，数值型变量的值为0.A:0B:空C:1D:无任何值答案：A第3 题（1 分）V B 认为下面（）组变量是同

28、一个变量.A:A1 和 alB:S UM 和S UM M AR YC:AV ER 和 AV ER AG ED:A1 和A_1答案：A第4题（1 分）对象”是计算机系统运行的0.A:程序单位B:逻辑单位C:物理实体D:基本实体答案：D第5题（1 分）v b 程序设计中的窗体在O O P 中称为0.A:屏幕B:事件C:对象D:控件答案：C三、程序填空 共1 题（共计2 0 分）第1 题（2 0 分）【程序填空】功能：在窗体上设计两个文本框和两个标签，标签上显示摄氏 温度”和华氏温度”，文本框一个用于输入摄氏温度数,一个用于输出对应的华氏温度?摄氏温度与华氏温度的 转换公式为:c=（5/9）*（f

29、-3 2）要求：对输入的摄氏温度数有检查功能，拒绝接收非数字字符。P ri vat e S ub C o m m an dl _C l i ck()T ex t l =T ex t 2 =T ex t l.En abl ed=T rueT ex t 2.En abl ed=T rueT ex t l.S et F o cusEn d S ubP ri vat e S ub C o m m an d2 _C l i ck()En dEn d S ubP ri vat e S ub F o rm _L o ad()T ex t l =T ex t 2 =T ex t l.En abl ed=F a

30、l s eT ex t 2.En abl ed=F al s eEn d S ubP ri vat e S ub T ex t l _C han g e()*SPACE*?=5*(V ai (T ex t l.T ex t)-3 2)/9En d S ubP ri vat e S ub T ex t l _K ey P res s(K ey As ci i As I n t eg er)I f K ey As ci i 8 T hen*S P AC E*I f C hr(K ey As ci i)?T hen*S P AC E*K ey As ci i =?En d I fEn d I fEn

31、 d S ub答案：=(答案 1)=T ex t 2.T ex tT ex t 2=(答案 2)=9=(答案 3)=四、程 序 改 错 共 1 题（共计2 0 分）第1 题（2 0 分）【程序改错】题目：该程序的功能是通过键盘给一维数组a输入1 0 个 整数，然后将一维数组的这些数赋值给一个2 行 5列的二维数组。最后在一行内输出一维数组、在两行内输出二维数组。O p t i o n Ex p l i ci tP ri vat e S ub F o rm _C l i ck()D i m a(1 0),b(2,5)As I n t eg erD i m i As I n t eg er,k A

32、s I n t eg er,j As I n t eg erF o r i =1 T o 1 0a(i)二I n p ut B o x(请提供1 0 个整数给数组)a=V ai (a)N ex t ik =0F o r i =1 T o 2F o r j =1 T o 5k =k +1b(i,j)=a(k)N ex t jN ex t iP ri n t T ab(10)数组a的值P ri n t T ab(1 0);F o r i =1 T o 1 0*FOUND*P ri n t a(i)N ex t iP ri n tP ri n t T ab(10)二维数组b的值是:F o r i =

33、1 T o 2P ri n t T ab(1 0);F o r j =1 T o 5*FOUND*P ri n t b(j,i);N ex t j*FOUND*P ai n t b(i,j)N ex t iEn d S ub答案：=(答案 1)=P ri n t a(i);=(答案 2)=p ri n t(i,j)二二=二二(答案 3)=P ri n t五、程序设计 共1 题（共计3 0 分）第1 题（3 0 分）【程序设计】题目：（事件）单击窗体。（响应）求一个数，它除3 余2,除5余3,除7 余2,请将满足上面条件的最小数保存到s um 变量中o使用f o r.n ex t 语句完成程序答

34、案：-D i m i As I n t eg erF o r i =2 T o 1 0 0 0I f i M o d 3 =2 An d i M o d 5=3 An d i M o d 7 =2 T henP ri n t iEx i t F o rEn d I fN ex t is um =i六、V B 窗 体 设 计 共 1 题(共 计 2 0 分)第1 题(2 0 分)【窗体设计】题目：请按照题目要求设计指定的窗体。建立如(图1)所示界面。1、添加控件：在窗体内添加1 个文本框(T ex t l),1 个标签(L abel 1),2 个按钮(C o m m a n d 1,C o m

35、m a n d 2),3 个菜单(名称分别为m en u _ F i l e,m en u _ Ed i t,m en u _ Hel p)2、窗体设置：设置窗体名称(N a m e)为 F o r m 8”。设置窗体标题(C a p ti o n)为“F o r m 8”。3、标签设置：设置标签(L a b el 1)的标题(C a p ti o n)为“输入密码:“，A u to S i z e属性为真。4、文本框设置：设置文本框“密码字符为传，在文本框(T ex tl)中输入文本“T ex tl”。5、菜单设置:设置菜单(m en u _ F i l e)的标题(C a p ti o n

36、)为“文件(&F)”,并将菜单项设为“无效设置菜单(m en u _ Ed i t)的标题(C a p ti o n)为“编辑(&E)并将菜单项设为，无效九设置菜单(m en u _ Hel p)的标题(C a p ti o n)为“帮助(&H)并将菜单项设为“无效”。6、按钮设置：设置按钮(C o m m a n d 1)的标题(C a p ti o n)为“确定”。设置按钮(C o m m a n d 2)的标题(C a p ti o n)为 下一步，按钮设置无效。一、判 断 共 5 题(共 计 5 分)第1题(1分)V i s u a l B a s i c 程序的运行,仅能从某一窗体启

37、动，如F o r m l 窗体.答案：N第2 题(1分)V i s u a l B a s i c 提供的几种标准坐标系统的原点都是在绘图区域的左上角,如果要把坐标原点放在其它位置,则需使用自定义坐标系统.答案：Y第3 题(1分)V B 支持弹出菜单，所谓弹出菜单是指单击鼠标后打开的菜单.答案：N第4 题(1分)V B 通过窗体管理构成应用程序的各类文件的集合.答案：N第5 题(1分)题 号:2 2 5V i s u a l B a s i c 程序的运行可以从Ma i n。过程启动，也可以从某个窗体启动.答案：Y二、单 项 选 择 共 5 题(共 计 5 分)第1题(1分)()对象不具有C

38、a p ti o n 属性.A:L a b elB:O p ti o nC:F o r mD:T i m er答案：D第2 题（1分）V i s u a l B a s i c 集成环境的大部分窗口都可以从主菜单项。的下拉菜单中找到相应的打开命令.A:编辑B:视图C:格式D:调试答案：B第3 题（1分）A:可视化B:面向对象C:面向图形D:事件驱动V i s u a l B a s i c 的编程机制是（）.答案：D第4 题（1分）A:工程B:模块C:窗体D:过程v b 应用程序是分层管理的,其最高的层次为0.答案：A第5 题（1分）A:程序单位B:逻辑单位C:物理实体D:基本实体”对象是计算

39、机系统运行的0.答案：D三、程 序 填 空 共 1题（共计2 0分）第1题（2 0分）【程序填空】功能：随机生成10个数存入数组中，并将数组排序后输出P r i v a te S u b C o m m a n d 1_ C 1i c k()D i m a(10)A s In tegerD i m i,j,t A s In tegerF o r i =1 T o 10*S P A C E*a(i)=C In t(10?R n d +1)N ex tF o r i =1 T o 9*S P A C E*F o r j =?T o 10*SPACE*If a(i)?T hent=a(i):a(i)

40、=a(j):a(j)=tEn d IfN ex t jN ex t iF o r i =1 T o 10P r i n t a(i)N ex tEn d S u b答案：=(答案 1)=二=二*=(答案 2)=i +11+i=(答案 3)=二=a(j)四、程 序 改 错 共 1题（共计2 0分）第1题（2 0分）【程序改错】题目：在下面的程序段中过程p d 可以判断任意三个数能 否构成三角形的三边，利用该过程的判定结果，对能构成三角形的计算其面积，构不成的显示 不能构成三角形”O p ti o n Ex p l i c i tP r i v a te S u b F o r m _ C l i

41、 c k()*FOUND*D i m x%,y%,z%,s%,b A s B o o l ea n,h A s S i n gl ex =In p u tB o x。请输入三角形的边长”)y =In p u tB o x(请输入三角形的边长)z =In p u tB o x。请输入三角形的边长”)b =p d(x,y,z)h=(x +y +z)/2*FOUND*If N o t b T hens =S q r (h*(h-x)*(h-y)*(h-z)P r i n t 三角形面积是；sEl s eP r i n t”不能构成三角形En d IfEn d S u b*FOUND*P u b l

42、i c F u n c ti o n p d()A s B o o l ea nIf x 0 A n d y 0 A n d z 0 A n d x +y z A n d x +z y A n d y +p d =T r u eEl s ep d =F a l s eEn d IfEn d F u n c ti o n x T hen答案：=(答案 D =D i m x%,y%,z%,s!,b A s B o o l ea n ,h A s S i n gl eD i m x%,y%,z%,s a s S i n gl e,b A s B o o l ea n ,h A s S i n gl

43、e=(答案 2)=If b=n o t fa l s e T henIf b=tr u e T hen=(答案 3)=P u b l i c F u n c ti o n p d(x%,y%,z%)A s B o o l ea nP u b l i c F u n c ti o n p d(x,y,z)A s B o o l ea nP u b l i c F u n c ti o n p d(x a s In teger,y a s In teger,z a s In teger)A s B o o l ea n五、程序设计 共1题（共计3 0分）第1题（3 0分）【程序设计】题目：（事件）

44、单击窗体。（响应）已知5 皿=1!-2!+3!-4!-10!,请将s u m 结果值输出到窗体上。使用d o w hi l e.l o o p 语句完成程序答案：-D i m i A s In tegeri =l:p=lD o W hi l e i =10p=p*is u m =s u m +p*(-1)-(i -1)i =i +1L o o pP r i n t s u m六、V B 窗体设计 共1题（共计2 0分）第1题（2 0分）【窗体设计】题目：请按照题目要求设计指定的窗体。建立如(图1)所示界面：请按所给窗体的样子设计窗体(不要求控件的尺寸一样，运行时得到所给窗体即可，有时需要简单的

45、事件过程)。1、在窗体内添加3个按钮(C o m m an dl,C o m m an d2,C o m m an ds),1个文本框(T e x tl),1个标签(Labe l 1),2个框架(F r am e l,F r am e 2),并在第1个框架中添加2个组合框(C o m bo l,C o m bo 2),4个标签(Labe l 2,Labe l 3,Labe l 4,Labe l 5),在第2个框架中添加3个单选框(Op tio n l,0p tio n 2,0p tio n 3)2、窗体设置：设置窗体名称(Nam e)为“F o r m 27”。设置窗体标题(C ap tio

46、n)为“添加监视”。窗体边框样式为 3-F ix e d Dial o g”。3、标签设置：设置第1个标签(Labe l 1)的标题(C ap tio n)为“表达式(&E):”。4、文本框设置：适当调整第1个文本框(T e x tl)的位置和大小。5、按钮设置：设置第1个按钮(C o m m an dl)的标题(C ap tio n)为 确定，De f aul t属性为真。设置第2个按钮(C o m m an d2)的标题(C ap tio n)为“取消，C an ce l”属性为真。设置第3个按钮(C o m m an ds)的标题(C ap tio n)为“帮助(&H)6、框架设置：设置

47、第1个框架(F r am e 1)的标题(C ap tio n)为“上下文”。设置第1个框架(F r am e l)中的标签(Labe l 2)的标题(C ap tio n)为“过程(&P):”。设置第1个框架(F r am e l)中的标签(Labe l 3)的标题(C ap tio n)为“模块(&M):”。设置第1个框架(F r am e l)中的标签(Labe l 4)的标题(C ap tio n)为“工程:。设置第1个框架(F r am e l)中的标签(Labe l 5)的标题(C ap tio n)为“工程1。适当调整第1个框架(F r am e l)中的组合框(C o m bo

48、 l)和组合框(C o m bo 2)的大小和位置。设置第12个框架(F r am e 2)的标题(C ap tio n)为“监视类型”。设置第2个框架(F r am e 2)中的单选框(Op tio n l)的标题(C ap tio n)为“监视表达式(&W)设置第2个框架(F r am e 2)中的单选框(0p tio n 2)的标题(C ap tio n)为“当监视值为真时中断(&T)”。设置第2个框架(F r am e 2)中的单选框(0p tio n 3)的标题(C ap tio n)为“当监视值改变时中断(&c)”。一、判 断 共 5题（共计5分）第1题（1分）V B通过窗体管理构

49、成应用程序的各类文件的集合.答案：N第2题（1分）V is ual Bas ic程序的运行,仅能从某一窗体启动，如F o r m l 窗体.答案：N第3题（1分）V B支持弹出菜单，所谓 弹出菜单”是指单击鼠标后打开的菜单.答案：N第4题（1分）V is ual Bas ic程序的运行可以从M ain。过程启动，也可以从某个窗体启动.答案：Y第5题（1分）V is ual Bas ic提供的几种标准坐标系统的原点都是在绘图区域的左上角,如果要把坐标原点放在其它位置,则需使用自定义坐标系统.答案：Y二、单 项 选 择 共 5题（共计5分）第1题（1分）V is ual Bas ic集成环境的大部

50、分窗口都可以从主菜单项0 的下拉菜单中找到相应的打开命令.A:编辑B:视图C:格式D:调试答案：B第2题（1分）V B应用程序的运行模式是0.A:解释运行模式B:编译运行模式C:两者都有D:汇编模式答案：c第3题（1分）vb 中的坐标圆点位于0.A:容器右上角B:容器左上角C:容器正中央D:容器右下角答案：B第4题（1分）窗体的C ap tio n 属性的作用是0.A:确定窗体的名称B:确定窗体的标题C:确定窗体的边界类型D:确定窗体的字体答案：B第5题（1分）不管一个对象的属性如何设置,程序运行时始终都能接收焦点的方法是（）.A:用T ab键B:用鼠标C:用方向键D:不能实现答案：D三、程