我正在使用VB制作一款游戏并且已经烦恼了。
在我的游戏菜单中,有一些按钮/滑块/切换/文本框可以改变程序中变量的值 - 例如:亮度,切换阴影,音量等......
现在,在这些菜单元素的'ChangeVal()'函数中,我有一个if语句,用于元素的文本,并相应地更改游戏中的变量。是否有可能创建一个神奇的系统,允许我在菜单元素的声明中指定要更改的变量?
Public Sub changeVal()
'CHANGES VALUES OF VARAIBLES BASED ON TEXT
Select Case text
Case "Sound Effects" : Game.soundVolume = value
Case "Music" : Game.musicVolume = value : For counter As Integer = 0 To Game.music.Count - 1 : Game.music(counter).sound.Volume = value / 100 : Next
Case "Brightness" : Game.brightness = value
End Select
End Sub