实际上，我在进一步搜索之后找到了一个解决方案：

Function ByteArrayToHex(B() As Byte) As String
    Dim n As Long, I As Long

    ByteArrayToHex = Space$(2 * (UBound(B) - LBound(B)) + 2)
    n = 1
    For I = LBound(B) To UBound(B)
       Mid$(ByteArrayToHex, n, 2) = right$("00" & Hex$(B(I)), 2)
       n = n + 2
    Next
    ByteArrayToHex = "0x" & ByteArrayToHex
End Function

迈克尔

若要导出microsoft access文件中的ole对象，请使用access应用程序打开此文件，并创建包含所有相关字段的相应窗体。使用链接中提供的vba代码，您应该能够自动导出一些最常见的文件类型。祝你好运。https://medium.com/@haggenso/export-ole-fields-in-microsoft-access-c67d535c958d