1 Ανοίξτε το Microsoft Visual Basic Express και επιλέξτε "New Project .. . " από το αριστερό παράθυρο της οθόνης σας . Κάντε κλικ στο " Visual Basic " υπό τον τίτλο " Εγκατεστημένα πρότυπα " και κάντε διπλό κλικ στο " Εφαρμογή κονσόλας . " 2
Κάντε κλικ στο "Toolbox " παράθυρο και κάντε διπλό κλικ στο " κουμπί" για να προσθέσετε ένα νέο κουμπί στη φόρμα σας . Κάντε διπλό κλικ στο " Πλαίσιο κειμένου " για να προσθέσετε ένα νέο στοιχείο ελέγχου πλαισίου κειμένου στη φόρμα σας .
Εικόνων 3
Κάντε κλικ στο μενού "Έργο" και επιλέξτε " 4 Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στην κορυφή της μονάδας σας VB.NET να δηλώσει τα namespaces : Εισαγωγές System.IO Εισαγωγές DocumentFormat.OpenXml.Packaging Εισαγωγές DocumentFormat.OpenXml.Wordprocessing αντιγραφή και επικόλληση τον παρακάτω κωδικό στο πλαίσιο " Button1_Click " για να ορίσετε το διαδρομή και να ανοίξει το έγγραφο : Dim strDoc As String = " C : \\ docxFile.docx " Δημ. txt Όπως ρεύμα String Dim Δεδομένου ότι η Stream = File.open ( strDoc , FileMode.Open ) Επεξεργαστείτε την ακόλουθη γραμμή κώδικα και πληκτρολογήστε τη διαδρομή και το όνομα για το έγγραφό σας : Dim strDoc As String = " C : \\ docxFile.docx " αντιγραφή και επικόλληση του παρακάτω, για να καλέσετε τη διαδικασία να διαβάσει το έγγραφο : OpenAndAddToWordprocessingStream ( ρεύμα , txt ) stream.Close ( ) αντιγραφή και επικόλληση του παρακάτω, για να εμφανιστεί το κείμενο σε συνδυασμό με το στοιχείο ελέγχου πλαισίου κειμένου : Me.TextBox1.Text = txt Αντιγράψτε και επικολλήστε την ακόλουθη διαδικασία για να ανοίξετε το αρχείο DOCX και να επιστρέψει το περιεχόμενο έχει ως εξής: Public Sub OpenAndAddToWordprocessingStream ( ρεύμα ByVal Όπως Stream, ByRef txt Όπως String ) Dim wordprocessingDocument Όπως wordprocessingDocument = wordprocessingDocument.Open ( ρεύμα , Αληθές) Dim σώμα σαν σώμα = wordprocessingDocument.MainDocumentPart.Document.Body txt = body.InnerText.ToString wordprocessingDocument.Close ( ) End Sub 9 Πατήστε το πλήκτρο " F5 " για να εκτελέσετε το πρόγραμμα , στη συνέχεια, κάντε κλικ στο κουμπί " Button1 " για να εκτελέσει τον κώδικα .
Η
5
6
7
8
Η
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα