• 所有问题

    • 请教下，vb里如何读取一个txt的某行的数据，显示在text1里。。。 谢谢啊~~附上详细代码

    如题所述

    举报该问题
    推荐答案   2013-09-22
    Line Input 可以把文件里面的数据一行一行读取
    下面的例子:

    Private Sub Form_Paint()
    Dim Str As String
    Open "C:\windows系统端口.txt" For Input As 1
    While Not EOF(1)
    Line Input #1, Str
    Print Str
    Wend
    Close
    End Sub

    还有不懂的你再问吧..
    温馨提示：答案为网友推荐，仅供参考
    相似回答
    如何用VB6.0获取一个txt文件的所有文本,并显示在text1,文本框里答：先添加commondialog控件到窗体，改名称CDL1，加按钮Cmd1，文本框TexT1..Private Sub Cmd1_Click()Dim yy$, FF&(10)Text1 = ""CDL1.Filter = "文本文件(*.txt)|*.txt|所有文件(*.*)|*.*"CDL1.FileName = ""CDL1.ShowOpen On Error Resume Next If CDL1.FileName = "" Then Exit...
    VB 里 将一个文件的内容读取并在TEXT1 中显示答：open "D:\aaa.txt" for input as #1 while not eof(1)line input #1,a'print a '每次读取一行数据 打印当前行内容 wend close #1 如果这样输 就能在窗体上显示 dim a as string open "D:\aaa.txt" for input as #1 while not eof(1)line input #1,a'每次读取一行数据 text.text=a...
    VB.NET中,现有一多行TXT文件,想按行读取全部内容,然后显示在一文体框...答：="" FileOpen(1, Application.StartupPath() & "\file\t1.txt", OpenMode.Input) Do While Not EOF(1) Input(1, a) TextBox1.Text =TextBox1.Text & a & vbcrlfLoop 一次性读取a=File.ReadAllText(Application.StartupPath() & "\file\t1.txt")...
    vb读取网站目录txt文件内容到text1.text答：Text1.Text = Text1.Text & vbcrlf & l 关闭文件。Loop Close #1 删除临时文件。Kill "C:\tmp.txt"End Sub 此代码段展示了如何通过Visual Basic和API函数实现文件下载和内容读取的过程。通过上述方法，我们可以轻松地将远程服务器上的txt文件下载到本地，并将其内容逐行显示在文本框中。这种方法...
    请问VB中如何读取txt文件的数据答：1、新建一个标准的VB EXE工程，只有一个Form，Form上有两个按钮：Command1和Command2。2、双击Command1添加如下代码 Private Sub Command1_Click()Dim strFile As String Dim intFile As Integer Dim strData As String strFile = "c:\学生成绩.txt"intFile = FreeFile Open strFile Fo...
    vb 怎样读取TXT文件中的数据答：代码如下:Private Sub Command1_Click()Open "F:\数据.txt" For Input As #1 Input #1, a, b, c, d Print "a="&a,"b="& b,"c="&c,"d="&d Close #1 End Sub -几种打开文件方法--- 1.open <文件名> for input as#<文件号> 如果文件不存在则会出错,文件号将在以后操作中...
    vb怎样把一个txt中所有内容(多行)显示在一个text中?答：Private Sub Command2_Click()text2.text=""a = "C:\reg\shit.txt" '你要读取的TXT文件路径 Open a For Input As #1 Do While Not EOF(1)Input #1, b text2.text=text2.text & b Loop close #1 ‘打开文本后记得关闭 end Sub ...
    如何用vb读取txt文件,指定的某行 赋给字符串变量?答：在使用VB读取txt文件的特定行并赋值给字符串变量时，可以按照以下步骤操作。首先，定义一个函数，用于打开并读取整个文件内容。此函数接受一个参数，即文件路径，返回文件内容作为字符串。示例代码如下：'先在代码里加如下 Function Private Function GetTxt(TxtPath As String) As String Dim i As Integer...
    vb 逐行读取TXT文件内容 譬如每一行类型都是XXXABC,并导入到LIST1中...答：Private Sub Command1_Click()Dim str, i, j List1.Clear Open "test.txt" For Input As #1 Do While Not EOF(1)Line Input #1, str str = UCase(Trim(str))For i = 0 To List1.ListCount - 1 If List1.List(i) = str Then Exit For Next If str <> "" And j = List1....
    大家正在搜