爲什麼inputbox讓我做兩次？

我試圖讓一個循環接受一個值並將其添加到列表中，每次好的時候都按下。出於某種原因，我必須爲要添加到列表中的輸入添加兩次值。例如，如果我在輸入框中輸入字符串「hello」，然後單擊確定，它不會添加到列表中，但是如果我再次執行此操作，它會進入。爲什麼inputbox讓我做兩次？

這是它的代碼

Do Until lstCourse.Items.Count = CDbl(txtClasses.Text) 
    InputBox("Enter Course Number", "Course Number") 
    strCourse = InputBox("Enter Course Number", "Course Number") 
    lstCourse.Items.Add(strCourse) 
Loop

任何幫助表示讚賞謝謝

來源

2011-12-09 qzxt

，如果你接受了答案，這將有助於。 – user959631

你每次迭代顯示兩倍的輸入框。你第一次沒有做任何有關返回值的事情。你需要的只有一個：

strCourse = InputBox("Enter Course Number", "Course Number")

你可能會認爲你看到的是2次循環迭代，但您只能看到1

來源

2011-12-09 15:56:19 MGZero

爲什麼inputbox讓我做兩次？

回答

相關問題