2011-11-09 103 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

相關問題