vb 新手 无效内部过程？？？

　　Private Sub Command1_Click()
    Type Address
        Street As String
        Phone As String
    End Type
    
    Dim MyHome As Address
    
    With MyHome
        .Street = "苏州"
        .Phone = "110"
    End With
    
    MsgBox MyHome.Phone
End Sub