繁体   English   中英

将字符串转换为Visual Basic中的预定义变量名?

[英]Convert string to pre-defined variable name in Visual Basic?

我正在Visual Basic中对基本的老虎机进行编程,并且想使用for循环为每个插槽随机选择图像,在每个插槽中显示图像,然后更改slotName变量(以便稍后检查哪个符号是在每个插槽中)。

我在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还是很陌生,并希望使我的代码尽可能简单。

太多解释了。 数组是您接下来需要学习的内容。

http://msdn.microsoft.com/zh-CN/library/wak0wfyt.aspx

暂无
暂无

声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM