help making either a list or array

[skaryChinezeGuie]

i have 9 drugs that i want to make a list or array with and correspond each one to a number, that's why i was thinking array. but i don't know how to go about it. Here's what i have so far.

Public Sub RandomLuck()

Dim randomLuck As Random = New Random
Dim GoodLuck As Integer
Dim BadLuck As Integer
Dim LuckDecision As Integer

LuckDecision = randomLuck.Next(1, 5)

If LuckDecision = 1 Then
Select Case GoodLuck = randomLuck.Next(1, 3)
End Select
End If

If LuckDecision = 5 Then
Select Case BadLuck = randomLuck.Next(1, 3)
End Select
End If


Then for example i want to say :

If GoodLuck = 1 Then
messagebox.Show("The Market is flooded with" & "XRandomDrugFromArrayX")
End If

Then somehow i need to subtract a random number from the price of the same drug. I tend to overcomplicate things so if someone knows an easier way or how to fill in the blanks I'd appreciate it.

 

[vis781]

You could look into using a hashtable, it is basically a list but consists of a key field that you can specify and also a value.

 

[skaryChinezeGuie]

hmmm. i'll see what i can come up with. thanks for the tip.

 

[JuggaloBrotha]

is this for a dopewars/drugwars game?

 

[skaryChinezeGuie]

nooooooo. Yes! Man! but after getting the other copy of yours i saw how you did it but i couldn't get it to work without redoing a buncha stuff.