VB.net对于datagride控件的使用及C#中datagrideView\bindingSource\bindingNavigator\tabcontrol控件的应用

                //绑定数据源

                DataSet ds = new DataSet();

                SqlConnection connection = new SqlConnection(netiFace.ConnectionString.ConnectionString);

                connection.Open();

                SqlDataAdapter  da = new SqlDataAdapter("select * from dot", connection);

                da.Fill(ds, "dot");

                DataTable mytable = new DataTable();

                mytable = ds.Tables["dot"];

                dataGridView1.AutoGenerateColumns = true;

                dataGridView1.DataSource = mytable;

                dataGridView1.MultiSelect = false;//不可多选行

                bindingSource1.DataSource = mytable;

                bindingNavigator1.BindingSource = bindingSource1;

                //隐藏一个页签

                 this.tabControl2.TabPages.Remove(tabControl2.TabPages[2]);

                 this.tabControl1.TabPages.Remove(tabControl1.TabPages[3]);

                this.tabControl1.TabPages.Remove(tabControl1.TabPages[2]);

      -----------------------------   //bindingNavigator和dataGridView的联动----------------------------------------------

         bindingNavigatorMoveLastItem.Click += new System.EventHandler(this.MoveDataControl);

         bindingNavigatorMoveLastItem.Click += new System.EventHandler(this.MoveDataControl);

         bindingNavigatorMovePreviousItem.Click+= new System.EventHandler(this.MoveDataControl);

         bindingNavigatorMoveNextItem.Click += new System.EventHandler(this.MoveDataControl);

         public void MoveDataControl(object sender, EventArgs e)

        {

            //下一行

            int rowIndex = int.Parse(bindingNavigatorPositionItem.Text) - 1;

            dataGridView1.ClearSelection();

             //选中这一行

            dataGridView1.Rows[rowIndex].Selected = true;

            //最前面的黑色三角号跟着移动

              dataGridView1.CurrentCell = dataGridView1.Rows[rowIndex].Cells[0];

            //滚动条跟着移动

            dataGridView1.FirstDisplayedScrollingRowIndex = dataGridView1.SelectedRows[0].Index;

        }

 ‘-------------------------------------------------------------------------------------------------------------------------------

 如果要在BindingNavigator中的删除按钮按下前，会出现是否删除的提示，请下列操作

1、将DataGridView中的DeleteItem属性与删除按钮取消绑定

2、添加删除按钮的Click事件

3、在删除按钮的Click事件中键入以下代码

            if (!(操作员DataGridView.CurrentRow.IsNewRow))

            {

                if (MessageBox.Show("确认删除该笔数据？", "请选择", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2) == DialogResult.Yes)

                {

                    操作员DataGridView.Rows.Remove(this.操作员DataGridView.CurrentRow);

                }

'-----------------------------------------------------------------------------------------------------------------------------

‘VB.net对于datagride控件的使用

'刷新datagride控件

    Public Sub RefreshDG(ByRef dic As Dictionary(Of String, Integer), ByRef MyTable As DataTable)

        'datagride的列名和列宽

        If IsNothing(MyTable) = False Then

            If DataGrid1.TableStyles.Count = 0 Then

                Dim keyvalue As KeyValuePair(Of String, Integer)

                Dim MyTabStyle As New DataGridTableStyle()

                Dim MyCol As DataGridTextBoxColumn

                Dim intCnt As Integer = 0

                MyTabStyle.MappingName = MyTable.TableName

                For Each keyvalue In dic

                    MyCol = New DataGridTextBoxColumn()

                    MyCol.MappingName = MyTable.Columns(intCnt).ColumnName

                    MyCol.Width = keyvalue.Value

                    MyCol.HeaderText = keyvalue.Key

                    MyTabStyle.GridColumnStyles.Add(MyCol)

                    intCnt = intCnt + 1

                Next

                DataGrid1.TableStyles.Add(MyTabStyle)

                keyvalue = Nothing

                MyTabStyle = Nothing

                MyCol = Nothing

                intCnt = Nothing

            End If

            Me.DataGrid1.DataSource = MyTable

            ’刷新

            DataGrid1.ResetBindings()

            '选择最后一行为选中(行索引从0开始)

            If Me.DataGrid1.VisibleRowCount > 0 Then

                Me.DataGrid1.CurrentRowIndex = Me.DataGrid1.VisibleRowCount - 1

            End If

        End If

    End Sub

'datagrid列表行指针的移动控制

’定义行指针移动管理器

 Private WithEvents CMgr As CurrencyManager

    Private Sub CMgr_PositionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles CMgr.PositionChanged

        If CMgr.Position = CMgr.Count - 1 Then

            cmdNext.Enabled = False

            cmdLast.Enabled = False

        Else

            cmdNext.Enabled = True

            cmdLast.Enabled = True

        End If

        If CMgr.Position = 0 Then

            cmdPrev.Enabled = False

            cmdFirst.Enabled = False

        Else

            cmdPrev.Enabled = True

            cmdFirst.Enabled = True

        End If

        lblRowClicked.Text = CMgr.Position

        'lblRow.Text = "Row " & CType(Me.BindingContext(DTbl), CurrencyManager).Position

    End Sub

    Private Sub cmdCurrencyMangr_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdCurrencyMangr.Click

        DTbl = CreateTableMemoryObjectNoPK()

        AddDataToDTableFromSQL(DTbl)

       ‘把表的移动绑定到CurrencyManager

        CMgr = CType(Me.BindingContext(DTbl), CurrencyManager)

        'Clear any existing TableStyles

        CGrid.ClearTableStyles(DataGrid1)

        AttachTableStyle2() 'Now Detects Row Change Events In Grid

    End Sub

---------------------------------------------------------------------- vb.net对bindingsource/bindingNavigator/dataGridView的绑定------------------------------

参考博客：http://xaobenyu.blog.sohu.com/43341191.html

                 http://www.cnblogs.com/huangfr/archive/2011/09/06/2168196.html

-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------