Sådan oprettes .rtf filer i Visual Basic 6

Sådan oprettes .rtf filer i Visual Basic 6


Microsoft har udviklet et filformat i 1987 mærket \ "RTF \" eller RTF-format. Dette format blev brugt til at standardisere tekst og grafisk formatering. Oprettelse et standardformat tilladt udviklere overføres data mellem applikationer og fastholde formatering attributter for elementer såsom stykker, bord, skriftstørrelse og skrifttype egenskaber. Den RTF-format opdeler dataene i en fil i data eller kontroldata. Styringen data anvendes til at formatere data og betegner elementer såsom filtypen og slutningen af ​​filen.

Vejledning

1

Opret en tekstfil med en teksteditor og gemme det som \ "c: \ test.txt \".

2

Åbn Microsoft Visual Basic 6 fra \ "Start \" knappen Windows.

3

Vælg indstillingen \ "Standard.EXE \" i pop-up feltet \ "Nyt projekt \" og venstre-klik på \ "Åbn \" knappen.

4

Placer en knap fra værktøjskassen på formularen. Dobbeltklik på knappen for at åbne koden vinduet for denne knap.

5

Indsæt følgende kode under linje kode \ "Private Sub Command1_Click () \":

Dim obj Som Object

Set obj = CreateObject(\"Word.basic\")
obj.fileopen \"c:\\test.txt\"
obj.FileSaveAs \"c:\\test.rtf\", 6
Set obj = Nothing
MsgBox \"Test.txt has been converted to RTF format\"
Set obj = CreateObject(\"Word.basic\")
obj.fileopen \"c:\\test.txt\"
obj.FileSaveAs \"c:\\test.rtf\", 6
Set obj = Nothing
MsgBox \"Test.txt has been converted to RTF format\"
6

Tryk på \ "F5 \" knappen for at udføre kode i debug mode.

7

Klik på knappen \ "Command1 \" for at udføre koden til at konvertere oprette en RTF-fil. Vises et vindue med angivelse af tekstfil er blevet konverteret til RTF.

TIPS

  • Denne kode kan udvides til at oprette og gemme tekstfilen indefra Visual Basic og derefter konvertere filen til RTF-format.

Relaterede artikler