vb操作题Word格式文档下载.docx
- 文档编号:19938886
- 上传时间:2023-01-12
- 格式:DOCX
- 页数:16
- 大小:117.69KB
vb操作题Word格式文档下载.docx
《vb操作题Word格式文档下载.docx》由会员分享,可在线阅读,更多相关《vb操作题Word格式文档下载.docx(16页珍藏版)》请在冰豆网上搜索。
图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);
____(7)____
NEXTI
4、用选择法将10个两位随机整数按升序排列.
OPTIONExplicit
Privatesubcommand1_click()
Constn=10
DIMA(1ton)asinteger
DIMIasinteger,Jasinteger,Kasinteger,Tasinteger
FORI=1TOn
A(I)=____(8)_____
PRINTA(I);
FORI=1ton-1
K=I
FORJ=_(9)_
IFA(K)>
A(J)THEN__(10)__
IFK<
>
ITHEN
T=A(I)
A(I)=A(K)
A(K)=T
ENDIF
PRINT"
daraaftersorting:
"
PRINTA(I);
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
2、PrivateSubCommand1_Click()
DIMA(3,3)asinteger
FORI=0TO3
FORJ=0TOI
PRINTI*J;
NEXTJ
ENDSub
3、PrivateSubcommand1_click()
staticnasinteger
n=n+1
printn
问:
连击3次command1的显示结果。
4、DIMA(2,3)asinteger,B(3,2)asinteger
FORI=1TO2
FORJ=1TO3
A(I,J)=I+J
NEXTI
FORJ=1TO3
B(J,I)=A(I,J)
FORI=1TO3
FORJ=1TO2
PRINTB(I,J);
NEXTJ
五、编写程序(每题10分,共30分)
1.求出方程x+y+z=18的正整数解。
2.输出如下图形:
****
***
**
*
3.输出100到200之间的所有素数。
六、设计题(本题10分)
设计一个计算器:
由文本框输入两个整数,从组合框中选择四则运算符(+-*/)之一,获得计算结果并显示。
要求:
(1)画出界面,并箭头在界面外标明所用控件是何控件
(2)给出属性表
(3)编写程序代码
VisualBASIC程序设计》(B卷)
1.Rnd<
1orx<
y的值是_①_。
2.图形可分为_②__和_③____两大类。
3.RGB函数的功能是__④____。
4.隐藏窗体的方法是_⑤___。
5.装载图片的函数是__⑥____。
6.计算机程序流程的3种控制结构是__⑦__、_⑧_和__⑨__。
7.按下一个有ASCII码的键时,触发____⑩____事件。
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
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
FORI=1TO5
FORJ=1TO3
B(I,J)=VAL(INPUTBOX(“B(I,J)”))
_______(4)_______
FORK=
C(I,J)=______(5)__________
NEXTK
PRINTC(I,J);
____(6)_____
3.求矩阵A[5,8]中绝对值最大的元素及其行号和列号。
DIMA(5,8)
A(I,J)=VAL(INPUTBOX(“A(I,J)”))
MAX=_______(7)______:
H=1:
L=1
FORJ=____(8)_____
IFABS(A(I,J))>
MAXTHEN
MAX=_(9)_
H=I
L=__(10)__
ENDIF
PRINT“A(“;
H;
”,”;
L;
”)=”;
MAX
1.A=10:
B=9
FORI=1TO4
A=A-B
B=B-A
PRINTA,B
2.FORI=1TO5
PRINTTAB(8-I);
FORJ=1TOI
PRINTI;
””;
NEXTJ
3.DIMA(5,5)
A(I,I)=1:
A(I,1)=1
FORI=3TO5
FORJ=1TOI-1
A(I,J)=A(I-1,J-1)+A(I-1,J)
FORJ=1TOI
PRINTA(I,J);
NEXTI
4.FORI=3TO16
FORJ=2TOI-1
IFIMODJ=0THENJ=18
IFJ<
18THENPRINTI
1.利用过程计算S=1+(1+2)+(1+2+3)+……+(1+2+……+N)
2.在顺序文件”words.dat”中有一批英文单词,将它们中以”a”打头的英文单词输出。
3.画出函数y=lnx在区间(1,30)上的图形。
由文本框输入一个弧度,通过选择按钮计算并输出该弧度的正弦、余弦、正切的值。
(1)画出界面,并箭头在界面外标明所用控件是何控件
(2)给出属性表
(3)编写程序代码
随机数”菜单项,完成产生一定范围内的随机数,并存放在文件中。
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vb 操作