ขอวิธี export DataGridView to excel หน่อยครับ ใช้ vb 2008 Office 2010 ครับ

        If cnn.State = ConnectionState.Open Then
            cnn.Close()
        End If
        cnn.ConnectionString = "Data Source=192.168.1.232,1433;Initial Catalog=db_comsystem;User Id=sa;Password=1234;"
        cnn.Open()
        adr = New SqlDataAdapter("SELECT * From tbcom_hd ", cnn)
        adr.Fill(ds, "tbcom_hd")
        DataGridView1.DataSource = ds.Tables("tbcom_hd")