none
Limpando um DataGRid RRS feed

  • Pergunta

  • Seguinte galera, ja li varios posts sobre esse assunto mas nenhum me ajudou...

    Seguinte, eu tenho um formulario aqui, que pesquisa dados no banco, e posta eles em um data grid ... eu tenho botao de "Limpar" que é esse:

     Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    	 DataGridView1.DataSource = Nothing 
     End Sub

    ele limpa normal, mas ai quando eu faço outra pesquisa, vem os novos dados, e os dados antigos ... ou seja, ele some com os dados mas não o "limpa"

    eis o código do formulario:

    Imports MySql.Data.MySqlClient
    
    Public Class FrmIniciovb
    	 Dim conn As New MySqlConnection
    	 Dim myCommand As New MySqlCommand
    	 Dim myAdapter As New MySqlDataAdapter
    	 Dim myData As New DataTable
    	 Dim SQL As String
    	 Dim contador As Integer
    
     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    
    	 Dim conn As MySqlConnection
    
    	 conn = New MySqlConnection
    
    	 conn.ConnectionString = "server=localhost;user id=root;password=;database=arquivo_morto"
    
    	 SQL = "SELECT * FROM alunos WHERE nome LIKE '" + TextBox1.Text + "%'"
    
    	 Try
    
    	   conn.Open()
    
    		 Try
    
    		  myCommand.Connection = conn
    
    		  myCommand.CommandText = SQL
    
    		  myAdapter.SelectCommand = myCommand
    
    		  myAdapter.Fill(myData)
    
    		  DataGridView1.DataSource = myData
    
    		 Catch myerro As MySqlException
    
      		  MsgBox("Erro de leitura no banco de dados : " & myerro.Message)
    
    		End Try
    	 contador = DataGridView1.RowCount - contador - 1
    	 MessageBox.Show("Foram encontrados " & contador & " Registros")
    	 lbl_registros.Text = DataGridView1.RowCount - 1 & " Registro(s)"
    	 conn.Close()
     	 Catch myerro As MySqlException
     		MessageBox.Show("Erro ao conectar com o Banco de dados : " & myerro.Message)
    	 Finally
    	 conn.Dispose()
    
     	 End Try
    End Sub
    
    
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    	DataGridView1.DataSource = Nothing
    End Sub
    
    End Class
    Obrigado!
    domingo, 30 de maio de 2010 18:35

Respostas

  • Para limpar teu DataGridView use este código:

     

        Dim dt As DataTable
        dt = DataGridView1.DataSource
        dt.Rows.Clear()


    msn: poseidonfba@hotmail.com
    • Marcado como Resposta Fabio R. Luz domingo, 30 de maio de 2010 23:44
    domingo, 30 de maio de 2010 19:31

Todas as Respostas