選項？明確的
Sub？測試()
暗淡？答？作為？線
答？=?“Z”
MsgBox？isu_num(a)
結束？潛水艇
私人？功能？isu_num(ByVal？str？作為？字符串)？作為？布爾代數學體系的
isu_num？=?錯誤的
如果？Len(str)？& gt？1?然後呢？退出？功能
如果？Asc(str)？& gt=?65?然後呢。Asc(str)？& lt=?90?然後呢？isu_num？=?真實的
結束？功能