vb操作题.docx
- 文档编号:6917390
- 上传时间:2023-01-12
- 格式:DOCX
- 页数:16
- 大小:117.69KB
vb操作题.docx
《vb操作题.docx》由会员分享,可在线阅读,更多相关《vb操作题.docx(16页珍藏版)》请在冰豆网上搜索。
vb操作题
预备知识:
1.多重窗体的切换方法,窗体之间变量和控件的访问方法。
2.图片框的picture属性添加艺术字。
3.给命令按钮设置快捷键的方法
4.KeyPress事件的应用
5.熟悉各种选择结构,循环结构的语句格式和功能。
6.熟悉简单的算法。
预期目标:
1.巩固图片框、图像框、文本框等基本控件的使用。
2.掌握快捷键的设置方法。
3.熟练掌握消息框、输入框的使用。
4.熟悉多窗体的创建、添加、启动。
5.掌握判断水仙花数、同构数、完全数、素数等算法。
6.掌握二进制、十进制和十六进制之间的转换算法。
基本功能要求:
1.设计“有趣的数字”窗体为启动窗体。
如图1-1所示。
2.单击“进入”按钮或按AIl+E组合键,切换到“功能控制按扭”窗体,如图1-2所示。
单击“最大公约数和最小公倍数”按钮时,切换到“最大公约数和最小公倍数”窗体,如图1-3所示,并完成最大公约数和最小公倍数的求解。
单击“水仙花数”按钮时,切换到“水仙花数”窗体,如图1-4所示;单击“同构数”按钮时,切换到“同构数”窗体,如图1-5所示;单击“数制转换”按钮时,切换到“数制转换”窗体,如图1-6所示;并分别完成各项功能。
3.单击每个窗体的“返回”按钮时,切换到启动窗体。
4.单击启动窗体的“退出”按钮或按AIl+X组合键,切换到“退出”窗体,如图1-7所示。
可选择退出结束程序运行或返回启动窗体。
图1-1
shu
图1-2
图1-3
图1-4
图1-5
图1-6
图1-7
图1-8
图1-9
基础训练:
1.设计界面
根据基本功能的描述和工程程序的下载包,设计“水仙花数”和“数制转换”窗体。
2.编写代码
根据基本功能的描述和工程程序的下载包,将省略的事件代码补充完整。
提高与创新训练:
1.找出程序代码中健壮性不强的地方,并修改。
2.添加用户登录界面如图1-8,只有输入正确的用户名和密码才能进入系统。
并且要求输入用户名和密码的次数不能超过三次,如果连续3次输入都不能进入系统,则强行退出程序。
3.将“功能控制按钮”窗体改成带菜单的窗体形式,如图1-9所示,通过选择下拉菜单的选项来相应完成各命令按钮的功能。
4.将所找到的一定范围内的水仙花数,同构数,完全数分别存储在相应的文件中去。
5.添加“帮助菜单”功能,并将帮助信息存放在文件中。
添加“
《VisualBASIC程序设计》(A卷)
一、填空题(每空1分,共10分)
1.单选按钮option1.value=true,说明该按钮_①_(被选中/未选中)
2.根据存取方式,文件可分为_②___文件和__③___文件
3.DIMAASinteger,也可以写成__④____
4.printformat(63.57,”000.000”)的输出结果是_⑤___
5.k=a=b第一个是__⑥____号,第二个是__⑦__号
6.DIMA(2,3)asstring,则数组A最多能放_⑧_个元素,各元素是__⑨__类型。
7.设a,b,c是三角形的三条边长,写出能构成三角形的逻辑表达式
____⑩____
二、选择题(每空1分,共10分)
1.窗体文件的扩展名是_①__工程文件的扩展名是_②___
A..vbpB..logC..frmD..bas
2.“立即窗口”选项是在_③__里
A.窗口菜单B.视图菜单C.工具菜单D.编辑菜单
3.在面向对象的程序设计中,对象的性质和状态特征称为_④___
A.消息B.类C.属性D.事件
4.fontbold=true表示将字体设为__⑤____
A.斜体B.粗体C.加中划线D.加下划线
5.属于外颜色属性的是_⑥__
A.heightB.topC.leftD.backcolor
6.文本框的text属性返回值是_⑦__类型,autosize属性是_⑧____类型。
A.逻辑B.数值C.字符D.日期
7.将按钮的鼠标事件屏蔽,可将__⑨___属性设为false
A.captionB.textC.enableD.visible
8.不能使用print方法的对象_⑩___
A.printerB.formC.pictureboxD.text
三、程序填空(每空2分,共20分)
1、计算S=1+2+3+…+100
S=0:
N=0
WHILE__
(1)__
N=N+1
__
(2)_____
WEND
PRINTS
2、有一批从1到99的整数,分别统计其个位数是1,2,3,…,9的数各有多少。
DIMX(9)asinteger,Nasinteger,Masinteger,Iasinteger,Jasinteger
N=val(INPUTBOX(“输入个数”))
FORI=1TON
M=VAL(INPUTBOX(“输入待统计的整数”))
J=____(3)____
X(J)=_______(4)_______
NEXTI
FORJ=1TO9
PRINTX(J)
NEXTJ
3、建立并打印一个主对角线元素为1,其余元素为零的10行10列的二维数组。
DIMA(10,10)asinteger
FORI=1TO10
FORJ=1TO10
______(5)__________
IF_____(6)______THENA(I,J)=1
PRINTA(I,J);
NEXTJ
____(7)____
NEXTI
4、用选择法将10个两位随机整数按升序排列.
OPTIONExplicit
Privatesubcommand1_click()
Constn=10
DIMA(1ton)asinteger
DIMIasinteger,Jasinteger,Kasinteger,Tasinteger
FORI=1TOn
A(I)=____(8)_____
PRINTA(I);
NEXTI
FORI=1ton-1
K=I
FORJ=_(9)_
IFA(K)>A(J)THEN__(10)__
NEXTJ
IFK<>ITHEN
T=A(I)
A(I)=A(K)
A(K)=T
ENDIF
NEXTI
PRINT"daraaftersorting:
"
FORI=1TOn
PRINTA(I);
NEXTI
Endsub
四、写下列程序的运行结果(每题5分,共20分)
1、PrivateSubCommand1_Click()
FORI=1TO5STEP2
CALLF(I)
NEXTI
EndSub
SubF(J)
T=1
FORK=1TOJ
T=T*K
NEXTK
PRINT"T=";T
EndSub
2、PrivateSubCommand1_Click()
DIMA(3,3)asinteger
FORI=0TO3
FORJ=0TOI
PRINTI*J;
NEXTJ
NEXTI
ENDSub
3、PrivateSubcommand1_click()
staticnasinteger
n=n+1
printn
ENDSub
问:
连击3次command1的显示结果。
4、DIMA(2,3)asinteger,B(3,2)asinteger
FORI=1TO2
FORJ=1TO3
A(I,J)=I+J
NEXTJ
NEXTI
FORI=1TO2
FORJ=1TO3
B(J,I)=A(I,J)
NEXTJ
NEXTI
FORI=1TO3
FORJ=1TO2
PRINTB(I,J);
NEXTJ
NEXTI
五、编写程序(每题10分,共30分)
1.求出方程x+y+z=18的正整数解。
2.输出如下图形:
****
***
**
*
3.输出100到200之间的所有素数。
六、设计题(本题10分)
设计一个计算器:
由文本框输入两个整数,从组合框中选择四则运算符(+-*/)之一,获得计算结果并显示。
要求:
(1)画出界面,并箭头在界面外标明所用控件是何控件
(2)给出属性表
(3)编写程序代码
VisualBASIC程序设计》(B卷)
一、填空题(每空1分,共10分)
1.Rnd<1orx 2.图形可分为_②__和_③____两大类。 3.RGB函数的功能是__④____。 4.隐藏窗体的方法是_⑤___。 5.装载图片的函数是__⑥____。 6.计算机程序流程的3种控制结构是__⑦__、_⑧_和__⑨__。 7.按下一个有ASCII码的键时,触发____⑩____事件。 二、选择题(每空1分,共10分) 1.运行VB程序的功能键是_①_。 A.F1B.F3C.F5D.F8 2.可以作父控件的控件是_②__。 A.文本框B.标签C.框架D.组合框 3.没有Caption属性的控件是_③____。 A.文本框B.标签C.框架D.滚动条 4.InputBox函数的返回值类型是__④____,MsgBox函数的返回值类型是_⑤___。 A.数值B.字符C.逻辑D.日期 5.不能用于打印机的坐标刻度是__⑥___。 A.磅B.英寸C.字符D.像素 6.不能接收焦点的控件是__⑦__。 A.文本框B.窗体C.命令按钮D.框架 7.无Picture属性的控件是_⑧_。 A.命令按钮B.图片框C.单选按钮D.框架 8.变量的作用域分__⑨__级,过程的作用域分___⑩___级。 A.1B.2C.3D.4 三、程序填空(每空2分,共20分) 1.求满足条件: 1+2+3+……+N>1000的最小的N。 S=0 __ (1)__ WHILE __ (2)_____ S=S+N WEND PRINT“N=”;____(3)____ 2.求矩阵A[3,5]和B[5,3]的乘积C。 DIMA(3,5),B(5,3),C(3,3) FORI=1TO3 FORJ=1TO5 A(I,J)=VAL(INPUTBOX(“A(I,J)”)) NEXTJ NEXTI FORI=1TO5 FORJ=1TO3 B(I,J)=VAL(INPUTBOX(“B(I,J)”)) NEXTJ NEXTI FORI=1TO3 FORJ=1TO3 _______(4)_______ FORK= C(I,J)=______(5)__________ NEXTK NEXTJ NEXTI FORI=1TO3 FORJ=1TO3 PRINTC(I,J); NEXTJ ____(6)_____ NEXTI 3.求矩阵A[5,8]中绝对值最大的元素及其行号和列号。 DIMA(5,8) FORI=1TO3 FORJ=1TO5 A(I,J)=VAL(INPUTBOX(“A(I,J)”)) NEXTJ NEXTJ MAX=_______(7)______: H=1: L=1 FORI=1TO5 FORJ=____(8)_____ IFABS(A(I,J))>MAXTHEN MAX=_(9)_ H=I L=__(10)__ ENDIF NEXTJ NEXTI PRINT“A(“;H;”,”;L;”)=”;MAX 四、写下列程序的运行结果(每题5分,共20分) 1.A=10: B=9 FORI=1TO4 A=A-B B=B-A PRINTA,B NEXTI 2.FORI=1TO5 PRINTTAB(8-I); FORJ=1TOI PRINTI;””; NEXTJ PRINT NEXTI 3.DIMA(5,5) FORI=1TO5 A(I,I)=1: A(I,1)=1 NEXTI FORI=3TO5 FORJ=1TOI-1 A(I,J)=A(I-1,J-1)+A(I-1,J) NEXTJ NEXTI FORI=1TO5 FORJ=1TOI PRINTA(I,J); NEXTJ PRINT NEXTI 4.FORI=3TO16 FORJ=2TOI-1 IFIMODJ=0THENJ=18 NEXTJ IFJ<18THENPRINTI NEXTI 五、编写程序(每题10分,共30分) 1.利用过程计算S=1+(1+2)+(1+2+3)+……+(1+2+……+N) 2.在顺序文件”words.dat”中有一批英文单词,将它们中以”a”打头的英文单词输出。 3.画出函数y=lnx在区间(1,30)上的图形。 六、设计题(本题10分) 由文本框输入一个弧度,通过选择按钮计算并输出该弧度的正弦、余弦、正切的值。 要求: (1)画出界面,并箭头在界面外标明所用控件是何控件 (2)给出属性表 (3)编写程序代码 随机数”菜单项,完成产生一定范围内的随机数,并存放在文件中。
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vb 操作