Version =20
VersionRequired =20
Checksum =-418880458
Begin Form
    AutoResize = NotDefault
    MaxButton = NotDefault
    MinButton = NotDefault
    DividingLines = NotDefault
    DataEntry = NotDefault
    AllowDesignChanges = NotDefault
    DefaultView =0
    TabularFamily =0
    BorderStyle =3
    PictureAlignment =2
    DatasheetGridlinesBehavior =3
    GridY =10
    Width =25290
    DatasheetFontHeight =10
    ItemSuffix =16
    Left =9630
    Right =-18451
    Bottom =16470
    DatasheetGridlinesColor =12632256
    RecSrcDt = Begin
        0x3c90e209ec3be440
    End
    RecordSource ="qry_ExADReklacheck_Kunden_frm"
    Caption ="Ex AD Rekla Check"
    DatasheetFontName ="Arial"
    Begin
        Begin Label
            BackStyle =0
            BackColor =-2147483633
            ForeColor =-2147483630
        End
        Begin Rectangle
            SpecialEffect =3
            BackStyle =0
            Width =850
            Height =850
        End
        Begin Line
            Width =1701
        End
        Begin Image
            BackStyle =0
            OldBorderStyle =0
            PictureAlignment =2
            Width =1701
            Height =1701
        End
        Begin CommandButton
            Width =1701
            Height =283
            FontSize =8
            FontWeight =400
            FontName ="MS Sans Serif"
        End
        Begin OptionButton
            SpecialEffect =2
            LabelX =230
            LabelY =-30
        End
        Begin CheckBox
            SpecialEffect =2
            LabelX =230
            LabelY =-30
        End
        Begin OptionGroup
            SpecialEffect =3
            Width =1701
            Height =1701
        End
        Begin BoundObjectFrame
            SpecialEffect =2
            OldBorderStyle =0
            BackStyle =0
            Width =4536
            Height =2835
            LabelX =-1701
        End
        Begin TextBox
            FELineBreak = NotDefault
            SpecialEffect =2
            Width =1701
            LabelX =-1701
            BackColor =-2147483643
            ForeColor =-2147483640
            AsianLineBreak =255
        End
        Begin ListBox
            SpecialEffect =2
            Width =1701
            Height =1417
            LabelX =-1701
            BackColor =-2147483643
            ForeColor =-2147483640
        End
        Begin ComboBox
            SpecialEffect =2
            Width =1701
            LabelX =-1701
            BackColor =-2147483643
            ForeColor =-2147483640
        End
        Begin Subform
            SpecialEffect =2
            Width =1701
            Height =1701
        End
        Begin UnboundObjectFrame
            SpecialEffect =2
            OldBorderStyle =1
            Width =4536
            Height =2835
        End
        Begin ToggleButton
            Width =283
            Height =283
            FontSize =8
            FontWeight =400
            FontName ="MS Sans Serif"
        End
        Begin Tab
            BackStyle =0
            Width =5103
            Height =3402
        End
        Begin FormHeader
            Height =510
            BackColor =16777164
            Name ="Formularkopf"
            GUID = Begin
                0x3e82988b0282254391d9dc906aac19f4
            End
        End
        Begin Section
            CanGrow = NotDefault
            Height =14566
            Name ="Detailbereich"
            GUID = Begin
                0x1c4552dd55aa2847848ecd9f4b32736e
            End
            Begin
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1677
                    Top =114
                    Width =900
                    Height =255
                    ColumnWidth =900
                    Name ="KD_NR"
                    ControlSource ="KD_NR"
                    GUID = Begin
                        0x8129fecaad9bfe4386439d733cd1b5ef
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =57
                            Top =114
                            Width =1560
                            Height =255
                            Name ="KD_NR_Bezeichnungsfeld"
                            Caption ="KD_NR"
                            GUID = Begin
                                0xb2c32d3408e7634eaf51aefd54e69cba
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1677
                    Top =456
                    Width =4560
                    Height =450
                    ColumnWidth =3000
                    TabIndex =1
                    Name ="Firma"
                    ControlSource ="Firma"
                    GUID = Begin
                        0xd11b6875c061274d8504edd9215d1dcb
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =57
                            Top =456
                            Width =1560
                            Height =255
                            Name ="Firma_Bezeichnungsfeld"
                            Caption ="Firma"
                            GUID = Begin
                                0xb0406347ae6b9748ab2e8e7a0f8c47fb
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1677
                    Top =969
                    Width =4560
                    Height =450
                    ColumnWidth =3000
                    TabIndex =2
                    Name ="Anrede"
                    ControlSource ="Anrede"
                    GUID = Begin
                        0x450aebeaf334184c94a4c05bc0e35729
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =57
                            Top =969
                            Width =1560
                            Height =255
                            Name ="Anrede_Bezeichnungsfeld"
                            Caption ="Anrede"
                            GUID = Begin
                                0x8dd50143b1d13349a223dacc4fa783c5
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1677
                    Top =1482
                    Width =4560
                    Height =450
                    ColumnWidth =3000
                    TabIndex =3
                    Name ="Vorname"
                    ControlSource ="Vorname"
                    GUID = Begin
                        0xcfb0c70ba8541549aa1779b4ede03a4e
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =57
                            Top =1482
                            Width =1560
                            Height =255
                            Name ="Vorname_Bezeichnungsfeld"
                            Caption ="Vorname"
                            GUID = Begin
                                0x4acc6007392be04f93eac9e0b0000565
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1677
                    Top =1995
                    Width =4560
                    Height =450
                    ColumnWidth =3000
                    TabIndex =4
                    Name ="Name"
                    ControlSource ="Name"
                    GUID = Begin
                        0xff57a0bef345a3468c8d36ed6ef1216b
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =57
                            Top =1995
                            Width =1560
                            Height =255
                            Name ="Name_Bezeichnungsfeld"
                            Caption ="Name"
                            GUID = Begin
                                0x875233153eab514a8fda1eaddd13df11
                            End
                        End
                    End
                End
                Begin Subform
                    OverlapFlags =85
                    Left =6750
                    Top =165
                    Width =10140
                    Height =570
                    TabIndex =5
                    Name ="frm_ExADReklacheck_KundenAbschlüsse Unterformular"
                    SourceObject ="Form.frm_ExADReklacheck_KundenAbschlüsse Unterformular"
                    EventProcPrefix ="frm_ExADReklacheck_KundenAbschlüsse_Unterformular"
                    GUID = Begin
                        0x22a616435ed2db4189fa68f81aceef7b
                    End
                End
                Begin Subform
                    OverlapFlags =85
                    Left =60
                    Top =2550
                    Width =25230
                    Height =12015
                    TabIndex =6
                    Name ="qry_ExADReklacheck_Reklas_unter Unterformular"
                    SourceObject ="Form.qry_ExADReklacheck_Reklas_unter Unterformular"
                    LinkChildFields ="KD_NR"
                    LinkMasterFields ="KD_NR"
                    EventProcPrefix ="qry_ExADReklacheck_Reklas_unter_Unterformular"
                    GUID = Begin
                        0x36fac844de878146b521c1858e537257
                    End
                End
                Begin Subform
                    OverlapFlags =85
                    Left =6750
                    Top =1080
                    Width =10140
                    Height =570
                    TabIndex =7
                    Name ="qry_ExADReklacheck_ProvADSumme Unterformular"
                    SourceObject ="Form.qry_ExADReklacheck_ProvADSumme Unterformular"
                    LinkChildFields ="KD_NR"
                    LinkMasterFields ="KD_NR"
                    EventProcPrefix ="qry_ExADReklacheck_ProvADSumme_Unterformular"
                    GUID = Begin
                        0x846505c894256d4593f89b6cf29786cc
                    End
                End
            End
        End
        Begin FormFooter
            Height =566
            BackColor =16777164
            Name ="Formularfuß"
            GUID = Begin
                0x325e02f189ce494692afccd47ff18021
            End
        End
    End
End
CodeBehindForm
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Compare Database

Private Sub Befehl13_Click()
On Error GoTo Err_Befehl13_Click


    DoCmd.GoToRecord , , acNext

Exit_Befehl13_Click:
    Exit Sub

Err_Befehl13_Click:
    MsgBox Err.Description
    Resume Exit_Befehl13_Click
    
End Sub
Private Sub Befehl14_Click()
On Error GoTo Err_Befehl14_Click


    DoCmd.GoToRecord , , acPrevious

Exit_Befehl14_Click:
    Exit Sub

Err_Befehl14_Click:
    MsgBox Err.Description
    Resume Exit_Befehl14_Click
    
End Sub
Private Sub Befehl15_Click()
On Error GoTo Err_Befehl15_Click


    DoCmd.Close

Exit_Befehl15_Click:
    Exit Sub

Err_Befehl15_Click:
    MsgBox Err.Description
    Resume Exit_Befehl15_Click
    
End Sub