0

どんな助けでもありがとう。

たとえば、文字列があります

Dim words As String = "Hello world i fell like badword"
Dim inputCheck As String = words.Split(New Char() {" "c})

単語と置換単語を含むハッシュ テーブルを使用

hastable をループして、一致する単語をどのように置き換えますか?

For Each Item In hsTable

                Next

出てくるのは、"Hello world i fall like * " ハッシュテーブルで一致する置換単語に置き換えられる悪い単語です。

ありがとうございました。

4

2 に答える 2

0

かなり簡単です。

dim result as new list(of string) 
for each word in inputCheck
  result.Add if(hsTable.Keys.Contains(word), hsTable(word), word)
next
dim replaced = string.Join(" ", result)
于 2013-05-16T19:05:04.330 に答える
0

ハッシュテーブルを使用している特定の理由はありますか? これは、KeyValuePair のリストを使用して行うのは非常に簡単です。このようなものは機能しますか?

Dim words As String = "Hello world i fell like badword"

Dim newWords As New List(Of KeyValuePair(Of String, String))
newWords.Add(New KeyValuePair(Of String, String)("badword", "goodword"))
newWords.Add(New KeyValuePair(Of String, String)("badword2", "goodword2"))

newWords.ForEach(Function(w) words.Replace(w.Key, w.Value))
于 2013-05-16T19:35:02.803 に答える