Ms access Microsoft Access VBA替换（）

我正在使用Microsoft Access，并且我正在尝试使用Replace（）函数

基本上，我正在尝试更改超链接文本框中的地址。例如，我想更改： Z:\test\u文件夹到C:\Users\Administrator\Desktop\test\u文件夹

这就是我得到的（例如）：

然而，这根本不起作用

有没有更简单的方法？ 非常感谢。

---

-Q

你有一大堆错误，这个呢

Private Sub tbHyperlink_Change()
    Dim Hyperlink As String
    Hyperlink = Me.tbHyperlink.Value
    If Left(Hyperlink, 1) = "Z" Then
        Hyperlink = Replace(Hyperlink, "Z:\", "C:\Users\Administrator\Desktop")
        Me.tbHyperlink.Value = Hyperlink
    End If
End Sub

---

谢谢你的更正，蓝狗。我需要练习VBA fu。仍在学习基础知识。：）它工作得很好。然而，我要开始另一个问题，因为我有另一个问题。。。

Private Sub tbHyperlink_Change()
    Dim Hyperlink As String
    Hyperlink = Me.tbHyperlink.Value
    If Left(Hyperlink, 1) = "Z" Then
        Hyperlink = Replace(Hyperlink, "Z:\", "C:\Users\Administrator\Desktop")
        Me.tbHyperlink.Value = Hyperlink
    End If
End Sub