从视图中选择一个按钮

Question

我在判断视图中的2个按钮中的哪个按钮被点击时遇到了一些语法问题。我有多个视图 - 所以首先会发生什么是基于当前视图将文本分配给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 

Answer 1

我做了一些改变 - 包括按钮的init和事件名称的位置 - 现在一切正常。

Answer 2

您是否看到Arrays of views tutorial？

您的代码是错误的。您声明的按钮1和按钮2从未初始化或分配。 最简单的解决方案是使用Tag属性标记每个按钮，然后检查clickButton.Tag并查找按下哪个按钮。

Answer 3

避免混淆 - 只需使用Designer添加视图，然后使用“工具....生成成员”来添加所有Dim语句和事件声明。