Function GetMD(s As String)
End Function
Sub test()
Dim s$
s = InputBox("输入")
ls = GetMD(s)
If ls = [a1] Then MsgBox "ok" Else MsgBox ls
End Sub
上述
Function GetMD(s As String)
End Function
Sub test()
Dim s$
s = InputBox("输入")
ls = GetMD(s)
If ls = [a1] Then MsgBox "ok" Else MsgBox ls
End Sub
上述