精华内容
下载资源
问答
  • 主要介绍了VB实现按行读取文本文件的方法,涉及使用VB操作文件读取的相关技巧,需要的朋友可以参考下
  • VB读取TXT文件内容.rar

    2019-07-10 19:43:54
    VB读取TXT文件内容,读取文件的一个例子,将一段文字保存在“vb100例.txt”中,程序运行后,通过点击“读取文本”按钮,可直接读取出TXT文件中的内容。
  • vb读取文本文件内容

    千次阅读 2019-11-09 14:12:18
    VB可以使用二进制方式打开文本文件,以Get 语句读到字节数组,再使用StrConv 函数将其转换为字符串,而后使用Split函数文本的字符串数组及总句数,使用InputBox 函数来输入需要读某文本。 Get 语句 将一个已打开的...

    VB可以使用二进制方式打开文本文件,以Get 语句读到字节数组,再使用StrConv 函数将其转换为字符串,而后使用Split函数文本的字符串数组及总句数,使用InputBox 函数来输入需要读某行文本。

    Get 语句
    将一个已打开的磁盘文件读入一个变量之中。
    StrConv 函数
    返回按指定类型转换的 Variant (String)。
    Split函数

    返回一个下标从零开始的一维数组,它包含指定数目的子字符串。
    InputBox 函数

    在一对话框来中显示提示,等待用户输入正文或按下按钮,并返回包含文本框内容的 String。

    以下是使用上述函数等的具体代码:

    Private Sub Command3_Click()
        Dim strWj As String
        Dim strJ() As String
        Dim aryContent() As Byte
        Dim i As Long
        Dim j As Long
        CommonDialog1.CancelError = True ' 设置“CancelError”为 True
        On Error GoTo ErrHandler
        CommonDialog1.Flags = cdlOFNHideReadOnly    ' 设置标志
        ' 设置过滤器
        CommonDialog1.Filter = "All Files (*.*)|*.*|Text Files" & "(*.txt)|*.txt|Batch Files (*.bat)|*.bat"
        CommonDialog1.FilterIndex = 2    ' 指定缺省的过滤器
        CommonDialog1.ShowOpen    ' 显示“打开”对话框
        ' 显示选定文件的名字
        'MsgBox CommonDialog1.FileName
        Open CommonDialog1.FileName For Binary As #1
            ReDim aryContent(LOF(1) - 1)
            Get #1, , aryContent
        Close #1
        strWj = StrConv(aryContent, vbUnicode)
        Text1 = strWj
        strJ = Split(strWj, vbCrLf)
        i = UBound(strJ)
        Text2 = i + 1
        j = InputBox("输入需要显第几句", j)
        j = j - 1
        Label1.Caption = j + 1 & ":" & strJ(j)
        Exit Sub
    ErrHandler:
        ' 用户按了“取消”按钮
        Exit Sub
    End Sub
    

    在这里插入图片描述

    展开全文
  • vb读取dat文件内容

    2020-12-01 08:24:30
    可以随意读取dat文件内容,也可指定进行读取dat内容,也可以往里dat文件中写信息,程序比较简单,仅供大家参考!欢迎大家进行指点!
  • Dim sr As System.IO.StreamReader = New System.IO.StreamReader(Application.StartupPath & "\tmp.Txt", System.Text.Encoding.Default) Dim line As String line = sr.ReadLine Me.ToolStripStatusLabel2.Text...
  • VB读取指定文本内容VB读取指定文本内容VB读取指定文本内容VB读取指定文本内容
  • vb.net 读取txt文件的几种方式
  • VB读取文本文件的例子:逐行读取

    千次阅读 2016-07-28 10:45:34
    Private Sub Form_Load() Dim data As String Dim buffer As String Open "d:\stud.txt" For InputAs #1 Do While Not EOF(1) Line Input #1, buffer data = data + buffer ...Text1.Text = buf
    Private Sub Form_Load()
    Dim data As String
    Dim buffer As String
    Open "d:\stud.txt" For InputAs #1
    Do While Not EOF(1)
    Line Input #1, buffer
    data = data + buffer
    Loop
    Close #1
    Text1.Text = buffer
    End Sub
    展开全文
  • vb读取文件内容并以二进制显示

    热门讨论 2011-11-10 11:10:19
    vb读取文件内容并以二进制显示,适合初学者学习。
  • 使用vb.net语言编写的excel文件数据读取和保存,可以实现读取数据的显示,希望大家可以多学习交流下。
  • VB编写一个记事本,一定要用到读文本文件和保存文本文件这两个模块,这两个模块做成两个函数Private Function GetTXT(Path As String) '读取文本Open Path For Input As #1GetTXT = StrConv(InputB(LOF(1), 1), vb...

    用VB编写一个记事本,一定要用到读文本文件和保存文本文件这两个模块,这两个模块做成两个函数

    Private Function GetTXT(Path As String) '读取文本

    Open Path For Input As #1

    GetTXT = StrConv(InputB(LOF(1), 1), vbUnicode)

    Close #1

    End Function

    Private Sub SetTXT(Strl As String, Path As String) '保存文本

    Open Path For Output As #1

    Print #1, Strl;

    Close #1

    End Sub

    有了以上两个函数,你在窗体的任何地方都可以调用了。

    假如你的C盘下有一个文本文件名叫 abc.txt

    在窗体上,要读取这个txt文本文本的内容到窗体上的文本框1的代码就是:

    Text1.Text = GetTXT("c:\abc.txt")

    在窗体要要把文本框1的内容保存到c:\abc.txt  代码就是:

    Call SetTXT(Text1.Text, "c:\abc.txt")

    来源:济亨网

    展开全文
  • VB实现按行读取文本文件的方法'(general declaration)Dim nFileNum As Integer, sText As String, sNextLine As String, lLineCount As Long'==================================Private Sub Command1_Click()' Get ...

    VB实现按行读取文本文件的方法

    '(general declaration)

    Dim nFileNum As Integer, sText As String, sNextLine As String, lLineCount As Long

    '==================================

    Private Sub Command1_Click()

    ' Get a free file number

    nFileNum = FreeFile

    ' Open a text file for input. inputbox returns the path to read the file

    Open "C:Documents and SettingsSudeepMy Documents3.txt" For Input As nFileNum

    lLineCount = 1

    ' Read the contents of the file

    Do While Not EOF(nFileNum)

    Line Input #nFileNum, sNextLine

    'do something with it

    'add line numbers to it, in this case!

    sNextLine = sNextLine & vbCrLf

    sText = sText & sNextLine

    Loop

    Text1.Text = sText

    ' Close the file

    Close nFileNum

    End Sub

    展开全文
  • vb读取txt文件

    2013-12-12 18:40:48
    总结了vb语言读取txt文件的各种方法,不是很完善,供各位亲们参考
  • VB数据排序及文件读取的应用,可以读取TXT文本数据和保存数据,在此基础上进行数据的排序。注:数据库部分没有编写完成,因此没有附带数据库。
  • VB.NET读取文本(解决乱码),实用性代码。
  • 读取文件通常是从第一开始读取,直到...程序只需要最后一的数据并且文件很大,如果从第一行读取直到最后一结束来确定最后一内容,这样效率会很低。在网上收集了一些直接读取最后一数据的代码资料,供参考。
  • vb读取dwg文件

    2015-09-06 10:58:04
    vb开发的可以读取dwg文件的程序,需要进一步的完善
  • StreamReader和StreamWriter类用于读取和写入数据到文本文件。这些类继承自抽象基类Stream,它支持读取和写入字节到文件流中。StreamReader类StreamReader类也从抽象基类TextReader继承,它代表读取一系列字符的读取...
  • VB 读取文件的创建时间、修改时间、存取时间
  • 本人利用VB.NET中FileOpen()函数编写对文本文件的逐行写入和逐行读取的小程序,而且写的文本没有双引号,很实用的
  • 内容索引:VB源码,文件操作,vb读取TXT 一个VB初学者的小实例,读取TXT文本文件,程序非常简单,除了读取TXT之外没有其它的功能,VB编程高手可以跳过,这主要是对VB新手朋友来写的,帮助理解VB操作文件的相关知识。
  • VB读取EXCEL文件

    2011-10-27 15:16:44
    能够读取EXCEL,并且写入。 '读取01.xls中A2到A6,5个单元格的数据 Private Sub Command1_Click() Dim ExcelApp
  • vb.net vs2008读取INI文件示例,ini文件名为 Send.ini,代码中包括了一个读ini API函数。  Ini文件说明:  [节名] []中的节名对应此API的第一参数  Name=内容 Name对应此API的第二参数  API的第三参数是没有取到...
  • VB读取XML文件

    2013-04-30 22:19:40
    VB读取xml方法,可以帮助大家!欢迎大家下载使用
  • 摘要:VB源码,文件操作,动态读取文件 VB动态读取文件中的内容,从外部引入TXT文件VB源码下载。
  • VB.Net实现读取本地Excel文件,并获取excel中内容
  • VB读写文本文件

    千次阅读 2019-11-14 08:59:08
    读取文本文件(或读取某一)参考这篇 1、代码 '----------------------- '把文本输出到文本文件 '----------------------- Function WriteTxt(FilePath As String, str As String) Open FilePath For Append As #...
  • VB实现不使用窗体控件读取RTF文件内容读取RTF,这个好像需要使用RichText.ocx控件,不过本源码所演示的方法,并没有使用此控件,同样可准确读取并获取RTF文档的内容,如本截图所示,点击窗口中的对应按钮,即可...
  • VB编写的TXT文本读取程序,由此可开发成一个文本阅读程序,从外部读取TXT文件内容,并显示在窗口中,一个VB读取文件的例子,如演示截图所示。
  • VB.net小技巧——读取文本文件并显示到文本框中 第一步,在工具箱添加OpenFileDialog控件 第二步 openfiledialog 属性 filter设置为: 文本文件(*.txt)|*.txt|配置文件(*.ini*)|*.ini*|所有文件(*.*)|*.* 第三步 ...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 23,377
精华内容 9,350
关键字:

vb按行读取文本文件