vb打开TXT文件中的符号问题
我写了一段程序发现打开TXT文件中的英文字符中的逗号（,）都不见了。txt文件用搜狗输入法输入，用智能ABC输入的符号全为中文字符。求各位大侠相助。
Dim strPath
Dim temp As String
Dim all As String
Dim i As Long
Command2.Enabled = True
'加载文件
CommonDialog1.CancelError = True
On Error GoTo ErrHandler
'设置标志
CommonDialog1.Flags = cdlOFNHideReadOnly
'设置过滤器
CommonDialog1.Filter = "All Files(*.*)|*.*|Text Files(*.txt)|*.txt"
'指定缺省的过滤器
CommonDialog1.FilterIndex = 2
CommonDialog1.ShowOpen
Open CommonDialog1.FileName For Input As #2
Do While Not EOF(2)
Input #2, temp
all = all & temp
Loop
Close #2
RichTextBox1.Text = all
Caption = "文本 " & CommonDialog1.FileName
strPath = CommonDialog1.FileName
Exit Sub
ErrHandler:
'用户按了“取消”按钮
Exit Sub
[解决办法]
Input # 语句
从已打开的顺序文件中读出数据并将数据指定给变量。
语法
Input #filenumber, varlist
Input # 语句的语法具有以下几个部分：
部分 描述
filenumber 必要。任何有效的文件号。
varlist 必要。用逗号分界的变量列表，将文件中读出的值分配给这些变量；这些变量不可能是一个数组或对象变量。但是，可以使用变量描述数组元素或用户定义类型的元素。
说明
通常用 Write # 将 Input # 语句读出的数据写入文件。该语句只能用于以 Input 或 Binary 方式打开的文件。
在读出数据时不经修改就可直接将标准的字符串或数值数据指定给变量。下表说明如何处理其它输入数据：
数据 指定给变量的值
分隔逗号或空白行 Empty
#NULL# Null
#TRUE# or #FALSE# True 或 False
#yyyy-mm-dd hh:mm:ss# 用表达式表示的日期与/或时间
#ERROR errornumber# errornumber（此变量是一个 Variant，用来标记错误）
输入数据中的双引号符号 (" ") 将被忽略。
文件中数据项目的顺序必须与 varlist 中变量的顺序相同，而且与相同数据类型的变量匹配。如果变量为数值类型而数据不是数值类型，则指定变量的值为零。
在输入数据项目时，如果已到达文件结尾，则会终止输入，并产生一个错误。
注意 为了能够用 Input # 语句将文件的数据正确读入到变量中，在将数据写入文件时，要使用 Write # 语句而不使用 Print # 语句。使用 Write # 语句可以确保将各个单独的数据域正确分隔开。
