VB.Netでトレーステーブルをテストする

Question

トレーステーブルを使用していて、正しい結果が得られたかどうかを確認するために、ループの各段階をチェックする次のコードを設計しましたが、私はそれを実行しようとするときキャスト。筆跡が情報を保持しているというエラーがいつ返ってきたのかはわかりますが、何が間違っていますか。

Module Module1 


    Sub Main() 
     Dim aWord As String 
     Dim bWord As String 
     Dim result As Boolean 
     Dim temp As Char 
     Dim pos As Integer 
     Dim index As Integer 
     index = 0 
     aWord = "Simple" 
     bWord = "abcdef" 
     result = True 
     If Not (aWord.Length = bWord.Length) Then 
      result = False 
     Else 
      While index < bWord.Length And result 
       temp = bWord.Chars(index) 
       pos = aWord.IndexOf(temp) 
       If pos >= 0 Then 
        aWord = aWord.Remove(pos, 1) 

       Else 
        result = False 
       End If 

       WriteLine(bWord, aWord, temp, pos.ToString, index.ToString) 

      End While 

     End If 

    End Sub 


End Module 

Answer 1

あなたはWriteLine（）を間違って呼び出しています。それがなければならない：

WriteLine("{0}, {1}, {2}, {3}, {4}", bWord, aWord, temp, pos.ToString, index.ToString)