作者billy4601 (台大正太学系系主任)
看板Visual_Basic
标题[.NET] VB6程式码转成.NET
时间Fri Jul 9 22:19:43 2010
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
1F：推 sueadolph:这二个警告应该不会影响你程式的执行 07/09 22:37
2F：→ sueadolph:真的不想看见他的话，宣告完字串後，再加D="" S="" 07/09 22:38