目录
获取ANSI码
获取字符串
查找字符串
合成字符串
转小写
转大写
获取字符串字数
取指定字符串
替换字符串
比较字符串
获取ANSI码
| 命令名称： | Asc 获得ANSI码 |
|---|---|
| 命令功能： | 返回与字符串的第一个字母对应的 ANSI 字符代码 |
| 语法格式： | Asc(string) |
| 参数说明： | string:是任意有效的字符串表达式 |
| 返回值： | 整数型:与字符串的第一个字母对应的ANSI字符代码 |
| 备注： | 如果是字符串，则返回第一个字母对应的ANSI代码 |
Dim MycharMychar = Asc("A") '返回 65Mychar = Asc("ABS") '返回 65获取字符串
| 命令名称： | Chr 获得字符 |
|---|---|
| 命令功能： | 返回与指定ANSI对应的字符 |
| 语法格式： | Chr(charcode) |
| 参数说明： | charcode：数值型，可以标识字符的数字 |
| 返回值： | 字符串型，返回指定ANSI对应的字符 |
Dim MyChar
MyChar = Chr(65)
MyChar = Chr(97) 查找字符串
Dim SearchString, SearchChar, MyPos
SearchString ="APPLE"
SearchChar = "P"
MyPos = Instr(4, SearchString, SearchChar) 反向查找字符串
Dim SearchString, SearchChar, MyPos
SearchString ="APPLE"
SearchChar = "P"
MyPos = InstrRev(SearchString, SearchChar, 10) 合成字符串
| 命令名称： | Join 合成字符串 |
|---|---|
| 命令功能： | 将数组以指定的分隔符合并成字符串 |
| 语法格式： | Join(list,delimiter) |
| 参数说明： | list：待合成字符串的一维数组 |
| 返回值： | 返回一个字符串 |
Dim MyString
Dim MyArray(4)
MyArray(0) = "hello."
MyArray(1) = "anjian"
MyString = Join(MyArray,"")
MyString = Join(MyArray,",") 转小写
| 命令名称： | LCase 转小写 |
|---|---|
| 命令功能： | 求字符串的小写形式 |
| 语法格式： | LCase(string) |
| 参数说明： | string:字符串型,有效的字符串表达式 |
| 返回值： | 字符串型:返回字符串的小写形式 |
Dim MyString
Dim LCaseString
MyString = "VBSCript"
LCaseString = LCase(MyString)转大写
| 命令名称： | UCase 转大写 |
|---|---|
| 命令功能： | 求字符串的大写形式 |
| 语法格式： | UCase(string) |
| 参数说明： | string:字符串型,任意有效的字符串表达式 |
| 返回值： | 字符串型:返回字符串的大写形式 |
Dim MyWord
MyWord = UCase("Hello World") ' 返回"HELLO WORLD"获取字符串字数
| 命令名称： | Len 获得字符串数目 |
|---|---|
| 命令功能： | 求字符串内字符的数目 |
| 语法格式： | Len(string ) |
| 参数说明： | string:任意有效的字符串表达式 |
| 返回值： | 整数型,字符串内字符的数目 |
| 备注： | 该命令的汉字占用3个字符位置，而 UTF8字符插件 中汉字占用1个字符位置 |
Dim MyString
MyString = Len("anjian") 取指定字符串
Dim MyVar
MyVar = Mid("hello，anjian", 6, 6)替换字符串
Dim MyString
MyString = Replace("aabbcc", "b", "d")比较字符串
参考：按键精灵官网教程
