枚举（穷举）算法实例：趣味数学题（vb.net代码）

枚举（穷举）算法其实就是我们用的最多的循环算法，将所有可能性都考虑在内进行循环计算。术语很唬人吧？

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        '5个5进行+-*/计算后仍等于5
        lblTell.Text = "请在下面的等式中填写+-*/计算符号，使等式成立"
        lblNum1.Text = "5"
        lblNum2.Text = "5"
        lblNum3.Text = "5"
        lblNum4.Text = "5"
        lblNum5.Text = "5"
        lblResult.Text = "5"
    End Sub

    Private Sub btnResult_Click(sender As Object, e As EventArgs) Handles btnResult.Click
        Dim intNum(4), intCode(3), intResult As Integer '定义数值数组、符号转化值数组、结果
        Dim int1, int2, int3, int4, int5 As Integer '定义循环变量
        Dim intLeft, intRight As Integer '定义计算时的临时变量
        Dim strCode() As String = {
  "+", "-", "*", "/"}
        Dim strAnswer As String
        Dim bOK As Boolean

        '将label中数值保存到数值数组中
        intNum(0) = lblNum1.Text