温馨提示×

温馨提示×

您好,登录后才能下订单哦!

密码登录×
登录注册×
其他方式登录
点击 登录注册 即表示同意《亿速云用户服务条款》

如何运用VB.NET控件操作文件

发布时间:2021-12-02 11:37:59 来源:亿速云 阅读:166 作者:小新 栏目:编程语言

这篇文章主要介绍如何运用VB.NET控件操作文件,文中介绍的非常详细,具有一定的参考价值,感兴趣的小伙伴们一定要看完!

显示文件

因为不同文件的存储格式的差异,所以,只有用适当的方法才能正确的显示不同的文件。表现在表层,也就是不同的文件后缀名不同,而且不同的应用软件只能读取和显示某种或几种不同格式的文件。如:以.DOC为后缀名的文件,用WORD就可以打开,但是用记事本就无法正确显示.所以,VB中就给我们提供了不同的控件来显示不同的文件。

在此我们以text控件为例子,看一看用它是怎样显示文件的。

Private Sub mnuopen_Click() ’当点击菜单中的打开文件时执行  Dim filepath as Sting  Dim strLine As String  '在未选择文件时,text.text为空字符,,不显示任何内容  text1.text = “”  CommonDialog1.FileName = "" '下面语句设置文件过滤方式,可显示扩展名为txt文件  CommonDialog1.Filter = "(*.txt)|*.txt" '建立打开方式的通用对话框,也可使用commondialog1.showopen  CommonDialog1.Action = 1  filepath=CommonDialog1.FileName ‘得到选择的文件  Open filepath For Input As #1 打开选择的文件  Do Until EOF(1) ‘显示打开的文件  Line Input #1, strLine  text1text1.Text = text1.Text + strLine + Chr(13) + Chr(10)  Loop  Close #1 ‘关闭打开的文件  End Sub

除了VB.NET控件自带的外,我们还可以使用fileSystemObject文件系统对象,file对象,以及files集合。下面我们给出两个例子,更多更详细的内容请参考前面目录部分。

下面代码举例说明了如何获得一个file对象,以及如何察看它的一个属性。

Sub ShowFileInfo(filespec)  Dim fs, f, s  Set fs = CreateObject("scripting.FileSystemObject")  Set f = fs.GetFile(filespec)  s = f.DateCreated  MsgBox s

文件操作是每个软件必备的功能,利用Visual Basic提供的常用控件就可以轻松操作文件End Sub

对于如何获得一个files集合,以及如何用For Each……Next语句来访问这个集合中的每个file,我们可以参考下面的例子:

Sub ShowFolderList( folderspec ) ‘folderspec 为文件夹名称  Dim fs , f, f1,fc , s  Set fs = CreateObject(“Scripting.FileSystemObject”)  Set f = fs.GetFolder(folderspec) ‘得到folderspec文件夹相关的folder对象  Set ffc = f.Files ‘得到folder对象所包含的文件夹的files集合  For Each fi in fc ‘访问folder集合中的每一个folder  ss= s & f1.name ‘格式化要显示的文本  ss= s & vbCrLf  Next   MsgBox s ‘用对话框显示信息  End Sub

以上是“如何运用VB.NET控件操作文件”这篇文章的所有内容,感谢各位的阅读!希望分享的内容对大家有帮助,更多相关知识,欢迎关注亿速云行业资讯频道!

向AI问一下细节

免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。

AI