一道VB填空题，谢谢帮忙！

如图所示，将第一个文本框中输入的字符串进行转换，转换的原则是：大写字母转换为小写字母，小写字母转换为大写字母，其它字符转换为“*”，并将转换后的字母逆序输出在第二个文本框中。完善程序，实现上述功能。
Private Sub Command1_Click()
Dim St As String, Ch As String
Dim Char As String, I As Integer
St = Text1.Text
For I = 1 To_____________
Ch = Mid(St, I, 1)
Select Case Ch
Case "A" To "Z"
_____________________
Case "a" To "z"
_____________________
Case Else
______________________
End Select
Char = Char + Ch
Next I
St = ""
For I = 1 To Len(Char)
St =_____________________
Next I
Text2 = St
End Sub

vb 一道初学填空题 一道二级VB填空题的不解 一道初三英语填空题，请帮忙解答,谢谢。 帮忙一道VB题 帮忙解开一道填空题 求助：一道简单的VB题，请大家帮忙谢谢 请VB高手帮忙 填空题 请教一道VB 填空题目！ 帮忙做一道VB题: 帮忙做一道VB题啊......谢谢啦