Ανοίξτε Visual Basic 6 και επιλέξτε "Standard EXE " από τη νέα λίστα των έργων . 2
Πήγαινε στην κορυφή γραμμή μενού , κάντε κλικ στο " Project" και , στη συνέχεια, κάντε κλικ στο κουμπί " Προσθήκη Module . " Αυτό θα προσθέσει μια τυπική λειτουργική μονάδα κώδικα στο έργο VB6 σας
εικόνων 3
Πληκτρολογήστε ή αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στη λειτουργική μονάδα : .
Sub OleAutomateExcell ( )
Δημ. MyExcellApp ως αντικείμενο
Set MyExcellApp = = " Αυτό είναι το πώς λειτουργεί OLE Automation "
MyExcellApp.Visible = True
End Sub
Ο κώδικας χρησιμοποιεί OLE Automation κάνοντας μια αναφορά στην εφαρμογή Microsoft Excel . Μόλις συνδεθεί , τότε είναι σε θέση να ανοίξει και να αλληλεπιδρούν με αυτό , με την προσθήκη των βιβλίων εργασίας και εισάγοντας το κείμενο " Αυτό είναι το πώς λειτουργεί OLE Automation . "
Η
4 Πατήστε το πλήκτρο " F5 " για να εκτελέσετε το πρόγραμμα .
Η
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα