这是我想做的一件特别的事情,不知道怎么叫它,基本上是这样的。
使用字符串或类似内容查找变量:
两个按钮,名称分别为Car和Bus。
Dim New_Car as String
Dim New_Bus as String
'Then when either buttons is pressed
New_<button_name_here> = Something
当我用类似的方法做类似的事情时,它可以工作。
My.Settings(<button_name_here>) = Something
但在这种情况下,它显示语法错误,而我无法找出它。
发布于 2019-05-23 22:55:06
您可以使用字典执行类似于设置的操作
Dim buttonValue As New Dictionary(Of String, String) From {{"Car", ""}, {"Bus", ""}}
buttonValue("Car") = "Some value"
另一种选择是在启动时通过循环所有按钮来初始化密钥。
Loop all button
buttonValue.Add(<Button name>, <initial value>)
发布于 2019-05-24 03:15:09
两个按钮都可以有一个处理程序。确定发送者点击了哪个按钮
Private Sub Vehicle_Click(sender As Object, e As EventArgs) Handles Bus.Click, Car.Click
Dim buttonName = DirectCast(sender, Button).Name
Select Case buttonName
Case "Car"
Dim New_Car = "something"
Case "Bus"
Dim New_Bus = "something else"
End Select
End Sub
https://stackoverflow.com/questions/56277779
复制相似问题