vb.net DGV不覆盖数据

      Private DataTable1 As New DataTable   '设成全局变量'''''''''''''''''
      Dim connstr As String = String.Format("server={0};user id={1}; password={2};port={3}; database=test; pooling=true", "ip地址", "root", "123456", "3307")
      Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim MySqlConn As MySqlConnection
        If Not MySqlConn Is Nothing Then MySqlConn.Close()
        Try
            MySqlConn = New MySqlConnection(connstr)
            MySqlConn.Open()
            Dim Adp1 As New MySqlDataAdapter("select * from ....;", MySqlConn)  
            Adp1.Fill(DataTable1)
            Me.DataGridView1.DataSource = DataTable1
            MySqlConn.Close()
            MySqlConn.Dispose()
        Catch ex As Exception
            MessageBox.Show(ex.ToString)
        End Try
      End Sub

可实现DGV不覆盖数据