Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load DataGridView1.ColumnCount = 10 DataGridView1.RowCount = 10 End Sub
Private Sub DataGridView1_RowHeaderMouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles DataGridView1.RowHeaderMouseClick Dim n As Integer n = DataGridView1.SelectedRows.Count MessageBox.Show("你选择了" & n & "行") End Sub
Private Sub dgItem_SelectionChanged(sender As Object, e As System.EventArgs) Handles dgItem.SelectionChanged StatusStrip1.Items(0).Text = "选择了" + dgItem.SelectedRows.Count.ToString() + "行。"End Sub