求助

run-time error '438'
object doesn't support this property or method

这是怎么回事呢
为什么不支持这种格式

在下列代码之后发生的

ActiveForm.rtftext.loadfile sfile '把内容写到rtftext文档上
ActiveForm.Caption = sfile  '显示文件名于窗体上 --------------------编程问答-------------------- 你的sfile是什么格式？

文本格式是没问题的

Private Sub Form_Load()
  Dim strFile As String
  strFile = "C:\test.txt"
  Me.RichTextBox1.LoadFile strFile
  Me.Caption = strFile
End Sub


上面是说不支持属性或者方法 --------------------编程问答-------------------- 翻译：
object doesn 't support this property or method 
对象    不        支持     这个  属性      或 方法

ActiveForm.rtftext.loadfile   sfile   '把内容写到rtftext文档上 
ActiveForm.Caption   =   sfile     '显示文件名于窗体上

估计是第一句出错吧，第二句怎么看都不像是会犯错的东西
首先：是否指定文件存在
其次：文件格式是否支持

估计你是用的RICHTEXT控件，最复杂只能支持到RTF文档，你要是想打开DOC，那就会出问题了

补充：VB ,  基础类