为什么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让我做两次？

回答

相关问题