VB中的PropertyBag如何转换

[njimxiaogy]

近日转换一原来VB程序
Dim objPB As PropertyBag
Dim strValueToPersist As String
strValueToPersist = "TestingPersist"
Set objPB = New PropertyBag
Call objPB.WriteProperty("PersistValue", strValueToPersist, _
vbNullstring)

为了保存PropertyBag对象的内容，将内容属性保存到一个二进制字节的数组或一个变量。
Dim vntContents As Variant
vntContents = objPB.Contents
然后将该变量存入了数据库
目前进行转换，想兼容原来数据库，用C#读出来，哪位有没有好的办法啊