面试题：Visual Basic中属性访问器的基本实现

Question

请用Visual Basic代码示例，展示如何定义一个具有Get和Set访问器的属性，并且在Set访问器中添加简单的数据验证逻辑，例如确保设置的值为正数。

Answer 1

Public Class ExampleClass
    Private m_value As Integer

    Public Property MyProperty As Integer
        Get
            Return m_value
        End Get
        Set(ByVal value As Integer)
            If value > 0 Then
                m_value = value
            Else
                ' 可以选择抛出异常或进行其他处理，这里简单忽略负数
                ' 例如：Throw New ArgumentException("值必须为正数")
            End If
        End Set
    End Property
End Class

在上述代码中，ExampleClass类定义了一个名为MyProperty的属性。Get访问器返回私有字段m_value的值。Set访问器检查传入的值是否为正数，如果是则更新m_value，否则可选择抛出异常或进行其他处理（这里简单忽略负数）。