VB第9章 内部函数2H.pptVIP

Visual Basic程序设计第九章：内部函数 聊城大学 物理科学与信息工程学院 曹银杰 caoyinjie@ 第九章 内部函数 Visual Basic提供大量的内部函数供用户在编程时调用。 1、常用的数学函数 几点注意 在三角函数中，自变量以弧度表示。 Rnd函数返回0～1（不包括0和l）之间的单精度随机数。VB用于产生随机数的公式取决于称为种子（seed）的初始值。默认的情况下，每当运行一个应用程序时，VB提供相同的种子，即Rnd产生相同序列的随机数。为了每次运行时，产生不同序列的随机数，可执行Randomize语句: Randomize [number] number 给生成器一个新的种子值； 省number，则用系统时钟的值为新的种子值。 常用的数学函数举例 Private Sub Command1_Click() Randomize ‘注释此句将产生相同的序列数 For I=1 to 10 Print Rnd() Next End Sub Private Sub Command1_Click() Dim Pai As Double, x As Double Pai = 3.1415926 x = Sin(Pai / 2) Print x End Sub 2、常用的字符串操作函数 字符串操作函数举例 Private Sub Command1_Click() Const C$ = 聊城大学理工学院2007级 Print Len(C$) Print Left$(C$, 4) m$ = Mid$(C$, 5, 3): Print m$ r$ = Right$(C$, 5): Print r$ y$ = Space$(4) + Left$(C$, 4) + Space$(4) + m$ Print y$ Print LTrim(y$) Print m$ 1234 + End Sub 3、常用日期/时间函数 常用日期/时间函数 常用日期/时间函数举例 时间日期的格式，是与系统时间日期格式相同，可在控制面板中设置。 当然可采用格式化函数自定义时间格式。 Private Sub Command1_Click() Print Now ‘ Now() Print Date Print Time ‘Time() Print Day(Date) Print Month(Date) Print Year(“8-12-23”) Print DateSerial(8, 11, 29) Print DateValue(8, 11, 29) End Sub 4、常用的转换函数 1、 常用的转换函数 转换函数补充说明举例 2、Asc(C) 字符转换成ASCII码值 Asc(“A”) 值为65；Asc(“a”) 值为97…… 3、Val函数 x = Val (VariableName ) 这个函数将字符串里的数字字符串转化为数字。如： Y = Val (“123”)，则 Y = 123。 当VB发现下一个字符不是数字时就停止继续转化。 4、VB中还有以前学过的类型转换函数， 转换函数举例 Private Sub Command1_Click() Print Chr$(66); Print Chr$(10); Print Chr(65) Print Asc(1);: Print Asc(A);: Print Asc(a) Print LCase$(ABcd) Print UCase$(abCD) Print Val(123) + 123 End Su 5、格式输出函数 用格式输出函数Format$可以使数值、日期或字符串指定的格式输出.其形式如下： Format$(表达式[，格式字符串]) 其中: 表达式：要格式化的数值、日期和字符串类型表达式。 格式字符串：表示输出表达式值时所采用的榆出格式。 格式字符串有三类： (1) 数值格式 (2) 日期格式 (3) 字符串格式 书写时格式字符串要加双引号。 常用的数值型格式说明字符 是将数值表达式的值按“格式字符串”指定的格式输出。 无: 显示没有格式的数值。 (0): 数字占位符。显示一位