如何用TextBox打开和保存文件

2016-02-19 17:56 14 1 收藏

下面这个如何用TextBox打开和保存文件教程由图老师小编精心推荐选出,过程简单易学超容易上手,喜欢就要赶紧get起来哦!

【 tulaoshi.com - 编程语言 】

作为轻量级的控件,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下调试通过。->

来源:http://www.tulaoshi.com/n/20160219/1616402.html

延伸阅读
标签: ASP
  How Do I Upload Files to the database with SAFileUp?   Don't do it! Use SAFileUp to upload the files to the server but do not store the image in the database. Instead store the path to the file. Better yet if the images will sit in the same folder just store the actual file name. Uploading the entire ...
标签: PHP
  本地文件上传到服务器后,服务器的脚本对文件进行保存,一般有两种方式,一种是作为 文件保存到机器的特定目录下,但是这里就有很多诸如文件重名带来的种种不便之处,有的程 序自动改文件名字,把名字加上上传时间等方法以保证文件名的唯一性,这样失去了文件的原 始名字,通过文件名查询特定的文件信息也有很多困难,不利于文件的统...
标签: 电脑入门
步骤一、点击任务栏下面的开始-运行(win+R)然后在弹出的运行输入框上输入regedit,按回车键确定后,打开注册表编辑器窗口,然后依次打开HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionExplorerAdvancedFolderHiddenSHOWALL下的CheckedValue删除,再右健单击新建一个DWORD值命名为CheckedValue,数值取1即可.这是病毒把CheckedValue这...
WPS如何打开pdf文件   PDF格式文件需要PDF阅读器才能打开的,建议安装一个PDF阅读器。 WPS如何复制粘贴数据   WPS复制粘贴数据方法: 1、将wps表格对应的单元格属性设置为文本; 2、复制wps文字数据Tulaoshi.Com; 3、选中wps表格对应单元格-右键-选择性粘贴-无格式文本。 WPS打印不了怎么办  tul...
标签: 电脑入门
img文件可以用什么打开呢?其实IMG就是镜像文件。跟ISO等镜像文件相似,可以使用各种虚拟光驱软件打开,其实WinRAR压缩解压软件即可支持IMG镜像文件的解压打开了。 使用一些虚拟软件打开img文件,如Daemon Tools Lite、UltraISO虚拟光驱、虚拟光驱(Virtual Drive)、LevinISO虚拟光驱软件均可以比较轻松的打开。 DAEMON Tools虚拟光驱使用方法...

经验教程

446

收藏

21
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部