《2 VB程序设计基础》.ppt

  1. 1、本文档共84页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
5. 常用内部函数 内部函数:也称标准函数 数学运算函数 字符串函数 日期和时间函数 格式输出函数 随机语句和函数 数据类型转换函数 用户自定义函数 5. 常用内部函数——数学函数(P45) 函数名 说明 Sin(x) X弧度的正弦 Cos(x) X弧度的余弦 Atn(x) X弧度的正切 Abs(x) 数x的绝对值 Exp(x) e的x次幂 Log(x) 数x的自然对数 Sgn(x) 数x的符号值 Sqr(x) 数x的平方根 Int(x) 不大于x的最大整数 Fit(x) 数x的整数部分 5. 常用内部函数——字符串函数 函数名 说明 举例 结果 Len(字符串) 返回字符串的长度 Len(“Visual”) 6 Left(字符串,字符个数) 返回在“字符串”最左边的长度为“字符个数”的字符串 Left(“Visual”,4) “Visu” Right(字符串,字符个数) 返回在“字符串”最右边的长度为“字符个数”的字符串 Right(“Visual”,4) “sual” Mid(字符串,起始位置,字符个数) 返回一个子字符串,该子字符串从“起始位置”开始,以“字符个数”为长度。若省略“字符个数”,则从“起始位置”到字符串的结尾。 Mid(“Visual”,3,4) “sual” 5. 常用内部函数——随机函数 在测试、模拟和游戏程序中,经常要使用随机函数: 函数和语句 说明 Randomize语句 产生随机数种子 Rnd(n) 产生0~1之间的随机数 (1)当n0时,每次产生的随机数都不同(要先初始化随机数发生器); (2)当n=0时,产生的随机数与上次的相同; (3)当n0时,每次产生的随机数都相同。 如果我们要返回介于两个数之间的随机数,可用如下的语句: Int((n -m + 1)* Rnd +m) 这里,n是随机数范围的上限,而m则是随机数范围的下限。 5. 常用内部函数——格式输出函数 使用格式: Format(表达式,格式字符串) 功能:使数值型,日期型和字符型的数据按指定的格式输出 表达式:可以是常量或表达式, 格式字符串:可以使字符串常量或字符串变量,一般由专用的格式说明符组成 5. 常用内部函数——格式输出函数 格式说明符 作 用 # 数字占位符,显示一个数字或什么都不显示,前后不补0 0 数字占位符,显示一个数字,前后补0 . 小数点占位符 , 千位分隔符占位符 % 百分比号占位符,表达式的值自动乘以100 $ 美圆号占位符,常用于数值的首位 +,- 正,负号占位符 E+,E- 指数符号占位符 @ 字符占位符,显示字符或显示空白 ttttt 用5个“t”表示将时间按完整的时,分,秒格式显示 dddddd 用6个“d”表示将日期按年,月,日的格式显示 将表达式中的大写字母转换为小写字母显示 将表达式中的小写字母转换为大写字母显示 6. 程序语句 VB程序中的一行代码称为一条程序语句,简称语句 语句是执行具体操作的指令,每个语句行以回车键(Enter)结束 语句必须遵守语法规则 6. 程序语句 代码编写规则: 可将单行语句分成多行:用续行符“_”将长语句分成多行 注意:在同一行内,续行符后面不能加注释 可将多个语句合并写到同一行上:用冒号分开多个语句 可在代码行中添加注释:以Rem或者用撇号“’”开头 输入代码时不区分大小写 一行最多允许输入255个字符 为了便于阅读,程序段可采用“缩进”或“凸出”处理。 案例实践 案例2-3:变量的生存期测试。 2.5.4 案例实践 【案例说明】: 本实例旨在比较静态局部变量与非静态局部变量的异同。 【案例技术】: 静态局部变量是在过程中通过关键字Static进行声明的,当过程执行后,静态局部变量的值将继续保留,下次调用时再次引用;非静态局部变量的值一旦过程执行完后就被释放。 案例实践 【操作步骤】: 1.界面设计:根据题意,可将用户界面设计为如图所示。 案例实践 各个控件的属性设置如表: 对象名 属性名 属性值 说明 Text1 text 清空 Text2 Text 清空 Label1 Caption Val1 Label2 Caption Val2 Command1 Caption 测试 案例实践 2.Command1的代码如下所示: Private sub Command1_click() Static val1 as integer ‘ 定义静态局部变量 Dim val2 as integer ‘ 定义非静态局部变量 val1=val1+1 val2=val2+1

文档评论(0)

ghfa + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档