Excel elektronik tablosu VB formuna nasıl eklenir

Excel içeriğini gösteren bir Visual Basic projesi oluşturabilirsiniz.

1. Adım

Microsoft Excel'i açın ve "A1", "B", "B2" de "A" sütununa "A2" ve "B2" deki "Sütun B" ye "A" yazın. Elektronik tablonuzu "C: \" "ExcelFile.xlsx" olarak kaydedin.

2. Adım

Microsoft Visual Basic 2010 Express'i açın, "Dosya" menüsünü tıklayın ve "Yeni Proje" yi seçin. "Yüklü Şablonlar" a tıklayın, "Windows Forms Uygulaması" nı seçin ve "Tamam" a tıklayın.

3. adım

"Araç Kutusu" penceresini açmak için "Ctrl" + "Alt" + "X" tuşlarına basın. Yeni bir Veri Izgarası Görünümü denetimini "Form1" e eklemek için "DataGridView" öğesine çift tıklayın. "Form1" e yeni bir düğme eklemek için "Araç Kutusu" içindeki "Düğme" ye çift tıklayın.

4. Adım

"Form1.vb" modülünü açmak için "Button1" düğmesine çift tıklayın. "Genel Sınıf Form1" hakkında aşağıdakileri girin:

Implementation System.Data.OleDb

Adım 5

Bir "DataSet" bildirmek ve Excel ile bağlantıyı tanımlamak için "Özel Sub Button1_Click" bölümünde aşağıdakini girin:

DimSs Yeni DataSet () olarak Dim connectionString As String = "Sağlayıcı = Microsoft.ACE.OLEDB.12.0;" & _ "Veri Kaynağı = C: \ ExcelFile.xlsx;" & _ "Genişletilmiş Özellikler = Excel 12.0;"

6. Adım

"ExceFile.xlsx" dosyasına bağlanmak ve "DataSet" dosyasını tamamlamak için aşağıdakileri girin:

Yeni OleDbDataAdapter olarak Dim excelData ("SELECT * FROM [Sheet1 $]", connectionString) excelData.TableMappings.Add ("Tablo", "ExcelSheet") excelData.Fill (ds)

7. adım

Elektronik Tabloyu Veri Izgarası Görünümünde görüntülemek için aşağıdakileri girin:

Me.DataGridView1.DataSource = ds.Tablolar (0) Me.Refresh ()

Programı çalıştırmak için "F5" e basın ve Excel e-tablosunu içe aktarmak için "Button1" tuşuna basın.