0

阅读特定单词后,我想从 Microsoft Word 中获取特定值

例如,如果一个 word 文档的文本如下:

顾客信息

日期:23/6/2013

姓名:杰森

客户编号:A2441

所以我希望程序读取如果有单词“日期”然后它将获得值 23/6/2013 并放入文本框中。

然后它将继续读取单词“Name”,然后将 Jason 带入 textbox2。

读取日期后如何获取日期值?

    Dim fd As OpenFileDialog = New OpenFileDialog()

    fd.Title = "Open"
    fd.InitialDirectory = "C:\Documents"
    fd.Filter = "Word 97-2003 Documents (*.doc)|*.doc|Word Documents(*.docx)|*.docx"
    fd.RestoreDirectory = True
    If fd.ShowDialog() = DialogResult.OK Then
        txtQuotaFileName.Text = fd.FileName
    End If

    Dim sReader As New StreamReader(fd.FileName)
    Dim text As String = sReader.ReadToEnd()
    sReader.Close()
    If text.Contains("Date") Then
        'Get the value after Date :
    End If
4

1 回答 1

1

您可以尝试使用以下行:

Split(stringval,"Date:")(1)

于 2013-06-28T02:09:45.353 回答