Exibição de dados do Excel para um Visual Basic 6.0 controle DataGrid pode fazer seus aplicativos VB6 mais user-friendly por ser capaz de exibir dados de Excel. VB6 é uma linguagem de programação de computador desenvolvido pela Microsoft. VB6 foi substituído pelo Visual Basic.NET ( VB.NET ), que usou a NET . . Um controle DataGrid é usada para exibir dados em um formato tabular semelhante a uma tabela de banco de dados . Use ADO para fazer a conexão para o Excel e consultar a planilha usando um "Select" instrução SQL. Depois de fazer a conexão com o Excel , então você pode usar um conjunto de registros para acessar os dados . Instruções
um
Copie e cole o seguinte código para criar um novo procedimento sub e criar as variáveis que você vai usar para fazer a conexão com o Excel:
Private Sub displayExcelInDataGrid () Dim rs como rs ADODB.RecordsetSet = Novo ADODB.RecordsetDim sConn como StringDim sFile as String
2
defina o caminho para sua planilha Excel e definir as propriedades do conjunto de registros :
sFile = "C : \\ Temp \\ myXLFile.xls " rs.CursorLocation = adUseClientrs.CursorType = adOpenKeysetrs.LockType = adLockBatchOptimistic
3
Copie e cole o seguinte código de consulta " Sheet1 "do Excel e exibi-lo através o controle DataGrid usando o conjunto de registros :
sConn = " dRIVER = Microsoft Excel Driver ( *. xls )," & " DBQ =" & sFilers.Open "SELECT * FROM [ ,"Sheet1 $ ] " , sconnSet DataGrid1.DataSource = RSEND Sub