כיצד להכניס גיליון אלקטרוני של Excel לתוך טופס VB

ניתן ליצור פרויקט Visual Basic המציג תוכן של Excel.

שלב 1

פתח את Microsoft Excel והזן "A" ב- "A1", "B" ב- "B1", "טור A" ב- "A2" ו- "Column B" ב- "B2". שמור את הגיליון האלקטרוני ב- "C: \" כ- "ExcelFile.xlsx".

שלב 2

פתח את Microsoft Visual Basic 2010 Express, לחץ על תפריט "קובץ" ובחר "פרוייקט חדש". לחץ על "Installed Templates", בחר "Windows Forms Application" ולחץ על "אישור".

שלב 3

הקש "Ctrl" + "Alt" + "X" כדי לפתוח את החלון "ארגז כלים". לחץ פעמיים על "DataGridView" כדי להוסיף בקרת תצוגת רשת חדשה ל "Form1". לחץ פעמיים על "כפתור" בתוך "ארגז כלים" כדי להוסיף כפתור חדש "Form1".

שלב 4

לחץ פעמיים על "Button1" כדי לפתוח את המודול "Form1.vb". הזן את הפרטים הבאים על "Public Class Form1":

יבוא System.Data.OleDb

שלב 5

הזן את הפרטים הבאים "פרטי Sub Button1_Click" כדי להכריז על "DataSet" ולהגדיר את החיבור עם Excel:

דים Ds כמו חדש DataSet () עבה חיבור String כמו מחרוזת = "ספק = Microsoft.ACE.OLEDB.12.0;" & _ "מקור נתונים = C: \ ExcelFile.xlsx;" & "מאפיינים מורחבים = Excel 12.0;"

שלב 6

הזן את הפרטים הבאים כדי להתחבר לקובץ ExceFile.xlsx ולהשלים את "DataSet":

("טבלה", "ExcelSheet") excelData.Fill (ds)

שלב 7

הזן את הפרטים הבאים כדי להציג את הגיליון האלקטרוני בתצוגת רשת הנתונים:

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

לחץ על "F5" כדי להפעיל את התוכנית ולחץ על "Button1" כדי לייבא את הגיליון האלקטרוני של Excel.