Max_QlQ
2021-06-09 15:05
采纳率: 0%
浏览 25

vb.net 如何通过点击出浏览对话框选中.txt文件,并读取txt中的数据

数据格式如下,四列,中间为空格:

2021-1-1 1 2 3

2021-1-1 4 5 6

  • 好问题 提建议
  • 收藏

1条回答 默认 最新

  • 王大师王文峰 2021-06-09 16:23

    Private Sub Command1_Click()

        Dim strFile     As String

        Dim intFile     As Integer

        Dim strData     As String

         strFile = "c:\aaa.txt"

        intFile = FreeFile

        Open strFile For Input As intFile

        strData = StrConv(InputB(FileLen(strFile), intFile), vbUnicode)

        Debug.Print strData

        Close intFile

    End Sub

    评论
    解决 无用
    打赏 举报

相关推荐 更多相似问题