使用VBscript删除除一个单词以外的所有文本

我有一行文字是地址：佐治亚州亚特兰大大街1234号

---

我希望剩下的唯一文本是格鲁吉亚。VBscript是如何执行此操作的？我不熟悉VBScript，但不熟悉编码。谢谢

这不一定是最好的方法，但您可以将其拆分为空间上的数组，并获取最后一个元素

arrAddress = Split(szAddress, " ")
szState = arrAddress(UBound(arrAddress))

您还可以使用来定位最后一个空格的位置，并使用

Right（string，length）

来提取状态。

UBound（a）是最后一个索引（而不是大小/长度）；所以请去掉-1。