第8章实验1菜单多窗体.docx
- 文档编号:23356649
- 上传时间:2023-05-16
- 格式:DOCX
- 页数:11
- 大小:283.06KB
第8章实验1菜单多窗体.docx
《第8章实验1菜单多窗体.docx》由会员分享,可在线阅读,更多相关《第8章实验1菜单多窗体.docx(11页珍藏版)》请在冰豆网上搜索。
第8章实验1菜单多窗体
第8章实验1上机内容---菜单、多窗体
第1题:
图片查看器程序
(菜单设计,此题为刚刚讲过的例题,如果你想先熟悉一下菜单的设计,可以先做此题,如果你认为刚才讲的你已经掌握的很好了,可略过此题,直接做第2题)
标题
名称
快捷键
文件(&F)
MFile
…打开(&O)
FileOpen
Ctrl+O
…退出(&X)
FileExit
Ctrl+X
查看(&V)
MView
…放大
ViewBig
Ctrl+B
…缩小
ViewSmall
Ctrl+S
…-
line1
…右移
ViewRight
Ctrl+R
…左移
ViewLeft
Ctrl+L
第2题:
(菜单设计)
1.各个菜单的标题、快捷键如下页图,菜单的设计按下表要求
2.各个菜单的功能如菜单标题
3.程序运行时的文字移动速度自己定
标题
名称
快捷键
字幕滚动(&Z)
zm
----向左滚动
xz
CTRL+L
----退出
tc
文字格式
gs
----红色
hs
-----蓝色
ls
_
line1
----粗体
ct
----斜体
xt
----下划线
xhx
第3题:
设置效果如下图所示的“字体设置”程序,要求有如下功能:
(1)程序由两个窗体组成;窗体1是字体设置窗体,窗体2是字体颜色设置窗体,界面和其中的菜单如图
窗体1的界面和菜单如下3个图:
窗体2的界面如下图:
(2)窗体1中的菜单按如下要求表设置表:
菜单项
名称
热键
快捷键
菜单级别
字体
mFontName
N
1
黑体
mNameHei
2
隶书
mNameLi
2
字形
mFontStyle
X
1
粗体
mFontBold
Ctrl+B
2
倾斜
mFontItalic
Ctrl+I
2
下划线
mFontUnderline
Ctrl+U
2
字号
mFontSize
S
1
20
mFontS_20
2
32
mFontS_32
2
颜色
mFontColor
C
1
退出
mQuit
Q
1
(3)“字体设置”窗体中的标签“VB程序设计”以每100毫秒50缇的速度从左往右滚动,当标签从左侧滚动到窗体的最右端时,标签右侧从窗体左侧出现,循环滚动
(4)“字体设置”窗体中,在“字体”菜单内设置标签文字的字体;在“字形”菜单内设置标签文字的字形效果;在“字号”菜单内设置标签文字的字号;单击“颜色”菜单关闭窗体1,显示窗体2,即“颜色设置”窗体;单击“退出”直接退出程序;
(5)“颜色设置”窗体有三个滚动条,当改变三个颜色滚动条的值时,窗体1中文字的颜色会相应改变。
当单击“返回”按钮后,关闭窗体2,显示窗体1。
控件及属性设置表
对象名称
相关属性
所属窗体
Form1
Caption:
字体设置
Form1
Label1
Caption:
VB程序设计
Form1
Timer1
Interval:
100
Form1
Form2
Caption:
颜色设置
Form2
Label1
Caption:
红
Form2
Label2
Caption:
绿
Form2
Label3
Caption:
蓝
Form2
HScroll1
Min:
0
Max:
255
LargeChange:
5
SmallChange:
1
Form2
Hscroll2
Min:
0
Max:
255
LargeChange:
5
SmallChange:
1
Form2
Hscroll3
Min:
0
Max:
255
LargeChange:
5
SmallChange:
1
Form2
Command1
Caption:
返回
Form2
第4题:
(1)为窗体添加如下菜单
菜单项
菜单名称
热键
快捷键
菜单级别
文件
Wj
W
1
输入数据
Sr
Ctrl+A
2
计算指数
Js
Ctrl+B
2
退出
Tc
Ctrl+C
2
颜色设置
Ys
Y
1
红色
Hs
2
蓝色
Ls
2
字幕滚动
Zm
Z
1
向左滚动
Xz
Ctrl+K
2
停止滚动
Tz
2
(2)单击“输入数据”菜单项,显示Form2,隐藏Form1,在Form2中输入身高和体重,单击“返回”按钮,Form1显示,Form2隐藏;单击“计算指数”菜单项,显示Form3,隐藏Form1,在Form3中单击“您的身体质量指数是”按钮,通过公式:
指数=体重/身高的平方,直接使用Form2中的文本框计算身体指数并显示在Form3的文本框中,单击“返回”按钮,Form3隐藏,Form1显示;单击“退出”菜单项,退出VB的运行。
(3)单击“颜色设置”菜单中的各个菜单项,可以将Form1中的“测测你的身体质量指数”标签中的文字设置为不同的颜色。
(3)单击“向左滚动”菜单项,通过计时器(时间间隔设置为100毫秒)使Form1中的“测测你的身体质量指数”标签从右向左滚动(每次移动100twip),当滚动到窗体的左边界,从窗体的右边界出现继续滚动;单击“停止滚动”菜单项,标签停止滚动。
计算指数代码:
PrivateSubCommand2_Click()
Dimh!
w!
zs!
h=Val(Form2.Text1.Text)
w=Val(Form2.Text2.Text)
zs=w/h^2
Text1.Text=zs
EndSub
(4)上述程序设计好了运行成功后,可继续添加以下新功能:
在form3中text1下面,添加对象label1,用于显示身体质量指数所表示的含义。
(提示:
用多分支)
附带说明;身体质量指数的实际意义:
<15,太瘦了,15—20偏瘦,
21魔鬼身材,同学们朝这个方向努力啊!
22—30偏胖了,>30必须减肥了
三.提交作业:
下课前,将文件夹第8章实验1压缩为第8章实验1.rar,提交到服务器上自己班级中自己的文件夹中。
注意:
1.上机过程中出现的错误请及时记录,注意总结出错的原因并及时解决。
2.有问题请举手示意,我会尽可能快地去给你解答的。
祝同学们开心快乐!
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 实验 菜单 窗体