从表单中获取输入并将其格式化为称呼，缩写和姓氏

Question

您好我在Microsoft Word VBA中创建了一个表单，它有一个名为fCustFullName的文本字段。用户将使用以下格式输入名称（全部大写）：FIRST MIDDLE MIDDLE MIDDLE LAST（可能有多个中间名，或者根本没有）。

我查看了Google和其他Stackexchange问​​题，但无法弄清楚如何将其转换为姓名缩写和姓氏。

  

E.g。输入：JOHN APPLE BANANA ORANGE SMITH

     

.Bookmarks（“addressline1”）。Range.Text = J A B O Smith

非常感谢任何帮助。

Answer 1

使用：

 Split(LString, " ")

方法，也像数组一样操作字符串。