Question

只是想知道是否有人可以帮我解决这个小问题。我正在使用列表框编写一个简单的乘法表，以在用户单击按钮时显示时间表。然而，许多循环看起来很混乱，我想将它们放在一个方法/函数中，它允许在按钮单击事件中操纵整数值，以便可以插入正确的值，即2x次将具有valueOne = 2 to valueTwo = 24和Step = 2（引用2次表）等这是我现在刚才所拥有的（基于7次表格示例），但我觉得我没有正确地写下我的sub。任何指针和建议将非常感激和乐于助人。感谢。

注意：变量全局声明

Private Sub newLoop()

        For xTablesAnswer As Integer = valueOne To valueTwo Step valueThree
            xTableNumOrder = xTableNumOrder + 1
            lstData.Items.Add("7 Times " & xTableNumOrder.ToString & " = " & xTablesAnswer.ToString)
        Next

    End Sub


    Private Sub bnt7X_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bnt7X.Click

        ClearList()

        valueOne = 7
        valueTwo = 84
        valueThree = 7

        newLoop()

    End Sub
End Class

Answer 1

我会这样做：

Public Sub ShowTable(value As Integer, lastMultiple As Integer)

lstData.Items.Clear()

For i As Integer = 1 to lastMultiple
    lstData.Items.Add(String.Format("{0} times {1} = {2}", value, i, value * i))                        
Next

End Sub

然后对于7次表，你会这样称呼它：

ShowTable(7, 12)

VB.Net循环函数/子

1 个答案: