VB实训报告完整版.doc

  1. 1、本文档共17页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
用户控制界面实训报告 学号: 081011041 姓名: 王 跃 班级: 应电101 专业: 应用电子技术 目录 一、设计题目 1 二、设计目的 1 三、设计任务 1 四、设计内容 1 五、设计界面 1 六、程序流程图 6 七、程序清单及注释 7 八、设计心得 16 九、参考资料 17 设计题目: (1)题目:学生学籍管理与串行通信综合系统 二、设计目的: 用户控制界面开发课程设计是本专业完成教学大纲要求的重要实践性环节之一,是培养应用性人才的一种教学形式。《用户控制界面开发课程设计》通过运用Visual Basic 6.0设计用户GUI界面,并实现PC机与PC机的串行通信以及单片机与上位机的串行通信,使得学生能真正掌握上位机的开发设计方法,并培养学生独立思考,刻苦钻研,同时注意树立团队意识,为今后走向工作岗位打下良好的基础。 设计任务 1、利用Visual Basic 6.0独立设计用户GUI界面。 2、根据设计内容,画出程序的流程图并编写程序,实现程序相应的功能。 3、调试程序,测试所设计的软件直到满足设计要求。 四、设计内容 1、设计用户登录、管理及主界面等的GUI界面。 2、利用Visual Basic 6.0的ADO或DATA控件实现对access数据库的相应 操作 3、利用Visual Basic 6.0的MSComm控件实现PC机与PC机、PC机与单片机的相互通信。 五、设计界面 1、数据库访问:利用VB界面实现对access数据库先注册后登录操作,然后对数据库中的纪录进行增加、删除、修改以及浏览操作。 2、菜单和工具栏的设计:菜单和工具栏的建立,参见主界面。 任务二 VB控制界面设计 利用串行控件实现与计算机或下位单片机的数据通信与控制。使用VB6.0中的通信控件Microsoft?Communication?Control 6.0(简称MSComm),对其属性和事件进行相应编程操作,以实现PC机的RS232串行接口和单片机异步串行通信接口之间的相互通信。 六、程序流程图 登录 登录 用户名 查找用户 是否存在 密码 退出 七、程序清单及注释 1、开始界面程序如下: Private Sub Command1_Click() 局部的 子过程 对象窗体 装载事件 开始界面.Visible = False 开始界面隐藏 主界面.Visible = True 主界面显示 End Sub Private Sub Timer1_Timer() Label1.Left = Label1.Left - 100 使标签的left属性(控件与窗体左边界的距离)值每隔0.1秒减少100,实现向左移动100个twip(长度单位,1twip=1/1440 If Label1.Left + Label1.Width 0 Then 如果标签的left属性+标签width属性0 就执行下面的 Label1.Left = 开始界面.Width 标签的left事件=窗体的width事件 End If 2、主界面程序如下 Private Sub ct_Click() 串通实验界面.Show End Sub private Sub dl_Click() 用户登录界面.Show End Sub Private Sub Edit_Click() 学生信息界面.Show End Sub Private Sub Form_Load() Toolbar1.Buttons.Item(4).Enabled = False Toolbar1.Buttons.Item(5).Enabled = False End Sub Private Sub tc_Click() End End Sub Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button) Select Case Button.Key Case dl dl_Click Case ct ct_Click Case xj Edit_Click Case zc 用户注册界面.Show Case zx 用户注销界面.Show End Select End Sub Private Sub zc_Click() 用户注册界面.Show End

文档评论(0)

131****8213 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档