开发环境应用入门.ppt

  1. 1、本文档共48页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
实验一 Visual Basic6.0 开发环境应用入门 实验要求 ? 熟悉Visual Basic6.0的开发环境, ? 理解Visual Basic的对象的属性、事件和方法。 实验任务 Visual Basic的启动和退出,对窗口的操作,执行菜单命令的方法,工具栏和工具箱,对象的属性设计,控件的画法和基本操作,编写简单的Visual Basic应用程序,程序的保存和装入,程序的运行。 第二种方法: 通过“我的电脑”来打开Visual Basic6.0 第三种方法: 单击“ 开始”按钮 →“ 运行”命令,将弹出一个对话框 。来打开Visual Basic6.0 第四种方法: 建立启动Visual Basic6.0的快捷方式。 ?“新建”选项卡对话框 ? 可以建立的应用程序 (1)标准EXE程序 建立一个标准的EXE工程。 (2)ActiveX EXE和ActiveX DLL程序 这两种应用程序只能在专业版和企业中建立。 (3)ActiveX控件: 只能在专业版或企业版中建立,主要用于开发用户自定义的ActiveX控件。 (4)VB应用程序向导 用于在开发环境中直接建立新的应用程序框架。 (5)数据工程 为编程人员提供开发数据报表应用程序的框架。 (6)IIS应用程序 这是Visual Basic 6.0版样板增加的工程类型,可以用Visual Basic代码编写服务器方的Internet应用程序,用来响应由浏览器发出的用户需求。 (7)外接程序 选择该类型后,可以建立自己的Visual Basic外接程序,并在开发环境中自动打开连接设计器。 ?不再显示“新建工程”对话框 通过选择对话框(见图1.1)左下角的“不再显示这个对话框”选项来实现(用鼠标单击小方框,使框内有“?”)。 ? Windows MDI(多文档)开发环境 ? Windows SDI(单文档)开发环境 编程环境变为SDI方式的操作 执行“ 工具”菜单中的“ 选项”命令,打开“ 选项”对话框,选择“ 高级”选顶卡,在对话框中选择“ SDI开发环境”选项,然后单击“ 确定”按钮。 Visual Basic 6.0 菜单 菜单是在集成开发环境下发布命令的最基本手段。Visual Basic 顶级菜单有:文件、编辑、视图、工程、格式、运行、查询、图表、工具、外接程序、窗口、帮助,但菜单命令是通过子菜单中的子菜单项发出的。 文件菜单 文件菜单主要用于建立、打开、添加、移去、保存工程和文件,包括:新建工程 、打开工程 、添加工程 、移除工程 、保存工程 、工程另存为 、保存文件 、文件另存为 、打印 、打印设置 、生成工程 等子菜单项。 编辑菜单 视图菜单 工程菜单 格式菜单 调试菜单 查询菜单 运行菜单 图表菜单 工具菜单 外接程序菜单 窗口菜单 帮助菜单 四.工具栏的操作 五.工具箱的操作 2、设置属性   窗体的Caption 属性设置为 “登陆”   Label1的Caption属性设置为 “用户名”   Label2的Caption属性设置为 “密码”   text1、text2的text属性设置为 “”   text2的passwordchar属性设置为 “*”   Cammand1、cammand2的Caption属性分别设置为“确定”、“取消”   效果如下图: 成功,否则提示登录失败并继续输入 取消按钮用于推出本程序。 代码参考: Private Sub Command1_Click() Dim Name As String, Pwd As String Name = Trim(Text1.Text) Pwd = Trim(Text2.Text) If Name = "AMD" And Pwd = "123456" Then MsgBox "登录成功" Else MsgBox "登录失败,请重新登录" Text1.SetFocus End If End Sub Private Sub Command2_Click() End End Sub Private Sub Text1_GotFocus() Text1.SelStart = 0 Text1.SelLeng

文档评论(0)

20010520 + 关注
实名认证
内容提供者

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

1亿VIP精品文档

相关文档