[.NET] VB6程式碼轉成.NET
Dim I As Integer
Dim D, S As String
FileOpen(1, "c:\940301.SM", OpenMode.Input)
Input(1, D)
FileClose(1)
For i = Len(D) To 1 Step -1
s = s & Mid(D, i, 1)
Next
If D = s Then
TextBox1.Text = "第一題結果:" & vbCrLf & D & " is palindrome"
Else
TextBox1.Text = "第一題結果:" & vbCrLf & D & " is NOT palindrome"
End If
這是我改寫後的版本,但是卻出現了兩個警告,這個警告在之前VB6中沒有出現過,所以理
論上因該不會出問題才是,但是我還是想解決它。
這兩個警告分別是:
變數 'D' 已在指派值之前透過傳址方式傳遞。可能會在執行階段產生 null 參考
變數 'S' 已在指派值之前使用。可能會在執行階段產生 null 參考例外狀況。
--
◣ 八︶︵ __ _
█ ███ █ █ ███ ███ ███ ███ ███ ︶ )︵﹚/  ̄ 三
█ █ █ █ █ █▏▏ █▇▉ █▇▇ ▇▇█ █▇▇ 'v ' |' v'
█ █ █ ███ █▏▏ █▇█ █▇▇ ▇▇█ ▇▇█ ﹁-█\ /|-┌
◢█████████████████████████◤ /〉 〈 \
◥ N U M B 3 R S 艾普斯兄弟
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 114.37.91.189
推
07/09 22:37, , 1F
07/09 22:37, 1F
→
07/09 22:38, , 2F
07/09 22:38, 2F