1 Creare un file di testo con un editor di testo e salvarlo come "c : \\ test.txt " .
2
Aprire Microsoft Visual Basic 6 dal Windows" Start " pulsante .
3
Selezionare l'opzione " Standard.EXE " in la finestra di pop - up con l'etichetta " Nuovo progetto" e di sinistra fare clic sul pulsante "Apri" .
4
Inserire un pulsante dalla casella degli strumenti nel form. . Doppio clic sul pulsante per aprire la finestra del codice per questo pulsante
5
Inserire il seguente codice sotto la riga di codice " Private Sub Command1_Click ( ) " :
Dim obj come ObjectSet obj = CreateObject ( " Word.Basic " ) obj.fileopen "c : \\ test.txt" obj.FileSaveAs "c : \\ test.rtf " , obj 6Impostate = NothingMsgBox " test.txt è stato convertito in formato RTF " <
7
Fare clic sul pulsante " Command1 " per eseguire il codice per convertire creare un RTF br> Pagina 6
Premere il tasto "F5" per eseguire il codice in modalità di debug . file. Una finestra si apre indicando il file di testo è stato convertito in formato RTF .
Programmazione © www.354353.com