如何从输入框添加数字？

Question

这是我的代码：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    InputBox("Enter Amount Of Courses")
    InputBox("Enter Course Name")
    InputBox("Enter Course Price")
End Sub

我怎样才能重复

InputBox("Enter Course Name")   
InputBox("Enter Course Price")

代码次数

InputBox("Enter Amount Of Courses")

告诉我？然后我想将课程价格加在一起以获得总金额，然后在文本框中显示总金额？我还想在另一个文本框中显示课程名称、课程价格。

Answer 1

Dim num As Integer = InputBox("Enter Amount Of Courses")

    Do While num > 0
        InputBox("Enter Course Name")
        InputBox("Enter Course Price")
        num = num - 1
    Loop

这应该可以做到。 :)

Answer 2

在变量中保存次数并使用For Next循环来询问另一个值

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

    Dim amountValue As String = InputBox("Enter Amount Of Courses")
    Dim amountOfCources As Int32
    If Int32.TryParse(amountValue, amountOfCources) = True Then
        For i As Int32 = 1 to amountOfCources
            InputBox("Enter Course Name")
            InputBox("Enter Course Price")
        Next
    End

End Sub

如何从输入框添加数字？

how to add numbers from inputbox?

vb.net

textbox

for-loop

winforms