無法從Word模板VB6宏中正確檢索日期值

我修改了Word模板的VB6宏以檢索出生日期字段。不幸的是，當檢索值時，它有一個字符串值，前面加上一個小方塊和很多右鍵填充的空格，我似乎無法修剪（例如「1/3/57」）。無法從Word模板VB6宏中正確檢索日期值

任何人都可以在這裏看到問題是什麼？下面的代碼 -

If ActiveDocument.Bookmarks.Exists("dob1") = True Then 
    personDOB = Mid(ActiveDocument.Bookmarks("dob1").Range.Text, 10, Len(ActiveDocument.Bookmarks("dob1").Range.Text)) 
    personDOB = Trim$(offenderDOB) 
End If 

If Not IsDate(personDOB) Then  
    Msg = "Error: Please enter an Person Date of Birth with the format dd/mm/yyyy or leave blank" 
    Response = MsgBox(Msg, vbOKOnly, BadgeTitle) 
End If

來源

2010-03-04 Spacehamster

舊的模板完全是用WordBasic編寫的 - 它似乎不再在客戶端的計算機上運行。我重寫了Visual Basic中的整個Word模板，這似乎解決了我使用它的所有問題。 – Spacehamster 2010-05-20 05:01:10