- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
实验一 简单程序设计
【实验目的】
1. 掌握Visual Basic 6.0窗体的常用属性、常用事件和重要方法;
2. 熟练掌握在窗体上创建标签、命令按钮、文本框等控件的方法;
3. 掌握事件过程的代码编写,了解对象的概念;
4. 熟悉Visual Basic的集成开发环境,基本掌握开发应用程序的一般步骤。
【实验内容与指导】
1.建立一个简单应用程序,具体要求为:
⑴ 启动VB,创建一个新工程,窗体设置如下图所示:
要求:在文本框内输入自己姓名,单击“完成”按钮,则在标签控件中显示相应输入。
各控件主要属性如表1-1:
表1-1 控件属性表
控件 name(名字) Caption text 窗体 frmmain My First Program 文本框 Text1 “ “ 标签 Label1 请输入自己的姓名 命令按钮 Okbutton 完成 命令按钮 Exitbutton 退出
⑵ 双击窗体或控件,打开代码窗口,在相应的事件过程中输入如下代码:
Private Sub Okbutton _Click( )
Label1.Caption = Text1.Text
End Sub
Private Sub Exitbutton _Click()
End
End Sub
Private Sub Form_Load()
Label1.Caption = 请输入你的名字
Text1.Text =
End Sub
⑶ 运行并测试程序。
⑷ 按照自己的喜好,修改Text框和Label的各种属性,增强显示效果。
(该实验的工程文件保存为sy1_1.vbp,窗体文件为sy1_1.frm)。
2. 建立一个简单应用程序,具体要求为:
(1) 新建一个工程,利用“工程”菜单下的“添加窗体”命令,建立两个窗体,然后通过属性窗口设置窗体的相关属性,见表1-2。
表1-2 对象属性设置
对象 属性 属性值 说明 Form1 Name frmMain 窗体1的名称 Caption 主窗口 窗体1显示的标题 Left 2500 窗体1左上角垂直坐标 Top 3000 窗体1左上角水平坐标 Width 4500 窗体1的宽度 Height 5000 窗体1的高度 FontName 隶书 字体 FontSize 四号 字体大小 Form2 Name frmLogin 窗体2的名称 Caption 登录窗口 窗体2的标题 Controlbox False 控制菜单框 (2) 在第二个窗体的Load事件中编写代码frmlogin.Print “欢迎学习Visual Basic程序设计教程!”。
(3) 在第二个窗体上画出两个标签(标题为用户名及密码)、两个文本框(第二个文本框通过属性设置,使输入的字符显示为*号)、三个命令按钮,标题分别为“清屏”,“显示密码”,“登录”。当用鼠标单击第一个命令按钮时,执行语句frmLogin.Cls ,清除窗体上内容。当单击第二个命令按钮时,在输入密码的文本框中显示出刚输入的密码字符。当单击第三个命令按钮时,第二个窗体消失同时第一个窗体出现。
(4) 在第一个窗体上画三个命令按钮,标题分别为“按钮1”、“按钮2”及“结束”。编写适当的事件,当单击“按钮1”时,按钮2移动过来覆盖按钮1;当单击“按钮2”时,则按钮1移动过来覆盖按钮2;当单击“结束”按钮时结束程序的运行。
具体操作步骤为:
(1) 根据题目要求设置界面,设置各对象的属性。
(2) 根据题目要求编写代码,参考代码如下:
第一个窗体中的代码
Private Sub Command1_Click() ′移动命令按钮2的代码
Command2.Left = Command1.Left
Command2.Top = Command1.Top
Command2.Width = Command1.Width
Command2.Height = Command1.Height
End Sub
Private Sub Command2_Click() ′用move的方法移动命令按钮1的代码
Command1.Move,Command2.Left,Command2.Top,Command2.Width,Command2.Height
Command2.Visible = False
End Sub
Private Sub Command3_Click() ′结束程序
End
End Sub
第二个窗体中各控件的代码
Private Sub Command1_Click() ′清屏
frmlogin.Cls
End Sub
Private Sub Command2_Click()
您可能关注的文档
最近下载
- 智能客服:智能问答系统all.docx VIP
- HarmonyOS应用开发者高级认证答案.docx VIP
- 2025-2026学年小学心理健康南大版五年级-南大版教学设计合集.docx
- DB45T 2320-2021高等级公路环境风险防范措施及应急能力建设管理指南.docx VIP
- 神经外科手术并发症防治与处理解析与应用.docx VIP
- 园长开家长会PPT课件.pptx
- 外研版一年级起点七年级英语上册全套PPT课件.pptx
- NB_T 47013.7-2012 承压设备无损检测 第7部分目视检测.pdf VIP
- 人教版二年级上册数学全册教学设计(配2025年秋新版教材).docx
- 清洁能源技术课件PPT最新完整版本.pptx VIP
文档评论(0)