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
以上、よろしくお願いします。
CheckedKeyword を定義している部分が見当たらないです.
多分暗黙に変数 CheckedKeyword が定義されているのではなかろうかと思います.
全角スペースを半角スペースに置換してから
Split関数かませばいいのに。
連続スペースを1個スペースに置換してから
Split関数かませばいいのに。