2012-09-28 75 views
0

我创建了一个Sub我想在每次点击两个按钮之一时运行。我将两个按钮的控制柄添加到了子控件中,以便单击任意一个按钮都可以触发子程序。将对象分配给button.tag

我把buttonA.tag中的listview对象A和buttonB中的listview对象B.

当按钮被点击时,我尽我所能提取隐藏在按钮标签中的listview实例。问题是标签中没有实例。这简直是​​“没有”。

Private Sub Execute(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnA.Click, btnB.Click 

     Dim buttonSender As Button = Nothing 

     buttonSender = CType(sender, Button) 

     Dim btnListView As ListView = buttonSender.Tag 

    End Sub 

------------------- 编辑-1

Private Sub Form_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load 
     Me.btnA.Tag = Me.lvA 
     Me.btnB.Tag = Me.lvB 
    End Sub 

你的时间是赞赏。

+1

这里试了一下,效果。你不能正确分配列表视图到标签? – Swordblaster

+0

您的表单是模态对话框吗? – Ccorock

+0

我的部分愚蠢的错误...我实际上有一个向上和向下箭头A和B所以A1和A2,B1和B2我分配listA到A1和列表B到A2不应该是因为它应该是A1到lvA和B1到LVB。所以,如果任何人明白,我希望这个代码是一个教程分配对象button.tag ...谢谢大家。 – Ccorock

回答

1

试试这个,

Dim buttonSender As Button = CType(sender, Button) 
+0

负面的。 Buttonsender.tag仍然注册为无...我想知道是否因为发件人被宣布为一个对象,它失去了只与按钮类有关的标签属性,即使按钮的基类是一个对象... – Ccorock

+0

我想我将不得不使用发件人作为指向表单上的按钮对象的指针...然后从实际的按钮上获取标签,然后从那里开始。 – Ccorock