Πώς να ανοίξει Doc αρχεία σε Vb.Net

. Σε πολλές περιπτώσεις , όταν ασχολούνται με το Visual Basic.NET είστε υποχρεωμένοι να ανοίξετε τα αρχεία και να τις γράψετε για καλύτερη αναγνωσιμότητα του χρήστη " doc . ». Ένα " doc ". Το αρχείο είναι η επέκταση αρχείου που χρησιμοποιείται σε έγγραφα του Microsoft Word. Στη VB , μπορείτε να χρησιμοποιήσετε τη βιβλιοθήκη αντικειμένων του Microsoft Word για να αποκτήσετε πρόσβαση σε αντικείμενα του Microsoft Word και ανοίξτε αυτούς τους τύπους αρχείων . Αυτή η βιβλιοθήκη είναι πολύ χρήσιμο όταν θέλετε να εξαγάγετε κείμενο από την εφαρμογή VB σας σε διαφορετικές περιπτώσεις με την ίδια " . Doc " το αρχείο . Οδηγίες
Η 1

την εφαρμογή Microsoft Visual Basic Express και κάντε κλικ στο "New Project " στο "Start Page " καρτέλα . Κάντε κλικ στο " Visual Basic " κάτω " Εγκατεστημένα πρότυπα " και κάντε διπλό κλικ στο "Console Εφαρμογή " για να δημιουργήσετε ένα νέο έργο της κονσόλας . 2

Κάντε κλικ στο μενού "Έργο" και κάντε κλικ στο " Add Reference " για να ξεκινήσει η Προσθέστε το παράθυρο αναφοράς . Κάντε κλικ στην καρτέλα " COM " και κάντε διπλό κλικ στο " Microsoft Word βιβλιοθήκη αντικειμένων " για να το προσθέσετε ως σημείο αναφοράς . Κάντε κλικ στο " OK".
Εικόνων 3

Δηλώστε το παρακάτω ονομάτων με την προσθήκη αυτή ως την πρώτη γραμμή του κώδικα στην ενότητα σας .

Εισαγωγές Microsoft.Office.Interop
Φτηνές 4

Δημιουργήστε τις μεταβλητές αντικειμένου του Word με την προσθήκη του παρακάτω κώδικα :

Dim wordApp Όπως New Word.Application

Dim WordDoc As New Word.Document

dim newPrgrh Όπως Word.Paragraph
5

Ορίστε τη διαδρομή και το όνομα του αρχείου , και να το ανοίξετε

WordDoc = wordApp.Documents.Open ( " C : \\. WordText.doc » )

wordApp.WindowState = Word.WdWindowState.wdWindowStateNormal

wordApp.Visible = True
Η 6

να προστεθεί νέα παράγραφος στο αρχείο , προσθέτοντας την ακόλουθη γραμμή Κωδικός :

wordDoc.Paragraphs.Add ( )

newPrgrh = wordDoc.Content.Paragraphs.Add

newPrgrh.Range.Text = " Νέα παράγραφος "

newPrgrh.Range.Font.Bold = True

newPrgrh.Format.SpaceAfter = 26

newPrgrh.Range.InsertParagraphAfter ( )
Η

7 Κλείστε το Word όταν τελειώσετε τον προγραμματισμό και αφήστε το " wordApp " αντικείμενο από τη μνήμη του υπολογιστή .

wordApp.Quit ( )

wordApp = Τίποτα
8

Press " F5 " για να τρέξετε το πρόγραμμά σας . Αυτό θα ανοίξει το αρχείο που ορίζεται στο Βήμα 4 .
Η
εικόνων