locked
Test Code Block RRS feed

  • Question

  • Test to see if this is flagged as having code:

     

    Option Explicit

    Dim lngValue1, lngValue2, lngValue3, k

    k = 1
    If (k > 0) Then
        lngValue1 = "This is a test"
        lngValue2 = "llii,,..!```ll"
        lngValue3 = "WWWHXZWQQOOPPP"
        If (k = 1) Then
            ' This should be indented 8 spaces.
            If (k < 2) Then
                ' This should be indented 12 spaces.
    123456789012
            End If
        End If
    End If

    -----

     


    Richard Mueller - MVP Directory Services
    Tuesday, July 19, 2011 12:26 AM