明经通道 Visual LISP 函数	明经通道 Visual LISP 函数
vl-string-position

在字符串中查找具有指定 ASCII 码的字符

(vl-string-position char-codestr [start-pos [from鈥慹nd鈥憄]])

参数

char-code

整数型，表示要查找的字符的代码。

str

要在其中搜索的字符串。

start-pos

字符串中开始搜索的位置（第一个字符的位置为 0）。缺省值为 0。

from-end-p

如果该参数为 T，则搜索从字符串的结尾开始，到 pos 结束。

返回值

整数，表示从字符串的开始，找到 char-code 的位置。如果未找到字符，则返回 nil。

示例

_$ (vl-string-position (ascii "z") "azbdc")

1

_$ (vl-string-position 122 "azbzc")

1

_$ (vl-string-position (ascii "x") "azbzc")

nil

下例中的搜索字符串包含两个“z”字符，从左到右读取，第一个字符的位移为 0。在位移 1 处有一个 z，另一个 z 则在位移 3 处：

_$ (vl-string-position (ascii "z") "azbzlmnqc")

1

从左到右搜索（缺省情况），vl-string-position 首先遇到位移 1 处的“z”，但如果从右到左搜索，如下例所示，则首先遇到位移 3 处的“z”：

_$ (vl-string-position (ascii "z") "azbzlmnqc" nil t)

3