项目二 认识Visual Basic6.0函数（教案）-《Visual Basic6.0项目教程》（电工版第3版）同步精品课堂

《2.4认识Visual Basic函数》教案 课 题 《2.4认识Visual Basic函数》 课 型 讲授 课 时 2 授课班级 计算机专业学生 授课时间 授课教师 教材分析 本课程采用的教材是电子工业出版社出版的《Visual Basic6.0项目教程6.0项目教程》，是2025年新高考大纲指定教材。本章是第二章，主要内容Visual Basic6.0中函数包括数学函数、字符串函数、日期和时间函数、转换函数、格式输出函数，通过本章节学习，帮助学生了解Visual Basic6.0函数的含义和应用，为以后的学习提供帮助。 学情分析 本章节的授课对象是中等职业计算机专业学生，他们对计算机相关知识有一定兴趣，有参加对口高考的期望，但是学生基础能力较差，理解能力一般。虽然接触过不少网络应用，但对Visual Basic6.0项目教程相关知识不了解。希望通过学习能够解决一些软件程序编写基础方面的问题。 学习目标 掌握Visual Basic6.0中的数学函数、字符串函数、了解时间和日期函数以及转换函数。 学习重难点 重点：数学函数、字符串函数。 难点：函数意义的理解 教学方法 讲授法、演示法、讨论法，任务驱动法 课前准备 教学课件 教学媒体 PPT 教学过程 教学环节 教师活动设计 学生活动设计 设计意图 活动一： 创设情境 生成问题 提出问题： 上节课我们了解Visual Basic6.0的基本语句以及三大结构，那么如果我想要获取一个小数的整数部分怎么办呢？为了更好的拆分数据进行特定的运算和操作，Visual Basic对这些操做进行了封装以函数的形式提供给用户，这些函数别成为内部函数。 提出的问题，引发学生思考，激起学生好奇心 通过问题导入的方法，引导学生主动思考，引出函数的意义 活动二： 调动思维 探究新知 子任务一：数学函数的认识和理解。 数学函数顾名思义用于处理各种数学运算在编程时可以直接使用，当然也是考试时的一个重要知识点。 1、 Abs（x）：绝对值函数 功能：求x的绝对值。 例如：Abs（-5.73）=5.73 2、 Asc（x）：x为字符串型 功能：求字符串的第一个ASCLL码。 例如：Asc（“abc”）=97 此处需注意记得A为65、a为97，其余的字母可以按照此值往后推。 3、 数学上的三个函数Sin（x）正弦函数、Cos（x）余弦函数、Tan（x）正切函数、Atn（x）反正切函数、Exp(x)指数函数e的x次幂、Log（x）对数函数x的自然数对数Log（1）=0 功能：和数学上的函数意义相同但是度表示不同1°=(3.1415926/180)。 例如：Sin（30*3.1415926/180） 4、 Sgn（x）：符号函数 功能：求x的符号，当x>0时，其值为1，当x<0时，其值为-1，当x=0时，其值为0。 例如：Sgn（-5.73）=-1 5、 Sqr（x）：平方根函数 功能：求x的算数平方根。 例如：Sqr（9）=3 6、 Int（x）：取整函数 功能：求不大于x的最大整数。 例如：Int（3.14）=3、Int（-314.）=-4 7、 Rnd（）：随机函数（重要考点） 功能：随机生成0~1之间的随机数，包含0，不包含1。产生[A,B]这种的随机整数公式是Int（Rnd*（B-A+1））+A 例如：随机生成200-1000的随机数 Int（Rnd*（1000-200+1））+200 通过教师的讲解，使学生充分了解数学函数的特点和作用。 数学函数的介绍和解读。 活动三： 调动思维 探究新知 子任务二：字符串函数的认识和理解 字符串函数顾名思义用于处理各种字符串的运算在编程时可以直接使用，是考试时的一个重要知识点。 1、 Chr（x） 功能：将ASCll码转换成对应的字符。 例如：Chr（97）=97 2、 Str（x） 功能：将数值转换成字符串如果x>0则返回的字符串包含一个前导空格。 例如：Chr（123.5）=“123.5” 3、 Val（x） 功能：将x中的数字转换成数值。 例如：Val（”97abc”）=97 4、 Len（x） 功能：求字符串x的字符个数。 例如：Len（”97abc”）=5 5、 Left（x，n） 功能：从字符串的左边开始截取n个字符。 例如：Val（”97abc”，3）=“97a” 6、 Right（x，n） 功能：从字符串的右边开始截取n个字符。 例如：Right（”97abc”，3）=“abc” 7、 Mid（x,m,n） 功能：从字符串x中第m个字符开始截取n个字符。 例如：Mid（”97abc”，3，2）=“ab” 8、 UCase（x） 功能：将字符串x中的小写英文字母转换成大写英文字母 例如：UCase（”bisic”）=“BASIC” 9、 LCase（x） 功能：将字符串x中的大写英文字母转换成小写英文字母 例如：LCase（”BASIC”）=“bisic” 10、Spase（x） 功能：生成x个由空格组成的字符串 例如：Spase（5）=“ ” 11、String（n，x） 功能：生成n个由x指定的第一个字符组成的字符串 例如：String（5，“abc”）=“aaaaa” 12、Ltrim（x）去掉字符串左边的空格、Rtrim（x）去掉字符串右边的空格、trim（x）去掉前导和尾随空格 13、StrReverse函数 功能：字符串反转函数 例如：StrReverse（“123abc”）=“cba321” 14、Replace函数 功能：用一个字符串替换另一个字符串 例如：Replace（“我是一个男孩”，“男”，“女”）=“我是一个女孩” 根据教师的讲解理解字符串函数的作用和应用。 讲解字符串函数的功能 活动四： 调动思维 探究新知 子任务三：时间日期函数和转换函数的认识 1、时间日期函数： Now:返回当前的系统日期和系统时间。 Date:返回当前的系统日期。 Time:返回当前的系统时间。 Yeat(日期):返回年份。 Month (日期):返回月份。 Day(日期):返回月中的第几天。 Weekday(日期，f)：返回星期几 Print Weekday(#2025-6-8#, vbmonday)的结果为7，表示2025年6月8日是从周一开始计算的一周的第七天 Print Weekday(#2025-6-8#, vbsumnday)的结果为1，表示2025年6月8日是从周日开计算的一周的第1天。 Hour (时间):返回时间中的小时。 Minitue (时间):返回时间中的分钟。 Second (时间):返回时间中的秒。 DateAdd (nl,n2,d):返回一个日期加上一段时间间隔得出一个新日期。 具体示例如下: Dateadd("m",2,#2025-03-03#)的结果是2025/5/3 其中"m"表示时间间隔是月，因此2表示#2025-03-03#加上两个月。 Dateadd("yyyy",3,#2025-03-03#)的结果是2027/3/3 其中"yyyy"表示年,因此3表示#2025-03-03#加上3年得到一个新日期。 第一个参数还可以是“"表示天数,“q"表示季度等。第二个参数也可以是负数，可得 一个过去的日期。 Datedif(字符串,日期1,日期2):返回两个日期之间的时间间隔。 具体示例如下: Datedif("m",#2025-1-3#,#2025-5-3#)的结果是 4，“m"表示“月"，得出两个日期的 时间间隔为4个月。 2、转换函数 ①CBool(x)函数。 功能:将数值表达式转换为布尔型数据。 具体示例如下: CBool(5)=True、CBool(0)=False、CBool(-5)=True ②CByte(x)函数。 功能: 将范围是0~255的数值表达式转换为字节型数据 具体示例如下: Dim x As Single x=100.89 Print CByte(x) 输出的结果是101。 ③cCur(x)函数。 功能:将数值表达式转换为货币型数据，小数部分最多保留4位且自动四舍五入，数的取值范围为922337203685477.5808--922337203685477.5807。 具体示例如下: Dim x As Single x=100.89356 Print CCur (x) 输出的结果是100.8936。 ④CDate(x)函数。 功能:将日期表达式转换为日期型数据。 具体示例如下: Dim x As Date x=Date假设今天是2024年7月8日 Print CDate(x+3) 输出的结果是2024-7-11。 ⑤CDbl(x)函数。 功能:将数值表达式转换为双精度型数据。 具体示例如下: x=1314.343545 Print CDbl(x) ⑥CInt(x)函数。 功能:将取值范围在-32768~32767的表达式转换为整型数据,小数部分四舍五入， 具体示例如下: x=123.48 Print CInt (x) 输出的结果是123。 ⑦CLng(x)函数。 功能:将取值范围为-2147483648~2147483647的表达式转换为长整型数据,小数部分四舍五入。 具体示例如下: x=1234545335.66 Print CInt (x) 输出的结果是1234545336 ⑧CSng(x)函数。 功能：将表达式转换为单精度型数据。 负数的取值范围为-3.402823E38~-1.401298E-45. 正数的取值范围为1.401298E-45~3.402823E38。 具体示例如下: CSng(1233455.79)1233456 ⑨CStr(x)函数。 功能：将表达式转换为字符串型数据。 具体示例如下: CStr1233455.79)一"1233455.79 ⑩CVar(x)函数。 功能：将表达式转换为可变类型数据。 若为数值，则取值范围与双精度型数据的取值范围相同:若不为数值，则取值范围与 字符串型数据的取值范围相同。 具体示例如下: Dim x as Double x-2.21323144 Print CVar(x) 3、格式化输出函数 功能：用于将数值型、字符型、日期表达式按指定的格式输出。 语法格式： Format(表达式[.格式字符串]) 格式化字符的功能如下 ①数字格式化字符。 0:表示数字占位符,若实际数字位数少于符号位数，则数字前后加零。 #：表示数字占位符，若实际数字位数少于占位符位数，则数字前后不加零。 小数点：与0和#配合使用，显示小数点，小数多余的部分四含五入。 %:数值乘以100,并加上百分号。 $:在数字前加$符号。 +：在数字前加+号。 -：在数字前加-号。 E+：用指数形式表示。 E-:用指数形式表示。 ②日期格式化字符 d：显示日期（1-31），个位前不加0。 ddd:显示日期（1-31），个位前加0. y:显示一一年中的天（1-365)。 yy:两位数字表示年份（00一-99)。 yyy:四位数字表示年份(0100--9999。 h:显示小时（0—23），个位前不加0. hh:显示小时（0--23），个位前加0。 m：在y后显示月份（1-12），在h后显示分钟（0-59)，个位前不加0. mm：在y后显示月份（1-12），在h后显示分钟（0--59），个位前加0。 s:显示秒（0—59)，个位前不加0。 ss：显示秒(0-59)，个位前不加0。 具体示例如下: 假设当前是2025年3月18日9时12分50秒。 Print Format(now, "yy年mm月dd 日 hh:mmss) 输出结果:25年03月18日09:12:50 通过老师的讲解理解时间日期型函数、格式输出函数的作用和含义。 通过讲解举例帮助学生理解时间日期型函数、格式输出函数的作用。 活动五： 巩固练习 素质提升 思考： 1、 Rnd函数怎么产生其他区间整数 2、 字符串函数可以完成的功能 3、 格式输出函数的应用场景 通过小组讨论巩固所学知识，加深对知识点的理解 巩固所学知识 课堂小结 作业布置 作业： 1、 完成课后习题的内容 2、 背诵并理解数学函数和字符串函数的功能 板书设计 教学反思 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 $$