Πώς να εισαγάγετε ένα υπολογιστικό φύλλο Excel σε ένα VB Form

Είναι χρήσιμο να γνωρίζετε τον τρόπο εμφάνισης ενός υπολογιστικού φύλλου Microsoft Excel σε ένα έργο Visual Basic .NET για περαιτέρω επεξεργασία δεδομένων. Το Microsoft Excel είναι μια εφαρμογή υπολογιστικού φύλλου που περιλαμβάνεται στη σουίτα του Microsoft Office. Παρέχει πολλά χρήσιμα εργαλεία για την ανάλυση μεγάλων ποσοτήτων δεδομένων. Η Visual Basic είναι μια γλώσσα προγραμματισμού που αναπτύχθηκε από τη Microsoft, και ευνοείται από πολλούς προγραμματιστές λόγω της ευελιξίας της. Σε μερικά βήματα μπορείτε να δημιουργήσετε ένα έργο της Visual Basic για να εμφανίσετε τα περιεχόμενα από ένα υπολογιστικό φύλλο Excel.

Βήμα 1 - Ανοίξτε το Microsoft Excel και πληκτρολογήστε "A" στο "A1", "B" "Β1", "Στήλη Α" στο "Α2" και "Στήλη Β" στο "Β2". Αποθηκεύστε το υπολογιστικό φύλλο σε "C: \\" ως "ExcelFile.xlsx."

Βήμα 2

Ανοίξτε το Microsoft Visual Basic 2010 Express, κάντε κλικ στο μενού "Αρχείο" και επιλέξτε "Νέο έργο". Κάντε κλικ στην επιλογή "Εγκατεστημένα πρότυπα", επιλέξτε "Windows Forms Application" και κάντε κλικ στο κουμπί "OK".

Βήμα 3 - Πατήστε "Ctrl" + "Alt" + "X" για να ανοίξετε το παράθυρο "Toolbox". Κάντε διπλό κλικ στο στοιχείο "DataGridView" για να προσθέσετε ένα νέο στοιχείο ελέγχου πλέγματος δεδομένων στο "Form1". Κάντε διπλό κλικ στο κουμπί "Κουμπί" στο "Εργαλειοθήκη" για να προσθέσετε ένα νέο κουμπί στο "Form1".

Βήμα 4 Κάντε διπλό κλικ στο κουμπί "Button1" για να ανοίξετε τη λειτουργική μονάδα "Form1.vb". Πληκτρολογήστε τα παρακάτω "Public Class Form1": Εισαγωγή System.Data.OleDb

Βήμα 5

Πληκτρολογήστε τα παρακάτω μέσα στο "Private Sub Button1_Click" για να δηλώσετε ένα "DataSet" και να ορίσετε τη σύνδεση Excel: Dim ds Ως Νέα σύνδεση δεδομένων DataSet () DimString As String = "Provider = Microsoft.ACE.OLEDB.12.0;" & _ "Πηγή δεδομένων = C: \\ ExcelFile.xlsx;" & _ "Εκτεταμένες ιδιότητες = Excel 12.0"

Βήμα 6

Πληκτρολογήστε τα εξής για να συνδεθείτε στο αρχείο "ExceFile.xlsx" και συμπληρώστε το "DataSet": Dim excelData ως νέο OleDbDataAdapter (" FROM [Sheet1 $] ", connectionString) ExcelData.TableMappings.Add (" Table "," ExcelSheet ") excelData.Fill (ds)

Πληκτρολογήστε τα παρακάτω για να εμφανίσετε το υπολογιστικό φύλλο στην προβολή πλέγματος δεδομένων: Me.DataGridView1.DataSource = ds.Tables (0) Me.Refresh () Πατήστε "F5" για να εκτελέσετε το πρόγραμμα σας και πατήστε "Button1" για να εισαγάγετε το υπολογιστικό φύλλο Excel.