Sub 掃描條碼() '接收條碼Dim UserData UserData = InputBox("請輸入身分證") If StrPtr(UserData) = 0 Then MsgBox "您取消輸入。" ElseIf UserData ...
確定! 回上一頁