Sub PersonID() '身分證字號驗證. Dim Person, One As String ... Person = InputBox("輸入身分證字號來驗證正確性:") ... 以下代入計算公式去驗證. For i = 2 To 9
確定! 回上一頁