[工学]VB指导书.docVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
[工学]VB指导书

Visual Basic程序设计 实 验 指 导 书 (计算机应用) 毕好昌 安徽电子信息职业技术学院 计算机科学系 2008年8月28日 目 录 说 明 2 实验1 QQ登录界面程序设计 4 实验2 简单文本编辑器 6 实验3 编写四则运算程序 8 实验4 选票统计 11 实验5 简单文本编辑器 13 实验6 温度计模拟程序 16 实验7 学生信息的录入 18 实验8 编写计算器程序 20 实验9 数字秒表的设计 23 实验10 编写函数过程实现数制转换 25 实验11 设计自定义对话框 27 实验12 带菜单的文本编辑器 29 实验13 创建记事本 31 实验14 多文档界面程序设计 35 实验15 设计文本浏览器 38 实验16 设计数据库浏览器 40 课程设计 43 说 明 Visual Basic是是培养程序开发思想设计能力的重要课程是Visual Basic程序设计的重要实践环节通过实验,使学生巩固课堂教学内容,加深对可视化及面向对象编程思想的理解强化利用Visual Basic进行程序流程控制使用常用控件的属性、事件方法通过实验,培养学生的编程能力理论联系实际的能力程序调试能力及创新能力。主要内容包括:语言基础、控件和窗体、菜单设计 属性名 设置值 From1 caption QQ登录窗体 Command1 Caption 高级设置↓ Command2 Caption 登录 Command3 Caption 取消 Command4 Caption 申请号码 Label1 Caption QQ账号: Label2 Caption QQ密码: Label3 Caption 忘了密码? Frame1 Caption Check1 Caption 自动登录 Check2 Caption 隐身登录 Combo1 text 请在这输入QQ密码 3、窗体设计 4、源代码 Private Sub Command2_Click() If Combo1.Text = she And Text1.Text = 111 Then MsgBox 登录成功! Else MsgBox 密码或用户名错误,请重新输入! End If End Sub 实验思考: 本次实验主要目的是帮助初学者了解VB程序的运行环境,在完成上述实验内容后,应该进一步了解运行环境中的其它功能。 实验2 简单文本编辑器 实验目的: 学会创建应用程序界面; 学习编写程序代码; 掌握常用控件的使用。 实验内容: 实验要求 设计出来的编辑器能够对文本框中的文字进行剪切、复制和粘贴。并且选中文本剪切、复制按钮可用,而粘贴按钮不可用。没选中则相反。单击“结束”按钮时结束程序运行。 窗体属性 对象名 属性名 设置值 form1 caption 简单文本编辑器 Text1 text ----- Command1 picture 图标文件 Command2 picture 图标文件 Command3 picture 图标文件 Command4 caption 结束 窗体设计 源代码 Dim st As String Private Sub cmdCopy_Click() st = Text1.SelText 将选中的内容存放到st变量中 End Sub Private Sub cmdCut_Click() st = Text1.SelText 将选中的内容存放到st变量中 Text1.SelText = 将选中的内容清除,实现了剪切 cmdCopy.Enabled = False cmdCut.Enabled = False cmdPaste.Enabled = True End Sub Private Sub cmdExit_Click() End End Sub Private Sub cmdPaste_Click() 将st变量中的内容插入到光标所在的位置,实现了粘贴 Text1.SelText = st End Sub Private Sub Form_Load() 设置剪切、复制、粘贴按钮无效 cmdCut.Enabled = False cmdCopy.Enabled = False cmdPaste.Enabled = False End Sub Private Sub Text1_MouseMove(Button As Integer, Shi

文档评论(0)

ctuorn0371 + 关注
实名认证
文档贡献者

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

1亿VIP精品文档

相关文档