access將文本拆分轉(zhuǎn)化爲(wèi)一箇數(shù)組

有網(wǎng)友問到如何把文本轉(zhuǎn)換成變量數(shù)組。

有下麵文字“This website is office-cn”。我們希望把這段文字拆分單詞後放入數(shù)組中。

拆分我們可以使用split函數(shù)。空白用space（1）卽可

Sub TheSplitFunction()
  
  Dim vaWords As Variant
  Dim i As Long
  
  vaWords = Split("This website is office-cn.", Space(1))
  
  For i = LBound(vaWords) To UBound(vaWords)
    Debug.Print vaWords(i)
  Next i
  
End Sub

vawords變量將是包含四箇元素的變量數(shù)組，這箇元素分彆是This、website、is、office-cn。

分隔符是一箇空格，併未包含在元素中。