docs-1/docs/visual-basic/language-reference/error-messages/codesnippet/VisualBasic/operator-statement_1.vb at master · andtii/docs-1 · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
    Public Structure abc
        Dim d As Date
        Public Shared Operator And(ByVal x As abc, ByVal y As abc) As abc
            Dim r As New abc
            ' Insert code to calculate And of x and y.
            Return r
        End Operator
        Public Shared Operator Or(ByVal x As abc, ByVal y As abc) As abc
            Dim r As New abc
            ' Insert code to calculate Or of x and y.
            Return r
        End Operator
        Public Shared Operator IsFalse(ByVal z As abc) As Boolean
            Dim b As Boolean
            ' Insert code to calculate IsFalse of z.
            Return b
        End Operator
        Public Shared Operator IsTrue(ByVal z As abc) As Boolean
            Dim b As Boolean
            ' Insert code to calculate IsTrue of z.
            Return b
        End Operator
    End Structure