vba do while loop用法 在 コバにゃんチャンネル Youtube 的精選貼文
「vba do while loop用法」的推薦目錄：
- 關於vba do while loop用法 在 コバにゃんチャンネル Youtube 的精選貼文
- 關於vba do while loop用法 在 大象中醫 Youtube 的精選貼文
- 關於vba do while loop用法 在 大象中醫 Youtube 的最佳貼文
- 關於vba do while loop用法 在 [VBA ] Do while 迴圈跳不出來- 看板Visual_Basic - 批踢踢實業坊 的評價
- 關於vba do while loop用法 在 Excel VBA教程01-16、循环语句之DO WHILE LOOP - YouTube 的評價
- 關於vba do while loop用法 在 請問EXCEL VBA迴圈寫法 的評價
vba do while loop用法 在 請問EXCEL VBA迴圈寫法 的推薦與評價
excel vba 如果等很多次、長時間的中斷請不要用for next 、do loop … ... OnTime 這個功能很特殊，在一些用法下就算使用exit sub，它還是會繼續執行 ... ... <看更多>
vba do while loop用法 在 [VBA ] Do while 迴圈跳不出來- 看板Visual_Basic - 批踢踢實業坊 的推薦與評價
各位好，魯妹是VB自學初心者
本週在複習Do while 時 發現寫出來的迴圈永不不止息阿阿阿阿
魯妹本來的預想是希望可以藉由do while檢查inputbox 的數值是否可以正確執行
若無法，則顯示msgbox提醒
所以就有了下列寫法，
i = InputBox("Start Value")
If i = "" Then End
Do While i <> ""
If i = intger Then Exit Do
Select Case InputBox("Start Value")
Case IsNumeric(i) = False: MsgBox "請數入數字": i = InputBox("Start
Value")
Case i <= 0: MsgBox "數值不得為負": i = InputBox("Start Value")
End Select
Loop
j = InputBox("End Value")
If j = "" Then End
Do While j <> ""
If j = intger Then Exit Do
Select Case InputBox("End Value")
Case IsNumeric(j) = False: MsgBox "請數入數字": j = InputBox("End Value")
Case j <= 0: MsgBox "數值不得為負": j = InputBox("End Value")
If i = j Then j = j + 1
End Select
Loop
還請好心的大大提點，到底是哪裡出了問題阿阿
魯妹先謝謝大家了m(_ _)m
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.40.23.201
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1484972847.A.B0C.html
... <看更多>