程序的设计基础实验报告.doc

第 1 第 1 组 西华大学实验报告（理工类） 开课学院及实验室：汽车学院机房（5D-215） 实验时间： 2008年 3 月 9 日 学 生 姓 名 吴沉 学 号 1108 实 验 成 绩 课 程 名 称 程序设计基础 课 程 代 码 8426460 实验项目名称 实验一 图像框、滚动条、计时器 项 目 代 码 指 导 教 师 滕艳琼 梅 项 目 学 分 实验课考勤 实验工作表现 实验报告 1、实验目的 1．掌握标签、命令按钮的常用属性、事件和方法。 2．掌握运用图片框和图像框加载图像的方法。 3．掌握计时器和滚动条的编程方法。 2、实验设备、仪器及材料 PC机；操作系统：WINDOWS98/2000/2003/XP；编程工具：Visual Basic 6.0 3、实验容 3.1上机实验的容及要求 编写动画程序。运行界面如图所示。单击“开始”按钮，图像从左到右不断运动，“开始”按钮变为不可用，同时“停止”变为可用；用滚动条来控制运动的速度。 3.2算法设计思想与算法实现步骤 界面设计 相关属性设置如下： Command1:Caption为“开始”。 Command2: Caption为“停止”， Enabled为 False。 HScroll1:Max 为 1000， LargeChange 为 200 ， SmallChange 为20。 Label1 Label2: Caption分别为“快”和“慢”。 Timer1:Enabled 为 False。 Image:Stretch 为True， Picture过剪贴板粘贴一幅图象。 程序代码设计 运行/调试程序 保存工程 3.3程序核心代码，程序调试过程中出现的问题及解决方法 Private Sub Command1_Click() Command2.Enabled = True Command1.Enabled = False Timer1.Enabled = True End Sub Private Sub Command2_Click() Command1.Enabled = True Command2.Enabled = False Timer1.Enabled = False End Sub Private Sub HScroll1_Change() Timer1.Interval = HScroll1.Value End Sub Private Sub Timer1_Timer() Image1.Move (Image1.Left + 1) End Sub 3.4 程序运行的结果 4、实验总结 4.1程序运行结果分析及思考题讨论 试验中主要是滚动条和计时器的连动没有弄明白，其次是图片没有打开。 对思考题，我认为还是要把image的move属性学好，再结合计时器的使用，问题应该可以迎刃而解，不过这个过程中仍然少不了及格控件的连动。 4.2实验总结心得体会 本实验中，我对滚动条的认识还不是很深，在以后的过程中要还好好运用滚动条，多加强对它的认识和了解。 通过本次上机实验，基本上熟悉了vb的编程环境，熟悉了及格基本控件的使用方法，对控件的一些连动有了一定的认识。了解了一些基本控件的基本属性。在今后的学习和实验过程中要加强对它们的应用和了解。 第 1 第 1 组 西华大学实验报告（理工类） 开课学院及实验室：汽车学院机房（5D-215） 实验时间： 2008年 3 月 9 日 学 生 姓 名 吴沉 学 号 1108 实 验 成 绩 课 程 名 称 程序设计基础 课 程 代 码 8426460 实验项目名称 实验二 单选按钮、复选按钮、组合框 项 目 代 码 指 导 教 师 滕艳琼 梅 项 目 学 分 实验课考勤 实验工作表现 实验报告 1、实验目的 1．掌握标签、文本框、命令按钮的常用属性、事件和方法。 2．掌握单选按钮和复选框、列表框和组合框的编程方法，尤其是单选按钮与框架的配合使用。 3．巩固对滚动条的编程方法。 2、实验设备、仪器及材料 PC机；操作系统：WINDOWS98/2000/2003/XP；编程工具：Visual Basic 6.0 3、实验容 3.1上机实验的容及要求 在文本框中输出一段文字，设置文字的字体、字型、字号和颜色，程序运行界面如图所示。 3.2算法设计思想与算法实现步骤 界面设计 程序代码设计 3．运行/调试程序 4．保存工程 3.3程序核心代码，程序调试过程中出现的问题及解决方法 Private Sub Combo