主题:程序中输入汉字 另类方法
以下程序是在看到qb45 QianBei的一个程序后模范他的实现方法做出来的
'creat a file to get hzdata
OPEN "hzdata.txt" FOR OUTPUT AS #1
CLOSE #1
'open it with notepad and just save what you program needs
SHELL "notepad hzdata.txt"
'get what you have inputed
OPEN "hzdata.txt" FOR INPUT AS #1
LINE INPUT #1, hz$
'do what you want to do with the hzdata :)
PRINT hz$
'...
'...
CLOSE #1
SHELL "del hzdata.txt"
END
'creat a file to get hzdata
OPEN "hzdata.txt" FOR OUTPUT AS #1
CLOSE #1
'open it with notepad and just save what you program needs
SHELL "notepad hzdata.txt"
'get what you have inputed
OPEN "hzdata.txt" FOR INPUT AS #1
LINE INPUT #1, hz$
'do what you want to do with the hzdata :)
PRINT hz$
'...
'...
CLOSE #1
SHELL "del hzdata.txt"
END