Как да вмъкнете електронна таблица в Excel във формат VB

Можете да създадете проект на Visual Basic, който показва съдържанието на Excel.

Стъпка 1

Отворете Microsoft Excel и въведете "A" в "A1", "B" в "B1", "Колона А" в "A2" и "Колона Б" в "B2". Запазете електронната си таблица в "C: \" като "ExcelFile.xlsx".

Стъпка 2

Отворете Microsoft Visual Basic 2010 Express, кликнете върху менюто "Файл" и изберете "Нов проект". Кликнете върху "Инсталирани шаблони", изберете "Windows Forms Application" и кликнете върху "OK".

Стъпка 3

Натиснете "Ctrl" + "Alt" + "X", за да отворите прозореца "Toolbox". Щракнете двукратно върху "DataGridView", за да добавите нов контролен контролен панел за данни към "Form1". Щракнете двукратно върху "Бутон" в "Toolbox", за да добавите нов бутон към "Form1".

Стъпка 4

Щракнете двукратно върху "Button1", за да отворите модула "Form1.vb". Въведете следното за "Public Class Form1":

Импортиране на System.Data.OleDb

Стъпка 5

Въведете следното в "Private Sub Button1_Click", за да декларирате "DataSet" и да определите връзката с Excel:

Dim ds As New DataSet () Размер на връзката DimString As String = "Provider = Microsoft.ACE.OLEDB.12.0;" & _ "Източник на данните = C: \ ExcelFile.xlsx;" & _ "Разширени свойства = Excel 12.0;"

Стъпка 6

Въведете следното, за да се свържете към файла "ExceFile.xlsx" и да завършите "DataSet":

Размерете excelData като нов OleDbDataAdapter ("SELECT * FROM [Sheet1 $]", connectionString) ExcelData.TableMappings.Add ("Таблица", "ExcelSheet") excelData.Fill (ds)

Стъпка 7

Въведете следното, за да покажете електронната таблица в изгледа на таблицата с данни:

Me.DataGridView1.DataSource = ds.Таблици (0) Me.Refresh ()

Натиснете "F5", за да стартирате програмата и натиснете "Бутон1", за да импортирате електронната таблица в Excel.