我在查明视图中的哪两个按钮被点击时遇到了一些语法。我有多个视图 - 所以首先发生的是基于当前视图将文本分配给2个按钮 - 然后我想要发生的是基于单击哪个按钮的动作。我的观点工作正常 - 这是我想弄清楚的按钮代码。我也试图避免为每个单独的按钮点击写一个子 - 并且想要我可以重复用于任何总是有2个按钮的视图的通用代码。
Sub catchtheClick
Dim button1,button2,clickButton As Button
clickButton = Sender
If (we figure out which view - view1 for example) Then
button1.Text = "view1-button1"
button2.Text = "view1.button2"
button1.Tag = "btn1"
button2.Tag = "btn2"
Select clickButton.Tag
Case "btn1"
(we go to another view etc.)
Case "btn2" Then
(we go to some other view etc.)
End Select
End If
End Sub
答案 0 :(得分:0)
您看到了Arrays of views tutorial吗?
你的代码错了。您正在声明从不初始化或分配的button1和button2。 最简单的解决方案是使用Tag属性标记每个按钮,然后检查clickButton.Tag并找到按下的按钮。
答案 1 :(得分:0)
避免混淆 - 只需使用Designer添加视图,然后使用“工具......生成成员”添加所有Dim语句和事件声明。
答案 2 :(得分:0)
我做了一些更改 - 包括按钮init和事件名称的位置 - 现在一切正常。