交通与汽车工程学院实验报告课程名称: 程序设计基础课程代码: 学院(直属系): 年级/专业/班:学生姓名:学号: 实验总成绩: 任课教师: 开课学院: 实验中心名称: 西华大学实验报告（理工类）开课学院及实验室：交通与汽车工程学院计算机实验室实验时间：年月日1、实验目的a) 理解vb中对象的概念。
b) 理解事件驱动的基本概念。
c) 熟悉vb编程的基本步骤：界面设计、属性设置、编写代码、运行、调试、保存文件。
d) 掌握常用控件的创建方法以及如何用控件建立用户界面。
e) 掌握在属性窗口中设置对象属性的基本操作。
掌握在代码窗口中编辑程序代码的基本操作。
了解在代码中改变对象属性的基本方法2、实验设备、仪器及材料操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0 3、实验内容3.1实验方案设计与选择（设计性、创新性实验需写该项内容） 3.2实验原理及实验步骤（实验工作原理或实验的主要操作过程）原理：vb中对象的操作与应用。
步骤：1.建立界面和对象，更改各个对象的属性;2.编写程序代码，运行程序;3.调试程序，改程序，得正确程序。
3.3实验记录（核心代码及调试过程）1、界面设计2、程序代码设计dim chname as string chname = text1.text label1.visible = false text1.move 360, 1440, 4500 text1.forecolor = vbbluetext1.text = 这是 & chname & 的第一个vb程序!end subend subprivate sub form_load() showclsform1.fillcolor = vbred printprint tab(3); 欢迎使用 visual basic!! end sub 3、运行/调试程序4、保存工程用相关命令在用户文件夹中保存窗体核工程文件，要求文件名分别是;firpro.frm,firpro.vbp4、实验总结4.1实验结果分析及问题讨论1若将form_load事件改成form_click事件过程，而其中的程序代码不变，运行程序后窗体上的显示有什么不同？答： form_click事件需单击窗体才能触发，而form_load事件由vb系统自动触发，如果改变，则需单击窗体才能显示结果。
西华大学实验报告（理工类）开课学院及实验室：交通与汽车工程学院计算机实验室实验时间：年月日1、实验目的1. 掌握窗体的常用属性、事件和方法。
2．掌握是窗体的鼠标事件及触发顺序。
3、掌握颜色的表示方法。
2、实验设备、仪器及材料操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0 3、实验内容3.1实验方案设计与选择（设计性、创新性实验需写该项内容） 3.2实验原理及实验步骤（实验工作原理或实验的主要操作过程）原理：通过对各个form事件的了解来进行编程。
步骤：1.先设计界面，进而代码编程；2.运行程序，结果显示在界面上。
3.3实验记录（核心代码及调试过程）。
1．界面设计2．程序代码设计private sub form_click()print 触发 form_click 事件 end subprivate sub form_dblclick() print 触发 form_dblclick 事件 end subprivate sub form_mousedown(button as integer, shift as integer, x as single, y as single)print 触发 form_mousedown 事件 end subprivate sub form_mouseup(button as integer, shift as integer, x as single, y as single)print 触发 form_mouseup 事件 end sub3．运行/调试程序4．保存工程4、实验总结4.1实验结果分析及问题讨论颜色的表示方法有几种？分别加以描述。
答：1.使用rgb函数rgb函数可返回一个long整数，来表示一个rgb颜色值。
其使用格式如下：rgb(red,green,blue)说明：red,green,blue 3种颜色是通过从0-255之间的一组亮度值组合来设定颜色。
2.使用qbcolor函数qbcolor函数可返回一个long值，用来表示所对应颜色值的rgb颜色码。
3.适用系统定义的颜色常数在vb系统中已经预先定义了常数可查表得起颜色值。
4.使用颜色设置值在十六进制数指定颜色的格式为：&hbbggrr.4.2实验总结心得体会答：操作时按键的不同会使结果出现差异，体现了不同事件的操作的不同。
通过该实验让我比较清楚的了解了form的各个事件。
西华大学实验报告（理工类）开课学院及实验室：交通与汽车工程学院计算机实验室实验时间：年月日1、实验目的1．掌握标签、文本框、命令按钮的常用属性、事件和方法。
2．掌握单选按钮和复选框、列表框和组合框的编程方法，尤其是单选按钮与框架的配合使用。
3．掌握运用图片框和图像框加载图像的方法。
4．掌握计时器和滚动条的编程方法。
2、实验设备、仪器及材料操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0 3、实验内容3.1实验方案设计与选择（设计性、创新性实验需写该项内容） 3.2实验原理及实验步骤（实验工作原理或实验的主要操作过程）原理：对标签、文本框、滚动条、组合框等控件的应用。
步骤： 1.界面设计， 2.程序代码编程， 3运行，调试，修改。
3.3实验记录（核心代码及调试过程）1．界面设计2．程序代码设计private sub check1_click() if check1.value = 1 then text1.font.bold = true else text1.font.bold = false end if end subprivate sub check2_click()text1.font.italic = not text1.font.italic end subtext1.text = 第一章 vb概述 & vbcrlf & 第二章程序设计基础 & vbcrlf & 第三章窗体及常用控件 & vbcrlf & 第四章结构化程序设计& vbcrlf & 第五章数组end subprivate sub hscroll1_change()text1.font.size = hscroll1.value end subprivate sub option1_click() = option1.caption end subprivate sub option2_click() = option2.caption end sub3．运行/调试程序4．保存工程4、实验总结4.1实验结果分析及问题讨论1、字体的选择可否使用复选框来实现？答：不可以，字体只能呈现出一种字体，所以只能用单选按钮实现。
4.2实验总结心得体会程序中标点的运用能改变显示的结果，有时会导致不能运行，注意标点很重要。
由于编程过程中标点应用不当使我走了很多冤枉路，下次记得标点的使用。
西华大学实验报告（理工类）开课学院及实验室：交通与汽车工程学院计算机实验室实验时间：年月日1、实验目的1. 熟悉vb的各种数据类型 2．掌握变量定义与赋值的方法。
3．掌握各种运算符和表达式的使用。
4．掌握常用内部函数的功能及其调用方法。
2、实验设备、仪器及材料操作系统：windows98/2000/2003/xp 编程工具：visual basic 6.0 3、实验内容 3.1实验方案设计与选择（设计性、创新性实验需写该项内容） 3.2实验原理及实验步骤（实验工作原理或实验的主要操作过程）原理：对ｖｂ各种数据的应用和内部函数的使用。
步骤：１.对界面进行设计，并改变对象的属性；２.编写程序代码；３.运行程序，调试程序，完成程序。
3.3实验记录（核心代码及调试过程）一、根据输入半径，计算圆的周长和面积。
1．界面设计界面设计如下图所示。
2．程序代码设计 option explicitdim r as single, s as single, area as single r = val(text1.text) s = 2 * pi * r area = pi * r ^ 2 text2.text = s text3.text = area end sub3．运行/调试程序程序开始的界面如下图所示。
输入半径后的界面如下图所示。
按“计算”按钮后，显示结果如下图所示。
4．保存工程二、已知三角形三条边的边长为a、b、c。
编写程序计算三角形面积：面积=s(s?a)(s?b)(s?c) 其中：s=（a+b+c）/2 1．界面设计界面设计如下图所示。
2．程序代码设计 option explicitprivate sub form_click()dim a as single, b as single, c as single dim area as single, s as single a = inputbox(请输入a:) b = inputbox(请输入b:) c = inputbox(请输入c:) s = (a + b + c) / 2area = sqr(s * (s - a) * (s - b) * (s - c)) print a=; a, b=; b, c=; c, 面积; area end sub3．运行/调试程序程序开始的界面如下图所示。
输入a后的程序界面如下图所示。
按“确定”按钮后，再输入b值后的界面，如下图所示。
按“确定”按钮后，再输入c值后的界面，如下图所示。
按“确定”按钮后，得结果，如下图所示。
4．保存工程4、实验总结4.1实验结果分析及问题讨论输入三边时用文本框作为输入时该如何操作？答：text1=”a”:text2=”b:text3=”c”4.2实验总结心得体会实验中的数据运用让我学会了很多，数据运用在现实中具有广泛应用。
实验中有很多问题需要解决，以后还有努力呀！西华大学实验报告（理工类）开课学院及实验室：交通与汽车工程学院计算机实验室实验时间：年月日1、实验目的1. 熟练掌握单分支程序设计的原理和实现方法。