Arrays 我需要一个数组和一个列表吗?
我正在制作一个游戏程序。它采用类的级别(其中可以同时有8个不同级别的不同级别)。每门课都有一个不同的维度值,我称之为防御,它有6个不同的等级。这6个级别中的每一个都对应一个基于每个级别的值 我几乎可以肯定我需要一个数组或列表,我在这里看到了一些例子,但我还没有看到一些非常适合我的情况 我需要在一个数组中包含一个数组吗?这可能吗 如果我在解释我试图实现的目标时表现糟糕,我向你道歉 例如,如果一个人选择了坚强的英雄,然后选择了4级。接下来他们会选择快速英雄并选择5级。我试图让它看看4对强者英雄和快速英雄的价值,找到它们,然后在最后将它们添加到Def中 提前感谢所有愿意忍受我无知的人Arrays 我需要一个数组和一个列表吗?,arrays,vb.net,list,Arrays,Vb.net,List,我正在制作一个游戏程序。它采用类的级别(其中可以同时有8个不同级别的不同级别)。每门课都有一个不同的维度值,我称之为防御,它有6个不同的等级。这6个级别中的每一个都对应一个基于每个级别的值 我几乎可以肯定我需要一个数组或列表,我在这里看到了一些例子,但我还没有看到一些非常适合我的情况 我需要在一个数组中包含一个数组吗?这可能吗 如果我在解释我试图实现的目标时表现糟糕,我向你道歉 例如,如果一个人选择了坚强的英雄,然后选择了4级。接下来他们会选择快速英雄并选择5级。我试图让它看看4对强者英雄和快速
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
我强烈建议您了解类。同时查找
Integer.Parse
和Integer.TryParse
方法。如果ElseIf块,则不需要这些块。此外,比较文本的速度相对较慢。您可以使用列表或数组。如果不知道列表中有多少项,列表比数组容易得多。是的,您可以创建数组的数组。您还可以创建列表列表、列表数组和数组列表。如果有疑问,请尝试使用列表。我强烈建议您了解类。还要查找Integer.Parse
和Integer.TryParse
方法。如果ElseIf
块,则不需要这些块。此外,比较文本的速度相对较慢。您可以使用列表或数组。如果不知道列表中有多少项,列表比数组容易得多。是的,您可以创建数组的数组。您还可以创建列表列表、列表数组和数组列表。如果有疑问,尝试使用列表。