Eu to tentando fazer um sistema de save/load
, estou travado na parte de carregar as cartas do jogo, que são numeradas por exemplo: 1,2,3.
A string
contém os números das cartas entre outras informações:
Nome|1,2,3,4,5,6,7,8,9|59000|50%
nome cartas money reputação
Meu código de load
:
Dim Nome As String = values(0)
Dim Cartas As String = values(1)
Dim Dinheiro As String = values(2)
Dim Reputacao As String = values(3)
MsgBox(Nome)
MsgBox(Cartas)
MsgBox(Dinheiro)
MsgBox(Reputacao)
Dim cards() As String = Cartas.Split(","c)
'MsgBox(cards)
Dim word As String
Dim b As Integer
For Each word In cards
b = b +1
MsgBox(word)
Next
Dim nCartas = b
Eu tenho o número de cartas, como faço pra pegar X
quantidade de itens da string Cards
?, por exemplo: o nCartas
é 10
, eu quero pegar as 10 strings
da Cards.