0

在确定单击视图中的 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
4

3 回答 3

0

你看过Arrays of views 教程吗?

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

于 2011-11-03T09:44:07.937 回答
0

避免混淆 - 只需使用设计器添加视图,然后使用“工具 ....生成成员”添加所有 Dim 语句和事件语句。

于 2011-11-03T11:23:21.720 回答
0

我做了一些更改——包括按钮初始化和事件名称的位置——现在一切正常。

于 2011-11-03T12:42:55.190 回答