- 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
北京电大 Visual Ba的sic程序设计 第3章 应用程序接口设计及代码编写
Visual Basic 程序设计;第三讲 应用程序接口设计 及代码编写 ;[内容简介];;[学习目标] ;3.1“简单的计算器”应用程序任务 ;3.1.1 任务概述 ;运行主界面;帮助:关于窗体;3.1.2 界面布局 ;3.1.3 界面设计 ;3.1.4 代码设计 ;;;;;;;;;;;3.2可视化界面设计基础 ;3.2.1 可视化界面设计概述 ;;;;;3.2.2 多窗体设计 ;;3.2.3 MDI多文档窗体的设计 ;;;;;;;MDI窗体示例;MDI窗体示例;Arrange的主要参数;3.2.4 窗体的运行模式 ;模态和非模态显示例子;;;3.3可视化界面高级设计 ;3.3.1 菜单设计 ;菜单的基本组成;;;;利用菜单编辑器制作菜单;菜单项目;运行界面;创建方法;3.3.2 框架、单选钮和复选框控件 ;基本用法;3.3.3 列表框控件(ListBox) ;;;;;;3.3.4 组合框控件(ComboBox) ;;3.3.5 工具栏、状态栏和图标列表控件 ;1.添加控件的方法 ;2.使用实例 ;代码;3.3.6 通用对话框控件(CommonDialog) ;1.“打开” 对话框;2.“另存为”对话框 ;3.“颜色”对话框 ;;3.3.7 其他常用控件 ;3.4代码设计基础 ;3.4.1 变量的声明 ;;;;3.4.2 基本数据类型 ;实例;;;3.4.3 变量初始值 ;3.4.4 变量的作用域 ;;;;;3.4.5 变量的生命周期 ;;;;;3.4.6 常量 ;3.4.7 运算符和表达式 ;1.算术运算符;2.关系运算符 ;3.逻辑运算符 ;4.字符串连接符 ;3.4.8 常用函数 ;2.字符串函数 ;;3.日期函数;4.格式化函数 ;;3.4.9 流程控制语句 ;选择结构;循环结构 ;3.5工程化思想及编程风格 ;控件 ;2.编程风格 ;总之;本章习题;;;作业;;;;;;;;第二单元 界面代码设计与语言技巧: 第三章:应用程序接口设计及代码编写 学习目标:通过实例分析完成可视化界面设计、掌握变量与常量的概念及用法;学会对运算符及流程控制语句和常用函数的使用,系统地掌握VB编程的一般方法及相关知识。 重点内容:1、可视化界面设计、变量和常量的 使用; 2、运算符及流程控制语句的使用; 3、常用函数的使用。 难点内容:多窗体设计、通用对话框控件的使用。 ;一、创建一个简单计算器应用程序 界面P52图3.1,创建工程-窗体Form1,属性Caption设置为计算器;4个文本框(TextBox): TextResult(显示结果文本框) TextFirst(显示第一个数字文本框) TextLabel(显示运行符文本框) TextSecond(显示第二个数字文本框);二个框架(Fram)属性Caption分别为数字区、功能区;在数字区内建11个命令按钮,属性Caption分别为7、8、9、4、5、6、1、2、3、0、+/- ;在功能区内建6个命令按钮属性Caption分别为加、减、乘、除、计算结果、清空;最后一个命令按钮属性Caption为退出;设计菜单(图3.4)。 进入程序 ; 编写代码如下: 1、窗体的Load事件 Private Sub Form-Load () TextFirst.Text = “” TextSecond.Tex = “” TextLabel.Text = “” End Sub;2 、数字区的命令按钮的Click事件 (1)、数字“0”按钮 Private Sub Command1- Click () If TextLabel.Text = “” Then TextFirst.Text = TextFirst.Text + “0” Else TextSecond.Tex = TextSecond.Tex + “0” End if End Sub ;(2)、数字“1”按钮 Private Sub Command3- Click () If TextLabel.Text = “” Then TextFirst.Text=TextFirst.Text + “1” Else TextSecond.Tex=TextSecond.Tex + “1” End if End Sub ;(3)、数字“2”按钮 Private Sub Command4- Cl
您可能关注的文档
最近下载
- 《高铁乘务》专业人才培养方案.docx VIP
- 《无机及分析化学》教案.doc VIP
- 松下DC-GX9GK高级功能说明书说明书.pdf VIP
- 职业道德与职业素养.ppt VIP
- 2025年租房合同范本(可直接打印)与租房合同范本(标准版) .pdf VIP
- 人教版七年级英语上册:Unit1 《单元写作小专题》.ppt VIP
- 道路白改黑施工组织设计方案.doc VIP
- 【新教材】2025-2026学年人教版(2024)初中八年级上册英语教学计划及进度表.pdf VIP
- 2025年医德医风考试试题(附答案).docx VIP
- ZOOM声乐乐器H8 使用说明书 (Chinese)用户手册.pdf
文档评论(0)