Function StrToNum(ByVal Str As String) As Long '字母轉數字 Dim s As String, S1 As String If Str = "" Then Exit Function Str = UCase(Str)
確定! 回上一頁