精品第2章程序设计基础.doc

第二章Visual Basic程序设计基础一、 授课内容授课科目：计算机基础（VB）授课内容：第2章Visual Basic程序设计基础授课类型：讲授授课时I可：2学时主讲教师：朱泽民二、 教学目的要求知识目标：1. 理解计算机程序解题的步骤；2. 熟练掌握基本数据类型3. 熟练掌握内部函数4. 掌握运算符与表达式能力目标：培养学生“提出问题、分析问题、解决问题”科学的思维方法情感目标：通过创设情景，激发学生应用VB编写程序的学习兴趣，培养学生独立思考、勇于探究 的学习精神；鼓励学生编写程序来解决实际生活中的问题三、 教材分析概 述：基本数据类型、变量常量的声明是程序设计的基础，熟练掌握本章的内容是 今后读程和编程的关键教学重点：基本数据类型，变量和常量的声明教学难点：内部函数问题教学法、讲授法、类比法、讨论法等五、教学过程（-）导入新课Visual Basic保留了原来BASIC版本中的数据类型和语法，对某些语句和函数的功能作 了修改和扩展，并根据语言的可视化要求增加了一些新的操作在本章中，我们将学习构成 Visual Basic应用程序的基本元素，包括数据类型、常量、变量、运算符、表达式和函数等 内容。

讲授新课2.1字符集在Visual Basic中，字符采用Unicode （国际标准化组织字符标准）编码Unicode 编码不分中西文，任一字符都占用两个字节也就是说一个英文字母和一个汉字一样，都算 作一个字符，且都占用了两个字节的空间2. 2基本数据类型在Visual Basic +,数据类型分为基本数据类型、用户自定义类型和枚举类型三种1. 数值（Numeric）数据类型（1）字节型（Byte）字节型数据只用一个字节存储，因而表示数的范围很小，通常用来存储0・255之间的整 数除了 “取负”单目运算，其他适用于整型的运算都适用于字节型2） 整型（Integer）和长整型（Long）整型数据用两个字节存储，可以表示-32768-32767之间的整数长整型数据需要四个字 节来存储，与整型相比，能表示更大范围的整数3） 单精度型（Single）与双精度型（Double）%1 单精度数通常以4个字节（32位）存储单精度浮点数有多种表示形式，例如，123.6, -36.0, 0.1236E+3 （=0.1236X1（）3,其中 E 表示指数）1 双精度数通常以8个字节（64位）存储对于双精度浮点数，对指数形式用“D”代替 “E” 或指数形式后加 即可。

例如，-456.2351#, 0.456 235 1E+3#, 0.456 235 1D+3（4）货币型（Currency）主要用来表示货币值，是小数点位置固定的实型数，最多保留小数点后4位，4位以后 的小数将遵循“四舍五入”规则舍去，小数点前最多能表示15位例2・1】在窗体上分别输出一个单精度型、双精度型、货币型的数，比较三者的不同1） 代码编写Private Sub Form_Load（）Dim a As SingleDim b As DoubleDim c As Currencya = 2/ 13Debug.Print"单精度:"& ab = 2/ 13Debug.PrintM双精度：” & bc = 2/ 13Debug.PrintM货币型：”&cEnd Sub（2） 调试运行“启动”程序后，单击窗体，由于程序中使用了 Debug.Print语句，所以运行结果输出 到立即窗口中，如图2-1所示立即 单精度：.1538462 ▲双精度：・ 153846153846154货甫型：.1538 —1JJ /图2.1三种实数类型2. 字符串（String）数据类型字符申是用双引号界定的一个字符序列，由ASCII字符（除双引号和回车符之外）、汉字及其他可打印字符组成。

3. 逻辑型（Boolean）逻辑型乂称布尔型，用于表示只有两种取值的数据，True表示逻辑真，False表示逻辑 假当逻辑型数据转换为整型数据时，Ti-ue对应的数值为一1, False对应的数值为 0；当其他类型数据转换为逻辑型时，非零值转换为True,零转换为False4. 日期型（Date）用于表示日期和时间，日期的范围为公元100年1月1日〜9999年12月31日，时间范围从0:00:00〜23:59:59日期型数据表示方法有以卜•两种：（1 ）“#”标 o 用对 “#”将数据括起来，如：#5/9/07#,#200759#,#may 9,2007 10:02:56Am#2）数字序列表示6.变体型（Variant）如果没有为变量指明数据类型，Visual Basic就会缺省认为该变量为变体类型，它可以存 放任何类型的数据2. 3常量和变量常量是指程序运行期间，在内存中固定不变的量；变景是程序运行期间在内存中可以发 生改变的量2.3.1 Visual Basic 中的命名规则在Visual Basic中，变量或常量的命名必须遵循以下规则：（1） 必须以字母或者汉字开头；（2） 首字母后可以是字母、汉字、数字、下划线组成的序列；（3） 长度不超过255个字符；（4） 不区分大小写，如：TEMP、Temp、TeMp、temp为同一个名字；（5） 常用的命名方式是：前缀+其他字符，这种命名方式可以让读者见名知义，知道 该常量或变量的类型、控件的作用、函数的功能等。

