VB編寫 編寫壹個程序，用來從字符串中篩選出字母字符並反序存放

'text2 對應的反序的字符串

'command1 對應的 分離並反序按鈕

'command2 對應的清除按鈕

'其中 a 對應的 ascii 碼 為97 z 對應的 ascii 碼 為122

'A 對應的 ascii 碼 為65 Z 對應的 ascii 碼 為90

Private Sub Command1_Click()

''計算反碼

If Text1.Text <> "" Then

For i = 0 To Len(Text1.Text) - 1

c = Mid(Text1.Text, Len(Text1.Text) - i, 1)

If Asc(c) > 65 And Asc(c) < 90 Or Asc(c) > 97 And Asc(c) < 122 Then

''是字母，則輸出顯示

Text2.Text = Text2.Text & c

Else

End If

Next

End If

End Sub

Private Sub Command2_Click()

''清除

Text1.Text = ""

Text2.Text = ""

Text1.SetFocus

End Sub