我需要一个数组列表吗?

时间:2016-09-06 01:17:50

标签: arrays vb.net list

我正在制作游戏程序。它需要等级(其中你可以同时拥有8个不同等级的不同等级)。每个类对于我称为防御的一个Dim具有不同的值,它有6个不同的可能级别。这6个等级中的每一个都对应一个基于每个等级的值。

我几乎可以肯定我需要一个数组或一个列表,我在这里看到了一些例子,但我没有看到一些非常适合我的情况。

我是否需要在数组中包含数组?这甚至可能吗?

如果我很难解释我想要完成的事情,我道歉。

一个例子是如果这个人选择了Strong Hero然后选择了Level 4.之后他们选择了Fast Hero并选择了Level 5.我试图让它看看4的值是多少。强大的英雄和快速英雄的价值,找到那些,然后在最后将它们添加到Def。

提前感谢任何愿意忍受我的无知的人!

            Dim Def As Integer = 0

            'Declares a single-dimension array of 10 values
            Dim DefLvl(9) As Integer

            Dim DefType As String = ""
            Dim DefLvl1 As Integer = 0
            Dim DefLvl2 As Integer = 0
            Dim DefLvl3 As Integer = 0
            Dim DefLvl4 As Integer = 0
            Dim DefLvl5 As Integer = 0
            Dim DefLvl6 As Integer = 0
            Dim DefLvl7 As Integer = 0
            Dim DefLvl8 As Integer = 0
            Dim DefLvl9 As Integer = 0
            Dim DefLvl10 As Integer = 0

    'This sets the cmblevel.text = to an integer to be multiplied later
            'Level 1
            If cmbLevel1.Text = "1" Then
                Level1 = 1
            ElseIf cmbLevel1.Text = "2" Then
                Level1 = 2
            ElseIf cmbLevel1.Text = "3" Then
                Level1 = 3
            ElseIf cmbLevel1.Text = "4" Then
                Level1 = 4
            ElseIf cmbLevel1.Text = "5" Then
                Level1 = 5
            ElseIf cmbLevel1.Text = "6" Then
                Level1 = 6
            ElseIf cmbLevel1.Text = "7" Then
                Level1 = 7
            ElseIf cmbLevel1.Text = "8" Then
                Level1 = 8
            ElseIf cmbLevel1.Text = "9" Then
                Level1 = 9
            ElseIf cmbLevel1.Text = "10" Then
                Level1 = 10
            End If

    '
    If cmbClass1.Text = "Strong Hero" Then
                HD1 = "8"
                DefType = "Avg+"
                DefLvl1 = 1
                DefLvl2 = 2
                DefLvl3 = 2
                DefLvl4 = 3
                DefLvl5 = 3
                DefLvl6 = 3
                DefLvl7 = 4
                DefLvl8 = 4
                DefLvl9 = 5
                DefLvl10 = 5

            End If

        'This formula will calculate Defense for each class and level
        If DefType = "Poor" Then
            DefLvl1 = 0
            DefLvl2 = 1
            DefLvl3 = 1
            DefLvl4 = 1
            DefLvl5 = 2
            DefLvl6 = 2
            DefLvl7 = 2
            DefLvl8 = 3
            DefLvl9 = 3
            DefLvl10 = 3
        ElseIf DefType = "Avg" Then
            DefLvl1 = 1
            DefLvl2 = 1
            DefLvl3 = 2
            DefLvl4 = 2
            DefLvl5 = 3
            DefLvl6 = 3
            DefLvl7 = 4
            DefLvl8 = 4
            DefLvl9 = 5
            DefLvl10 = 5
        ElseIf DefType = "Avg+" Then
            DefLvl1 = 1
            DefLvl2 = 2
            DefLvl3 = 2
            DefLvl4 = 3
            DefLvl5 = 3
            DefLvl6 = 3
            DefLvl7 = 4
            DefLvl8 = 4
            DefLvl9 = 5
            DefLvl10 = 5
        ElseIf DefType = "Good" Then
            DefLvl1 = 1
            DefLvl2 = 2
            DefLvl3 = 2
            DefLvl4 = 3
            DefLvl5 = 4
            DefLvl6 = 4
            DefLvl7 = 5
            DefLvl8 = 6
            DefLvl9 = 6
            DefLvl10 = 7
        ElseIf DefType = "Good+" Then
            DefLvl1 = 1
            DefLvl2 = 2
            DefLvl3 = 2
            DefLvl4 = 3
            DefLvl5 = 4
            DefLvl6 = 4
            DefLvl7 = 5
            DefLvl8 = 6
            DefLvl9 = 7
            DefLvl10 = 7
        ElseIf DefType = "Great" Then
            DefLvl1 = 3
            DefLvl2 = 4
            DefLvl3 = 4
            DefLvl4 = 5
            DefLvl5 = 5
            DefLvl6 = 6
            DefLvl7 = 6
            DefLvl8 = 7
            DefLvl9 = 7
            DefLvl10 = 8
        End If

        'This adds up to all 8 classes' DefLvls
        Def = DefLvl1 + DefLvl2 + DefLvl3 + DefLvl4 + DefLvl5 + DefLvl6 + DefLvl7 + DefLvl8 + dexM

0 个答案:

没有答案