| 本月文章推荐 |
如何用TextBox打开和保存文件发表日期：2006-2-27
|
|
作为轻量级的控件，TextBox控件使用率很高，但相关的资料极少谈及如何用TextBox控件打开和保存文件，大都采用回避的态度，对VB初学者带来很多不便。笔者近日为友人做一个英文朗读软件，按友人的要求，软件要能象MS的记事本那样能打开和保存文档。其实实现方法并不复杂，现将心得写出来，希望对大家有帮助。如果您有更好的方法，请来信：handanfang@163.net。
'新建标准EXE，加入一个TextBox控件，一个公共对话框，两个菜单。 '打开 PrivateSubmnuOpen_Click() CommonDialog1.Filter="文档文件(*.txt)|*.txt|所有文件(*.*)|*.*" CommonDialog1.ShowOpen OpenCommonDialog1.FileNameForInputAs#1 Text1.Text=StrConv(InputB$(LOF(1),1),vbUnicode) Close#1 EndSub '保存 PrivateSubmnuSave_Click() OnErrorResumeNext CommonDialog1.Filter="文档文件(*.txt)|*.txt|所有文件(*.*)|*.*" CommonDialog1.ShowSave OpenCommonDialog1.FileNameForOutputAs#1 Print#1,Text1.Text Close1 EndSub TextBox只支持打开64K以下的文件，建议最好设置出错处理。 以上程序在PWin98、VB6.0下调试通过。-> |
| 上一篇：VB6中的FSO对象模型
人气:5251 下一篇：如何在VB中实现目录遍历 人气:2976 |
| 浏览全部Visual Basic的内容
Dreamweaver插件下载 网页广告代码 祝你圣诞节快乐 2009年新年快乐 |
