Mistři v programování na #hovnokod

Visual Basic #597

Dim lcIsCheck As Boolean = False

        Dim lcImages As DS_ExportFIO.sdImageRow = Me.DS_ExportFIO1.sdImage.Rows(0)

        If lcImages!Photo Is DBNull.Value Then

            lcIsCheck = IIf(lcIsCheck, lcIsCheck, False)

        Else

            lcIsCheck = True

        End If

        If lcImages!PhotoIshodn Is DBNull.Value Then

            lcIsCheck = IIf(lcIsCheck, lcIsCheck, False)

        Else

            lcIsCheck = True

        End If

        If lcImages!Sign Is DBNull.Value Then

            lcIsCheck = IIf(lcIsCheck, lcIsCheck, False)

        Else

            lcIsCheck = True

        End If

        If lcImages!SignIshod Is DBNull.Value Then

            lcIsCheck = IIf(lcIsCheck, lcIsCheck, False)

        Else

            lcIsCheck = True

        End If

        Return lcIsCheck

HovnoKod,