VB上机操作题综合 - 图文
VB程序设计—《暴风影音》
程序运行前:
程序运行后:
说明:当用户双击窗体任意区域时,播放器窗口最大化。 提示:窗体最大化可使用语句:Form1.windowstate = 2 详细内容:
程序使用控件如下:
窗体(Form)1个。 控件属性设置:
Form1 Caption BackColor
暴风影音 黑色
1 / 44
参考代码:
Private Sub Form_DblClick() Form1.WindowState = 2 End Sub
VB程序设计—《登录框》
程序运行:
说明:制作如图所示登录框,其中,用户名限制输入6位长度,密码以“*”号显示。
详细内容:
程序使用控件如下:
窗体(Form)1个,标签(Label)2个,文本框(TextBox)2个,按钮(Command Button)2个。 控件属性设置:
Form1 Caption Label1 Caption Font Text1 Text
登录框 用户名 小三 清空
Label2 Caption Font Text2 Text
2 / 44
密 码 小三 清空
Font
MaxLength Command1 Caption Font
小三 6 登录 小三
Font
Passwordchar Command2 Caption Font
小三 *
退出 小三
VB程序设计—《静夜思》
程序运行:
说明:当用户点击程序中的“显示诗句”按钮时,程序相应位置显示对应诗句.
程序使用控件如下:
窗体(Form)1个,标签(Label)5个,按钮(CommandButton)4个。 控件属性设置:
Form1 Caption Label2 Caption Font Visible
诗词记忆练习
床前明月光, 小二,隶书 False
Label1 Caption Font Label3 Caption Font Visible
静夜思 一号,隶书 疑是地上霜。 小二,隶书 False
Label4 Caption Font Visible Command1
举头望明月, 小二,隶书 False
Label5 Caption Font Visible Command2
3 / 44
低头思故乡。 小二,隶书 False
Caption Font Command3 Caption Font
显示诗句 三号 显示诗句 三号
Caption Font Command4 Caption Font
显示诗句 三号 显示诗句 三号
参考代码:
Private Sub Command1_Click() Label2.Visible = True End Sub
Private Sub Command2_Click() Label3.Visible = True End Sub
Private Sub Command3_Click() Label4.Visible = True End Sub
Private Sub Command4_Click() Label5.Visible = True End Sub
Private Sub Form_Load() End Sub
VB订餐
4 / 44
运前 运行
功能:当单击窗体上的“计算金额”命令按钮时,弹出如图所示消息框MsgBox,并显示相应消费金额。
参考代码:
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer, d As Integer, S As Integer a = Val(Text1) b = Val(Text2) c = Val(Text3)
S = 10 * a + 12 * b + 2 * c
MsgBox \您好!您本次消费共计\元\欢迎使用\End Sub
VB简单加法计算器
5 / 44
相关推荐:
- [建筑文档]2018年公需课:专业技术人员创新能力与
- [建筑文档]2013年福建教师招考小学数学历年真题
- [建筑文档]高中信息技术课flash知识点总结 - 图文
- [建筑文档]电工实训 - 图文
- [建筑文档]最高院公告案例分析100篇(民商篇)
- [建筑文档]南开中学高2017级14-15学年(上)期末
- [建筑文档]五粮液集团战略分析
- [建筑文档]鲁教版(2012秋季版)九年级化学 酸碱
- [建筑文档]超星尔雅2017中国哲学概论自整理题库答
- [建筑文档]关于成为海口金盘饮料公司材料独家供货
- [建筑文档]LNG学习资料第一册 基础知识 - 图文
- [建筑文档]四年级品社下册《好大一个家》复习资料
- [建筑文档]现阶段领导权力腐败的特点及发展趋势
- [建筑文档]魏晋南北朝诗歌鉴赏—嵇康
- [建筑文档]坚持追求真爱是理智的行为 正方一辩稿
- [建筑文档]湘西州刑释解教人员帮教安置工作存在的
- [建筑文档]园林工程试题库及答案
- [建筑文档]计算机长期没有向WSUS报告状态
- [建筑文档]日语最新流行语
- [建筑文档]B62-016 景观进场交底专题会议
- 2018年中考语文课内外古诗词鉴赏专题复
- 高考试题研究心得体会
- C语言基础题及答案
- 电气控制及PLC习题及答案
- 都昌小学家长学校汇报材料
- GMAT作文模板正确使用方法
- 俄军办坦克大赛:中国99式有望与豹2A6
- 成本会计练习题
- 酒店餐饮业最流行的5S管理方法
- 2014-2015学年山东省菏泽市高二(下)
- 《黄鹤楼送孟浩然之广陵》教案、说课、
- 2013年结构化学自测题 有答案版
- 2011西安世界园艺博览会游览解说词(附
- 窗口文明单位示范单位创建活动总结
- 2018满分超星尔雅就业课后练习期末答案
- 韶山市城市总体规划-基础资料
- 苏教版第三单元知识点归纳
- 第4章 曲轴模态分析
- 加大查办案件力度的思考
- 武汉CPC导轨介绍




