- 假設輸入的資料在:document.all("InputField").value
- 建立一個檢查InputField是否為整數的程序
sub CheckInteger()
if isNumeric(document.all("InputField").value) and instr(1,document.all("InputField").value,".")=0 then
msgbox "輸入的資料是整數型態的資料"
else
msgbox "輸入的資料不是整數型態的資料"
end if
end sub
沒有留言:
張貼留言