您所在位置：主题：为什么在inputbox对话框中输入的都是乱码？
大懒猫
[专家分：220] 发布于 2010-11-26 15:39:00
Private Sub Form_Click()
Open "G:\tel.dat" For Output As #1
tpname$ = InputBox("请输入姓名：", "数据输入")
tptel = InputBox("请输入电话号码：", "数据输入")
tpaddr = InputBox("请输入地址：", "数据输入")
Print #1, tpname, tptel, tpaddr
Close #1
End Sub
程序运行后，单击窗体弹出对话框要求输入姓名，当我输入中文姓名时，打上去的（即：这个对话框接收到的）怎么全是乱码（明明在输入法中打的是中文）？还有，如果输入英文字母却可以打上去？[em10]
Open "G:\tel.dat" For Output As #1
tpname$ = InputBox("请输入姓名：", "数据输入")
tptel = InputBox("请输入电话号码：", "数据输入")
tpaddr = InputBox("请输入地址：", "数据输入")
Print #1, tpname, tptel, tpaddr
Close #1
End Sub
程序运行后，单击窗体弹出对话框要求输入姓名，当我输入中文姓名时，打上去的（即：这个对话框接收到的）怎么全是乱码（明明在输入法中打的是中文）？还有，如果输入英文字母却可以打上去？[em10]
