代码是这样写的:
Private Sub Command1_Click()
CommonDialog1.ShowSave
openfilename = Form1.CommonDialog1.FileName
Open openfilename For Input As #1
Form1.Text1.Text = Input(LOF(1), 1)
Close #1
End Sub当调入的文本中是英文时,代码好使,如果广本中有中文字符就会出现
实时错误'62'
输入超出文件尾
这是怎么回事,怎么解决呀??
Private Sub Command1_Click()
CommonDialog1.ShowSave
openfilename = Form1.CommonDialog1.FileName
Open openfilename For Input As #1
Form1.Text1.Text = Input(LOF(1), 1)
Close #1
End Sub当调入的文本中是英文时,代码好使,如果广本中有中文字符就会出现
实时错误'62'
输入超出文件尾
这是怎么回事,怎么解决呀??
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货