2011-11-09 10 views
0

私は基本的なスロットマシンをVisual Basicでプログラミングしていますが、forループを使用して各スロットの画像をランダムに選択し、各スロットに画像を表示し、slotName変数を変更したいとします。シンボルはスロット内にあります)。文字列をVisual Basicで定義済みの変数名に変換しますか?

forループで見つかった問題は、各スロットの変数とオブジェクトに異なる名前(slot1Name、slot2Name、slot3Name、lblSlot1、lblSlot2、lblSlot3など)があることです。私のようなものを持っている可能性がどのような方法があります:

currentSlotName = "slot" & i & "Name" 

これは現時点でのコードで、このコードは、かなり非効率的である、3つのスロットごとに、(別の変数やオブジェクト名で)繰り返されます。どうすればこのコードを整理できますか?

' Randomise numbers and assign images to slots based on random numbers, if the hold isn't on 
    ' Slot 1 
    If Not held1 Then 
     slot1Value = Int(Rnd() * numbersGenerated + 0.5) 
     Select Case slot1Value 
      Case 0 To 5 
       lblSlot1.Image = imgBanana 
       slot1Name = "Banana" 
      Case 6 To 11 
       lblSlot1.Image = imgOrange 
       slot1Name = "Orange" 
      Case 12 To 16 
       lblSlot1.Image = imgCherries 
       slot1Name = "Cherries" 
      Case 17 To 19 
       lblSlot1.Image = imgSeven 
       slot1Name = "Seven" 
      Case 20 
       lblSlot1.Image = imgBatman 
       slot1Name = "Batman" 
      Case Else 
       lblSlot1.Text = "Error. slot1value = " & slot1Value 
     End Select 
    End If 

私はこのために周りに検索しましたが、私は、Visual Basicに非常に新しいです、そしてできるだけ簡単に自分のコードを維持したいです。

答えて

1

説明が多すぎます。配列は次に学ばなければならないものです。

http://msdn.microsoft.com/en-us/library/wak0wfyt.aspx

+0

私は前にそれらのことを聞いたが、それらを試すにはあまりにも怖がっている、と私は今それを実装しようとしていた、見て、それらを持っていました。それがうまくいかないので、うまくいきません。ありがとうございます。私はそれらについて学び始めてうれしいです。 – SiliconCelery

関連する問題