Basic4android 从视图中选择按钮

Basic4android 从视图中选择按钮,basic4android,Basic4android,我一直在使用一些语法来确定视图中的两个按钮中的哪一个被单击。我有多个视图-因此首先发生的是基于当前视图将文本分配给2个按钮-然后我希望发生的是基于单击哪个按钮的操作。我的视图工作正常-这是我试图找出的按钮代码。我还试图避免为每个单独的按钮单击编写一个子代码,并希望通用代码可以用于任何始终有2个按钮的视图 Sub catchtheClick Dim button1,button2,clickButton As Button clickButton = Sender If (

我一直在使用一些语法来确定视图中的两个按钮中的哪一个被单击。我有多个视图-因此首先发生的是基于当前视图将文本分配给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
你看到那张照片了吗

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

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

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

我从原来的子组件中移动了按钮-忘记了初始位置。我试着用tag来检查点击了哪个按钮——这让我的问题有了一个完整的循环——学习语法并遇到问题。