VB6自定义隐式字符串转换

VB6自定义隐式字符串转换,vb6,Vb6,有没有办法在VB6中为自定义类提供隐式字符串转换?我找到的所有材料都说这是不可能的。但它以某种方式与Excel对象范围一起工作: 听起来好像您正在尝试为类设置默认方法。如果是这样,看看这个:+1@GMastros。解决方案是创建一个返回正确字符串的string属性,并将该属性标记为类的默认属性,如GMastros的链接所述 Dim r As Range Set r = Worksheets("test").Range("A1") Dim s1 As String

有没有办法在VB6中为自定义类提供隐式字符串转换?我找到的所有材料都说这是不可能的。但它以某种方式与Excel对象范围一起工作:


听起来好像您正在尝试为类设置默认方法。如果是这样,看看这个:+1@GMastros。解决方案是创建一个返回正确字符串的string属性,并将该属性标记为类的默认属性,如GMastros的链接所述
    Dim r As Range
    Set r = Worksheets("test").Range("A1")
    Dim s1 As String
    s1 = r.Address      ' "$A$1"
    Dim s2 As String
    s2 = r.Value        ' "test"
    Dim s3 As String
    s3 = r              ' "test"