04/12/07 22:23:15
>>958
一文字しか処理してないから。
.NET的にエレガントに書くとこんな感じかね。
Dim i As Integer, re As String = "", c As Char
For Each c In Text1.Text
re += Chr(Convert.ToInt32(c) - Integer.Parse(Text2.Text)).ToString()
Next
Text3.Text = re
04/12/07 22:23:15
>>958
一文字しか処理してないから。
.NET的にエレガントに書くとこんな感じかね。
Dim i As Integer, re As String = "", c As Char
For Each c In Text1.Text
re += Chr(Convert.ToInt32(c) - Integer.Parse(Text2.Text)).ToString()
Next
Text3.Text = re