同一表单 VB.NET 上的多个网格视图答案

【问题标题】：Mutiple gridviews on same form VB.NET同一表单 VB.NET 上的多个网格视图
【发布时间】：2014-01-09 20:04:58
【问题描述】：

我想知道是否有一种更有效的方法可以在同一表单上显示多个网格视图。假设我有 4 个显示不同数据的网格视图，并且每次按下 4 个按钮之一时都希望显示一个特定的视图

我现在就这样

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    Me.DealerShipTableAdapter.Fill(Me.HermesZingoDataSet.DealerShip, ComboBox1.SelectedValue)
    dateGridView.Visible = False
    DataGridViewDealerShip.Visible = True

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

    Me.DateFilterTableAdapter.Fill(Me.dateDataSet.DateFilter, TextBox1.Text, TextBox2.Text)
    DataGridViewDealerShip.Visible = False
    dateGridView.Visible = True

End Sub

是否有另一种编码方式以使所有其他网格视图可见 = 假？谢谢

【问题讨论】：

标签： vb.net visual-studio-2010 datagridview

【解决方案1】：

我想您可以执行以下操作来稍微简化一下：

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    ShowGridView(GridView1)
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    ShowGridView(GridView2)
End Sub

private sub ShowGridView(gv As GridView)
  GridView1.Visible = GridView1 = gv
  GridView2.Visible = GridView2 = gv
  GridView3.Visible = GridView3 = gv
  GridView4.Visible = GridView4 = gv
End sub

【讨论】：