作者brominelove (流連)
看板Visual_Basic
標題[.NET] inputbox "不輸入"和"取消"的差別
時間Mon Mar 29 15:22:03 2010
請輸入專案類型(網站專案或者應用程式專案)：
windows form
各位好，我想寫個inputbox的指令，
是要輸入一組數字，
如果是：1. 輸入數字 --- 那就沒問題
2. 不輸入或輸入非數字 --- 出現錯誤視窗
3. 按取消 --- 不出現錯誤視窗 直接exit sub
爬文之後，大致上是解決了，
碰到唯一一個問題，就是無法判斷"不輸入"和"取消"，
code如下：
Sc_string = InputBox("Choose a coil span between 1 to " & S,
"Coil Span", S)
If Val(Sc_string) = 0 And Sc_string <> "" Then
MsgBox("Error, Coil span must be an Integer.",
MsgBoxStyle.Critical, "Error")
Exit Sub
ElseIf Sc_string = "" Then
Exit Sub
Else
Sc = CInt(Sc_string)
End If
我的想法是先判斷val之後是不是零，
如果是零而且Sc_string<>""，表示Sc_string不是數字，則錯誤。
如果Sc_string = ""，那表示按取消，就直接跳出。
問題在於… Sc_string = "" 包含了不輸入的情況，所以不輸入的話不會跳錯誤視窗。
想請問一下該怎麼修改呢？謝謝。
--
▎◣◢▊ ▎◣◢
▊ "He kept working on his game, he kept
▎ ▊ ▎ ★▊ believing every day."
◢ Sonics ◣ ◢
Ｓonιcs◣
-- DOC RIVERS on RAY ALLEN --
￣￣￣ ﹌﹌﹌﹌
bromine34 bromine 34 ⊕brominelove⊕
love love http://www.wretch.cc/album/brominelove
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.112.46.38
1F：→ nobody1:If Val(Sc_string) = 0 And Sc_string <> "" Then 03/29 22:53
2F：→ nobody1:判斷上 比較會有暇疪 sc_string是0時 一定不為"" 03/29 22:54
3F：→ nobody1:你把第一個elseif 和 if 對調看看 也許就ok了吧? 03/29 22:55
4F：→ nobody1:sc_string <>"" 就是多的了 ^^ 試試debug mode 03/29 22:56