Question

我希望在阅读特定单词

后从Microsoft Word中获取特定值

例如，如果word文档的文本如下：

客户详情

日期：2013年3月23日

姓名：Jason

客户ID：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

Answer 1

您可以尝试使用以下行：

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

如何从Microsoft Word中读取特定单词后获取值？

1 个答案: