VB中字符串函数包含: mid、instr、InStrRev、left、right、ucase、lcase、trim、string
space、strconv、len、ltrim、rtirm、split()、join()、srereverse、replaceFilterMonthName
Format、LSet、RSet、FormatCurrency、FormatDateTime、FormatNumber
FormatPercent、StrComp、StrConv、StrReverse、WeekdayName、Option Compare
扩展资料:一、基础字符串函数部分(必须要掌握)
1,len函数返回 Long,其中包含字符串内字符的数目,或是存储一变量所需的字节数。
2,Left函数返回 Variant (String),其中包含字符串中从左边算起指定数量的字符
3,Right函数返回 Variant (String),其中包含从字符串右边取出的指定数量的字符
4,Mid函数返回 Variant (String),其中包含字符串中指定数量的字符。
5,LTrim、RTrim与 Trim 函数
返回 Variant (String),其中包含指定字符串的拷贝,没有前导空白 (LTrim)、尾随空白 (RTrim) 或前导和尾随空白 (Trim)。
VB里的函数分内部函数和外部函数两类.内部函数有数学函数和类型转换函数等.外部函数指user-defined function(用户自定义函数),即由用户创建的,可返回一个值的代码。用户自定义函数包括以 .PRG 扩展名保存的独立的程序,以及程序中的过程和函数。如果你的机器装有VISUAL STUDIO的MSDN参考文档资料,你可从中学习VB的各种函数及用法.祝成功.小示例,在vb6.0中判断输入的数是否为质数,用Function过程实现,希望对楼主有帮助Option ExplicitPrivate Sub Form_Click()Dim i As Integer
Dim IsZS As Boolean
i = Val(InputBox("请输入一个整数", "提示"))
IsZS = Validate(i) '调用Function过程
If IsZS = True Then
Print i &" 是质数"
Else
Print i &" 不是质数"
End If
End Sub'验证输入的数是否为质数
Public Function Validate(inputNum As Integer) As Boolean
Dim i As Integer
Dim IsZhi As Boolean'标志,是否为质数
IsZhi = True
For i = 2 To inputNum - 1
If inputNum Mod i = 0 Then
IsZhi = False '不是质数
Exit For'不用再判判断了,退出For循环
End If
Next i
Validate = IsZhi'Function过程有返回值
End Function以上代码在VB6.0下测试通过
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)