我想做一個類似記事本的程序,請問如何實現把一個多行顯示的文本框中的內容保存到一個文件中的功能?謝謝!

熱心網友

你如果是用文本框控件做的,可以用下面的代碼實現:open for output as #1print #1,text1.textclose #1

熱心網友

以下是我以前一個程序中的源代碼: Dim FnameWith CommonDialog1 。CancelError = False 。InitDir = App。Path 。DialogTitle = "保存文件。。。" 。Filter = "Text Files (*。txt)|*。txt|All Files (*。*)|*。*" 。filename = "" 。ShowSave If Len(。filename) = 0 Then Exit Sub End If Fname = 。filename End With rtftext。SaveFile Fname, 1即對于richtext控件,可以直接使用savefile動作。。