Δημιουργήστε ένα αρχείο κειμένου με ένα πρόγραμμα επεξεργασίας κειμένου και να το αποθηκεύσετε ως "c : \\ test.txt " . 2
Ανοίξτε το Microsoft Visual Basic 6 από τα Windows " Start " κουμπί .
εικόνων 3
Επιλέξτε την επιλογή" Standard.exe " σε το pop - up παράθυρο με την ένδειξη " New Project" και αριστερό κλικ στο κουμπί " Άνοιγμα" για .
Η
4 Τοποθετήστε ένα κουμπί από την εργαλειοθήκη στη φόρμα . . Κάντε διπλό κλικ στο κουμπί για να ανοίξετε το παράθυρο κώδικα για αυτό το κουμπί
5
Εισάγετε τον παρακάτω κωδικό κάτω από την γραμμή κώδικα " Private Sub Command1_Click ( ) " :
Dim obj Καθώς ObjectSet obj = CreateObject ( " Word.basic " ) obj.fileopen "c : \\ test.txt " obj.FileSaveAs "c : \\ test.rtf " , 6Set obj = NothingMsgBox " test.txt έχει μετατραπεί σε μορφή RTF "
6
Πατήστε το πλήκτρο " F5 " για να εκτελέσει τον κώδικα σε κατάσταση εντοπισμού σφαλμάτων .
Η
7 Κάντε κλικ στο κουμπί με την ένδειξη " Command1 " για να εκτελέσει τον κώδικα για να μετατρέψετε τη δημιουργία ενός RTF αρχείο . Ένα παράθυρο θα εμφανιστεί δηλώνοντας το αρχείο κειμένου έχει μετατραπεί σε μορφή RTF .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα