概括总结VB.NET OPEN语句5个方法

开发 后端
这里收集了VB.NET OPEN语句的五种方法,有详细的代码和介绍,希望可以给正在研究这个问题的朋友们带来技术上的提高。

大家都知道打开文本文件是不少程序必须处理的问题。如何快速的打开文本文件这个还是值得我们深入的探讨研究的。

#T#为此,将自己搜集到的几种VB.NET OPEN语句方法无私地奉献出来,供各位参考。同时期盼大家也来参与,。如您有这份心,土人在这里先说声谢谢!下面所举的例子均假设F盘下有一个名为d.txt的文本文件,若需要尝试这些例子请作相应的改动。

VB.NET OPEN语句方法一:

用定长的String变量获取文本内容。由于定长String变量支持的下界为65400,所以在打开超过32K字节的文件时超出部分的字节将无法获取:

  1. Private Sub Command1_Cliack()  
  2. Dim sA As String * 65400 '声明定长String变量   
  3. Open "F:\d.txt" For Binary As #1 '用二进制打开文件  
  4. Get #1, , sA '用Get语句从文件中获取字节  
  5. Text1 = sA '显示打开的文件  
  6. Close #1 '关闭文件  
  7. End Sub 

VB.NET OPEN语句方法二:


先声明一字符串变量,然后用空格填充字符串,使变量大小与文件大小一致,再通过Get语句将文件全部数据存储到变量中,从而达到获取整个文件字节数的目的。此法可以打开大于32K的文件,但应该注意的是,装载文件的容器必须能装载大于32K的文件,下例用RichTextBox控件显示打开的文件:

  1. Private Sub Command1_Click()   
  2. Dim sA As String  
  3. Open "f:\d.txt" For Binary As #1  
  4. sA = Space(LOF(1)) '用空格填充sA变量  
  5. Get #1, , sA '用Get语句获取文件全部内容  
  6. RichTextBox1.Text = sA 
  7. Close #1  
  8. End Sub 

VB.NET OPEN语句方法三:


用StrConv函数将文件的控制字符串数据和Unicode码之间进行转换,从而达到打开文件的目的。可打开任意大小文件。此法笔者曾有一篇文章谈及,这里再给一个简单例子:

  1. Private Sub Command1_Click()  
  2. Open "f:\d.txt" For Input As #1  
  3. RichTextBox1.Text = StrConv(InputB$(LOF(1), 1), vbUnicode)  
  4. Close #1  
  5. End Sub 

VB.NET OPEN语句方法四:


用Shell语句直接调出Windows的记事本,给个文件名即可轻而易举地打开文本文件。此法适合于打开程序的Readme文件(注意:在可执行文件和要打开的文本文件之间要有空格):

  1. Shell "NotePad.EXE f:\d.txt",vbNormalFucus 

VB.NET OPEN语句方法五:

  1. 用RichTextBox控件自身的LoadFile属性打开文件:  
  2. RichTextBox1.LoadFile "f:\d.txt", rtfText  


 

责任编辑:田树 来源: 博客
相关推荐

2009-11-03 10:51:33

VB.NET共享

2009-10-28 14:44:43

VB.NET Name

2009-10-27 11:32:42

VB.NET Disp

2009-10-14 16:46:25

VB.NET OnSt

2009-11-03 10:00:20

VB.NET New方

2009-10-29 10:21:46

VB.NET变量适用范

2009-10-28 17:32:25

VB.NET控件介绍

2009-10-15 17:50:48

VB.NET Spli

2009-10-14 10:19:57

VB.NET Doma

2009-10-26 15:57:07

VB.NET使用Ora

2009-10-13 14:50:59

VB.NET Envi

2009-10-14 14:04:29

VB.NET创建Web

2009-10-21 10:05:30

VB.NET运行环境

2009-10-23 14:06:07

VB.NET类对象

2009-10-14 13:15:09

VB.NET数据绑定

2009-10-28 10:51:32

VB.NET默认属性

2009-10-14 15:34:29

VB.NET窗体编程模

2009-10-27 10:30:18

VB.NET实现动态菜

2009-11-02 17:49:05

VB.NET抽象类

2009-10-29 16:23:42

VB.NET实现IEn
点赞
收藏

51CTO技术栈公众号