编程学习biancheng.45soft.com 本站提供了各种在线教程和资料,供大家学习与参考.
编程学习
当前位置: 主页 > VB6 > 界面设计 > VB6 界面设计 RichTextBox控件文件操作方法

VB6 界面设计 RichTextBox控件文件操作方法

(1)LoadFile方法

用LoadFile方法能够将RTF文件或文本文件装入控件。其形式如下:

格式:对象.LoadFile  文件标识符[,文件类型]

文件类型: 0或rtfRTF为RTF文件(缺省);1或rtfTEXT为文本文件。

Public Sub FileOpen()
    If frmMDI.ActiveForm Is Nothing Then FileNew() '若无子窗体则新建
    With frmMDI.ActiveForm
        .CommonDialog1.Filter = "RTF文件(*.rtf)|*.rtf|TXT文件(*.txt)|*.txt"
        .CommonDialog1.Action = 1
        If .CommonDialog1.FilterIndex = 1 Then 'Rtf格式文件
            .RichTextBox1.LoadFile(.CommonDialog1.FileName)
        Else                                     'Txt格式文件
            .RichTextBox1.LoadFile(.CommonDialog1.FileName, 1)
        End If
        .Caption = .CommonDialog1.FileName '文件名显示在子窗体标题栏
    End With
End Sub



(2)SaveFile方法

SaveFile方法将控件中的文档保存为RTF文件或文本文件。

格式: 对象.SaveFile(文件标识符[,文件类型])

把文档以Rtf格式保存在C盘My子目录的Test1.txt文件中:

RichTextBox1.SaveFile(“c:\my\test1.txt”,rtfTEXT)



编程学习 VB6 界面设计 RichTextBox控件文件操作方法 转载请保留此行.谢谢.

VB6