Dim ctrl As Object
        For Each ctrl In Me.GroupBox2.Controls
            If TypeOf ctrl Is TextBox And ctrl.name <> "txtfilialnr" Then
                If bEnable Then
                    ctrl.BorderStyle = BorderStyle.Fixed3D
                    ctrl.BackColor = System.Drawing.Color.White
                Else
                    ctrl.BorderStyle = BorderStyle.FixedSingle
                    ctrl.BackColor = Me.BackColor
                End If
                ctrl.enabled = bEnable
            End If
        Next
    End Sub