.dlt檔案，好像是從資料庫匯出的，好像是文字檔案可以用記事本指定開啟，要對該檔案作字串處理，讀到TextBox中，怎樣先把它存為.txt的文字檔案? :另存為"a.txt"，注意雙引號，並且選擇所有檔案，這屬於基本操作，還和隱藏已知型別的檔案的副檔名有點關係，其實那個雙引號也可以不用---------選擇所有檔案。沒表達清楚。程式直接讀.dlt檔案，改字尾名是程式完成的，完成後生成的.txt檔案自動讀入TextBox把文字檔案內容讀取TextBox：Dim TempFile As LongDim LoadBytes() As ByteTempFile=FreeFileOpen 檔名 For Binary As #TempFileRedim LoadBytes(1 To Lof(TempFile)) As ByteGet #TempFile,,LoadBytesClose TempFileText1.Text=StrConv(LoadBytes,vbUniCode)把TextBox內容寫入文字檔案：Dim TempFile As LongDim SaveBytes() As ByteSaveBytes=StrConv(Text1.Text,vbFromUniCode)TempFile=FreeFileOpen 檔名 For Binary As #TempFilePut #TempFile,,SaveBytesClose TempFile檔名稱是什麼都無所謂，可以是任何檔案Option ExplicitPrivate Sub Command1_Click() "把文字檔案內容讀取TextBox: Dim TempFile As Long Dim LoadBytes() As Byte TempFile = FreeFile Open "d:\a.dlt" For Binary As #TempFile ReDim LoadBytes(1 To LOF(TempFile)) As Byte Get #TempFile, , LoadBytes Close TempFile Text1.Text = StrConv(LoadBytes, vbUnicode)"把TextBox內容寫入文字檔案: Dim SaveBytes() As Byte SaveBytes = StrConv(Text1.Text, vbFromUnicode) TempFile = FreeFile Open "d:\a.txt" For Binary As #TempFile Put #TempFile, , SaveBytes Close TempFile Kill "d:\a.dlt"End Sub搞定!!!!!!