Version =20
VersionRequired =20
Checksum =1126042519
Begin Form
    PopUp = NotDefault
    RecordSelectors = NotDefault
    MaxButton = NotDefault
    MinButton = NotDefault
    ControlBox = NotDefault
    NavigationButtons = NotDefault
    CloseButton = NotDefault
    DividingLines = NotDefault
    AllowDesignChanges = NotDefault
    DefaultView =0
    ScrollBars =0
    ViewsAllowed =1
    TabularFamily =126
    BorderStyle =3
    PictureAlignment =2
    DatasheetGridlinesBehavior =3
    GridY =10
    Width =5329
    DatasheetFontHeight =10
    ItemSuffix =8
    DatasheetGridlinesColor =12632256
    RecSrcDt = Begin
        0x645b1ac74c68e440
    End
    RecordSource ="qry_SPTWFSwechseln"
    OnOpen ="Mkr_Max"
    DatasheetFontName ="Arial"
    AllowDatasheetView =0
    AllowPivotTableView =0
    AllowPivotChartView =0
    AllowPivotChartView =0
    Begin
        Begin Label
            BackStyle =0
            FontName ="Tahoma"
        End
        Begin CommandButton
            Width =1701
            Height =283
            FontSize =8
            FontWeight =400
            ForeColor =-2147483630
            FontName ="Tahoma"
        End
        Begin TextBox
            FELineBreak = NotDefault
            SpecialEffect =2
            OldBorderStyle =0
            Width =1701
            LabelX =-1701
            FontName ="Tahoma"
            AsianLineBreak =255
        End
        Begin ListBox
            SpecialEffect =2
            Width =1701
            Height =1417
            LabelX =-1701
            FontName ="Tahoma"
        End
        Begin ComboBox
            SpecialEffect =2
            Width =1701
            LabelX =-1701
            FontName ="Tahoma"
        End
        Begin FormHeader
            Height =566
            BackColor =16777164
            Name ="Formularkopf"
            GUID = Begin
                0x5c7513297dda0344b4cec717cde01823
            End
        End
        Begin Section
            Height =4818
            Name ="Detailbereich"
            GUID = Begin
                0x25760fb272ee5e44a79b52e058fb807e
            End
            Begin
                Begin ListBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =623
                    Top =165
                    Width =4191
                    Height =3562
                    Name ="Kombinationsfeld2"
                    ControlSource ="SachbearbeiterFS"
                    RowSourceType ="Table/Query"
                    RowSource ="SELECT [qry_AgentVertragseingabe].[Agent] FROM [qry_AgentVertragseingabe] ORDER "
                        "BY [Agent];"
                    ColumnWidths ="4095"
                    GUID = Begin
                        0x207214fc274dbd4fb9c2ca5fd0f2ea08
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =165
                            Width =540
                            Height =245
                            Name ="Agent_Bezeichnungsfeld"
                            Caption ="Agent"
                            GUID = Begin
                                0x82744e942a010240b27ab5fdfbbae7f1
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =566
                    Top =4247
                    Width =4191
                    TabIndex =1
                    Name ="SachbearbeiterFS"
                    ControlSource ="SachbearbeiterFS"
                    GUID = Begin
                        0xc2a914369f87e14e880a506d95f66bc3
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Top =3907
                            Width =1410
                            Height =240
                            Name ="Bezeichnungsfeld4"
                            Caption ="SachbearbeiterFS:"
                            GUID = Begin
                                0xabdb80e5a77e0b49afdb0670e4774778
                            End
                        End
                    End
                End
            End
        End
        Begin FormFooter
            Height =566
            BackColor =16777164
            Name ="Formularfuß"
            GUID = Begin
                0xd59c0393e29f084090fe0984ef8a1fd4
            End
            Begin
                Begin CommandButton
                    OverlapFlags =85
                    Left =120
                    Top =45
                    Width =501
                    Height =516
                    Name ="Befehl7"
                    Caption ="Befehl7"
                    OnClick ="[Event Procedure]"
                    PictureData = Begin
                        0x2800000010000000100000000100040000000000800000000000000000000000 ,
                        0x0000000000000000000000000000800000800000008080008000000080008000 ,
                        0x8080000080808000c0c0c0000000ff00c0c0c00000ffff00ff000000c0c0c000 ,
                        0xffff0000ffffff00dadad0dadadadadaadad00adadadadaddad030dadadadada ,
                        0xad0330adadadadad0033300000000adaa03330ff0dadadadd03300ff0adad4da ,
                        0xa03330ff0dad44add03330ff0ad44444a03330ff0d444444d03330ff0ad44444 ,
                        0xa0330fff0dad44add030ffff0adad4daa00fffff0dadadadd00000000adadada ,
                        0xadadadadadadadad000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000
                    End
                    ObjectPalette = Begin
                        0x0003100000000000800000000080000080800000000080008000800000808000 ,
                        0x80808000c0c0c000ff000000c0c0c000ffff00000000ff00c0c0c00000ffff00 ,
                        0xffffff0000000000
                    End
                    ControlTipText ="Formular schließen"
                    GUID = Begin
                        0xfd633b83a769eb41a914ca6ce9269074
                    End
                End
            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 Befehl6_Click()
On Error GoTo Err_Befehl6_Click


    DoCmd.Close

Exit_Befehl6_Click:
    Exit Sub

Err_Befehl6_Click:
    MsgBox Err.Description
    Resume Exit_Befehl6_Click
    
End Sub
Private Sub Befehl7_Click()
On Error GoTo Err_Befehl7_Click


    DoCmd.Close

Exit_Befehl7_Click:
    Exit Sub

Err_Befehl7_Click:
    MsgBox Err.Description
    Resume Exit_Befehl7_Click
    
End Sub