VB6 - Usando o componente Microsoft DataGrid Control "Sem complicação"

' === Usando o componente Microsoft DataGrid Control === ' ' --- Introdução --- ' 'Aqui é demonstrado como manipular um DataGrid 'através do recordset sem a nececidade de código 'complexo para monstrar dados em um grid e permitir 'a adição, edição e exclusão. ' ------------------ ' ' --- Antes de começar --- ' ' 1 - Vá no menu Project / Components... ' 2 - Marque o compomente Microsoft DataGrid Control ' 3 - Clique em Aplicar e depois fecha a janela ' 4 - Aparece um novo componente ToolBox ' 5 - Insira o DataGrid no Form e ' insera o código abaixo e não se esqueça ' de passar os valores para as variaveis: ' ConnctionString, SqlString ' ------------------------ ' ' ====================================================== ' Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim ConnctionString, SqlString As String ConnctionString = "Configure a conexão com o provedor de dados" SqlString = "Passe a Instrução SQL a ser e executada" ' Conexão With cn .ConnectionString = ConnctionString .CursorLocation = adUseClient .Open End With ' Recordset With rs .ActiveConnection = cn .CursorLocation = adUseClient .CursorType = adOpenDynamic .LockType = adLockBatchOptimistic .Source = SqlString .Open End With With DataGrid1 ' Configura as permissões do DataGrid .AllowAddNew = True .AllowUpdate = True .AllowDelete = True ' Vincula o Recordset ao DataGrid Set .DataSource = rs End With