※ 引述《walkman (走路男人~)》之銘言：
: 請問一下,我現在有個程式:
: Dim str As string
: str="Hello"
: MsgBox str
: MsgBox len(str)
: MsgBox UCase(str)
: MsgBox LCase(str)
: 我現在只能夠看出它的字串長度
: 還有讓他全部變大寫或全部變小寫
: 有沒有辦法修正這個程式使它大小寫互換阿??
: 像是"Hello"經過變換會變成"hELLO"
: 請高手們幫忙了....
: 謝謝
Dim str As String
str = "Hello"
Dim s As String
For i As Integer = 1 To Len(str)
Dim c As String = Mid(str, i, 1)
s = s & IIf(c >= "A" And c <= "Z", LCase(c), UCase(c))
Next i
MsgBox(s)
我是用 VB.Net 寫的 應該沒有差很多吧
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 192.192.5.253