如：Inta, sngb,分别指整型和单精度型变量；txtSum指用来显示总和的文本框6）不能使用系统关键字如Sub, Private等2.3.2常量1. 直接常量直接常量就是在程序代码中，以直接明显的形式给出的数，例 如：（1） 数值常量：123、-123.12!、56.49#、&0532（八进制整数以&O 开头）、&H4AF （十 六进制整数以&H开头）、5.0236E-I0 （科学计数法,表示5.0236X10』）（2） 字符串常量:”Select”、”开始”、心（空字符串）（3） 逻辑常量：只有True、False两个常量4） 日期常量：#5/21/2007#、#-20#. #2006-8-19 3:03:45 PM#2. 用户声明常量格式：Const常量名［AS类型］=表达式说明：（1）若省略IAS类型］,常量的类型由表达式值的类型决定（2）为了与变量名区分，一般常量名使用大写字母3）表达式由数值常数、字符串、运算符组成，但不能是系统函数 【例2.2】巳知半径，求圆的周长、面积及球体的体积Private Sub Form_Click （）Const PI = 3.1415926 ，声明常量圆半径圆周长圆面积球体体积Dim r As Single, 1 As Single, s As Single, v As Singler = 5.5I = 2 * PI * rs = PI * r * rv = 4/ 3*PI*r*r*rPrint 1, s, vEnd Sub程序运行后，单击窗体，得到结果为：34.55752 95.03317 696.913. 系统定义常量2.3.3变量1. 变量声明格式：Dim变量名［AS数据类型］Dim变量名+类型符说明：（1） 变量名由用户定义，需要遵循变量的命名规则；［AS数据类型］如果省略就表示变 量为变体类型。

2） 定义变量的两种格式本质上等价如：Dim i as Integer 等价于Dim i% ，（％为 Integer 的类型符）（3） 一条Dim语句可以同时声明多个变量，每个变量都要带上自己的数据类型，且用 逗号隔开4） 字符冷变量可根据其长度是否固定分为定长字符串和变长字符出两种，声明字符 串变量有两种格式：Dim变量名As String 声明变长字符串Dim变量名As String *字符数’声明定长字符串2. 变量声明分类（1） 隐式声明：在编程过程中直接使用某个变量，没有任何声明2） 显式声明：程序中出现的变量先声明后使用2.4内部函数2.4.1数学函数数学函数用于各种数学运算常用的数学函数如表2-3所示函数名功能实例计算结果说明Sin(x)求X的正弦Sin(5)-0.958924274663138X以弧度为单位Cos(x)求X的余弦Cos(5)0.283662185463226X以弧度为单位Tan(x)求x的正切Tan(5)-3.38051500624659x以弧度为单位Atn(x)求x的反正切Atn(5)1.37340076694502x以弧度为单位Log(x)求自然对数InxLog(10)2.30258509299405Log(x)与 Exp(x)互 为反函数Exp(x)求eExp(2)7.38905609893065Sqr(x)求X的平方根Sqr(16)4X不能为负数Abs(x)求X的绝对值Abs(3.6)3.6正数返同本身；Abs(-3.6)3.6负数返回・xSgn(x)判断X的符号Sgn(589.63)1正数返回1;Sgn(-12.3)-1负数返回・1Sgn(O)00返回02.4.2字符串函数函数名功能实例计算结果I《fl(s,n)从s左边开始取出n个字符Left(H Visual □ Basicf\6)“Visual”Righ((s,n)从s右边开始取出n个字符Righi(MVisualDBasic\5)“Basic”Mid(s,m [,n])从s的第ni位开始取出n个字符； 省略n则表示取至s的末尾Mid(”VisualUBasic”,5,5)\ilDBaMLtrim(s)去掉s左边的所有空格Ltrim(”口 口走吧“)“走吧“Rtrim(s)去掉s右边的所有空格Rtrim(H123aaaH)”123”String(n5s)返回由s的首字母绍成长度为n的沂宇符串String(6/,abcH)HaaaaaaHSpace(n)产生由n个空格组成的字符申Space(3)StrReverse(s)将字符申反序StrReverse(,,456M)”654”Join(a [,d])将a数组各元素用d做分隔符连接成字符串a = Array(15, MabcM)Join(a, ”*")”15*abc”SlrConv(stvbFromUnicodclvbUnicode)Unicode码字符串和DBCS字符串相”.转换SlrConv( Hy*\vbUnicodc)HHDyCMLen(s)求S的长度Len(“你好 Hi”)4LenB(s)求S占用字节数LenB(H你好 Hi”)8【例2.4】读程序，写出程序运行结果。

Private Sub Form_Click()a$ = "Visual Basic Programing"b$ = HI Like*1。