区切り文字で分割した文字列の配列への格納方法


初心者A  2008-05-14 21:01:31  No: 100717  IP: 192.*.*.*

VB超初心者です。
スペースを区切り文字とした文字列を配列に格納したいのですが、うまくいきません。

例:"AAA BBB  CCC"
例の文字列を空白で区切ると"AAA", "BBB", " ", "CCC"の4つの要素になります。
このうち、空白で無い物のみ別な配列に格納するという事をしたいのですが、うまくいきません。
”CheckedKeyword(keys) = TempKey”部分でエラーではないものの、”値が割り当てられる前に使用されています”という警告が出ます。
これから格納したいのでNullは当然なのですが...
格納の仕方が悪いのでしょうか?


      '区切り文字は半角、全角スペース
        Dim separator() As Char = {" "c, "  "c}
      'キーワードの配列
        Dim Keyword() As String
      'キーワード数
        Dim KeyNum As Integer
      'キーワード(空白でない物)の配列
        Dim CheckedKey() As String
      '作業中キーワード
        Dim TempKey As String

        Keyword = Keywords.Split(separator)
         If Len(Keywords) <> 0 Then
            KeyNum = Keyword.Length
        End If

        While Counta < KeyNum
            TempKey = Trim(Keyword(Counta))
            MsgBox(TempKey)
            If TempKey <> "" Then
                CheckedKeyword(keys) = TempKey
                keys = keys + 1
            End If
            Counta = Counta + 1

        End While

以上、よろしくお願いします。

編集 削除
ガッ  2008-05-14 21:55:04  No: 100718  IP: 192.*.*.*

CheckedKeyword を定義している部分が見当たらないです.
多分暗黙に変数 CheckedKeyword が定義されているのではなかろうかと思います.

編集 削除
やじゅ  2008-05-15 12:48:14  No: 100719  IP: 192.*.*.*

全角スペースを半角スペースに置換してから
Split関数かませばいいのに。

編集 削除
 2008-05-16 15:55:42  No: 100720  IP: 192.*.*.*

連続スペースを1個スペースに置換してから
Split関数かませばいいのに。

編集 削除