导出到Txt文件中出现双引号，怎么去掉？

Open ms_FileName For Output As #1
        Do While Not rs_attend.EOF
            ms_Temp = Trim(rs_attend.Fields("ic_no").Value) & "   " & Trim(rs_attend.Fields("Date").Value) & "      " & Trim(rs_attend.Fields("time1").Value)
            Write #1, Trim(ms_Temp)
            rs_attend.MoveNext
        Loop
        Close #1
        Set rs_attend = Nothing
        MsgBox "数据导出成功！", vbInformation, gsSystemName
        Exit Sub出现数据如下：
"0001   2006-03-21      11:47"
"0001   2006-03-21      13:00"
"0002   2006-03-21      07:55"
"0002   2006-03-21      11:59"
"0002   2006-03-21      12:59"
"0004   2006-03-21      07:42"
"0004   2006-03-21      13:00"
"0005   2006-03-21      08:00"
"0005   2006-03-21      11:46"
怎么去掉引号？