Version =20
VersionRequired =20
Checksum =-470874273
Begin Form
    PopUp = NotDefault
    AutoCenter = NotDefault
    AllowDeletions = NotDefault
    AllowAdditions = NotDefault
    AllowDesignChanges = NotDefault
    ViewsAllowed =1
    TabularFamily =0
    BorderStyle =3
    PictureAlignment =2
    DatasheetGridlinesBehavior =3
    GridY =10
    Width =11265
    DatasheetFontHeight =10
    ItemSuffix =19
    Left =7575
    Top =2835
    Right =19125
    Bottom =9720
    DatasheetGridlinesColor =12632256
    RecSrcDt = Begin
        0x92f59a11e9cfe340
    End
    RecordSource ="qry_TarifePOSNachbearbeiten"
    Caption ="qry_TarifePOS"
    DatasheetFontName ="Arial"
    AllowDatasheetView =0
    AllowPivotTableView =0
    AllowPivotChartView =0
    AllowPivotChartView =0
    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 =6519
            Name ="Formularkopf"
            GUID = Begin
                0x71d44059c20e6242b9db41cf71fa474e
            End
            Begin
                Begin ListBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Width =9525
                    Height =6403
                    FontSize =10
                    Name ="Liste12"
                    RowSourceType ="Table/Query"
                    RowSource ="SELECT [qry_TarifePOSNachbearbeiten].[Tarif] FROM [qry_TarifePOSNachbearbeiten];"
                    ColumnWidths ="5790"
                    AfterUpdate ="[Event Procedure]"
                    FontName ="Arial"
                    GUID = Begin
                        0xaa8f6bac097fbb48a9241c1c30dfe58d
                    End
                End
                Begin TextBox
                    Locked = NotDefault
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =9870
                    Top =60
                    Width =1248
                    Height =345
                    TabIndex =1
                    Name ="CardID"
                    DefaultValue ="=[Forms]![frmTalklineDaisyNachbearbeiten]![qry_SimDaisy].[Form]![CardID]"
                    FontName ="Arial"
                    GUID = Begin
                        0x1548315f076a1241870b9fd3c90b962e
                    End
                End
                Begin TextBox
                    Locked = NotDefault
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =9870
                    Top =525
                    Width =1248
                    Height =345
                    TabIndex =2
                    Name ="Sachbearbeiter"
                    DefaultValue ="=[Forms]![frm_Anmeldung]![Benutzername]"
                    FontName ="Arial"
                    GUID = Begin
                        0x8593859af5f818498fe09ad88f5fb920
                    End
                End
                Begin TextBox
                    Locked = NotDefault
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =9870
                    Top =990
                    Width =1248
                    Height =345
                    TabIndex =3
                    Name ="Import Datum"
                    DefaultValue ="=Date()"
                    FontName ="Arial"
                    EventProcPrefix ="Import_Datum"
                    GUID = Begin
                        0x0381c4e5371a3a499509be89cf367689
                    End
                End
            End
        End
        Begin Section
            Height =368
            BackColor =16777164
            Name ="Detailbereich"
            GUID = Begin
                0x545b1a8507191d4eb63f5a3679d7dd8c
            End
            Begin
                Begin TextBox
                    Locked = NotDefault
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =60
                    Top =60
                    Width =9519
                    Height =300
                    ColumnWidth =3000
                    FontSize =10
                    Name ="Tarif"
                    ControlSource ="Tarif"
                    FontName ="Arial"
                    GUID = Begin
                        0x4ef7871675ed6e40a91f3807990772b5
                    End
                End
                Begin TextBox
                    Visible = NotDefault
                    Locked = NotDefault
                    OverlapFlags =93
                    IMESentenceMode =3
                    Left =10158
                    Top =64
                    Width =153
                    Height =255
                    ColumnWidth =2310
                    TabIndex =1
                    Name ="Provision1"
                    ControlSource ="Provision1"
                    GUID = Begin
                        0xbd9ada4e2b454a4192bc9157d14958c4
                    End
                End
                Begin TextBox
                    Visible = NotDefault
                    Locked = NotDefault
                    OverlapFlags =87
                    IMESentenceMode =3
                    Left =10323
                    Top =64
                    Width =153
                    Height =255
                    ColumnWidth =2310
                    TabIndex =2
                    Name ="Provision2"
                    ControlSource ="Provision2"
                    GUID = Begin
                        0xee0b8b95f9e55647ae10785f9802e3fe
                    End
                End
                Begin TextBox
                    Visible = NotDefault
                    Locked = NotDefault
                    OverlapFlags =93
                    IMESentenceMode =3
                    Left =10503
                    Top =64
                    Width =153
                    Height =255
                    ColumnWidth =2310
                    TabIndex =3
                    Name ="Provision3"
                    ControlSource ="Provision3"
                    GUID = Begin
                        0x3a942dc50de6d44cb522828cd9231db1
                    End
                End
                Begin TextBox
                    Visible = NotDefault
                    Locked = NotDefault
                    OverlapFlags =87
                    IMESentenceMode =3
                    Left =10668
                    Top =64
                    Width =153
                    Height =255
                    ColumnWidth =2310
                    TabIndex =4
                    Name ="Provision4"
                    ControlSource ="Provision4"
                    GUID = Begin
                        0x8402e7b79a554f41a10df91a4b35202f
                    End
                End
                Begin TextBox
                    Visible = NotDefault
                    Locked = NotDefault
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =10893
                    Top =64
                    Width =150
                    Height =255
                    ColumnWidth =2310
                    TabIndex =5
                    Name ="Provision5"
                    ControlSource ="Provision5"
                    GUID = Begin
                        0x29cea4239feb544dbc2aae7c16b7e0ec
                    End
                End
                Begin CommandButton
                    OverlapFlags =85
                    Left =9645
                    Top =60
                    Width =351
                    Height =276
                    TabIndex =6
                    Name ="Befehl14"
                    Caption ="Befehl1"
                    OnClick ="MkrTarifwaehlen"
                    PictureData = Begin
                        0x2800000010000000100000000100040000000000800000000000000000000000 ,
                        0x0000000000000000000000000000800000800000008080008000000080008000 ,
                        0x8080000080808000c0c0c0000000ff00c0c0c00000ffff00ff000000c0c0c000 ,
                        0xffff0000ffffff00dadadadadadadadaadadadadadadadad00000000000adada ,
                        0x003333333330adad0b03333333330ada0fb03333333330ad0bfb03333333330a ,
                        0x0fbfb000000000000bfbfbfbfb0adada0fbfbfbfbf0dadad0bfb0000000adada ,
                        0xa000adadadad000ddadadadadadad00aadadadad0dad0d0ddadadadad000dada ,
                        0xadadadadadadadad000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000
                    End
                    ObjectPalette = Begin
                        0x0003100000000000800000000080000080800000000080008000800000808000 ,
                        0x80808000c0c0c000ff000000c0c0c000ffff00000000ff00c0c0c00000ffff00 ,
                        0xffffff0000000000
                    End
                    GUID = Begin
                        0xe19e1fec96fd854a9c95d8560fed6173
                    End
                End
                Begin TextBox
                    Visible = NotDefault
                    Locked = NotDefault
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =11115
                    Top =60
                    Width =150
                    Height =255
                    TabIndex =7
                    Name ="Punkte"
                    ControlSource ="Punkte"
                    GUID = Begin
                        0x59e4c5da879d094ab120023a1cf0978b
                    End
                End
            End
        End
        Begin FormFooter
            Height =0
            BackColor =-2147483633
            Name ="Formularfuß"
            GUID = Begin
                0x683754e1e720f842a88b734537920cd2
            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 Liste12_AfterUpdate()
    ' Den mit dem Steuerelement übereinstimmenden Datensatz suchen.
    Dim rs As Object

    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Tarif] = '" & Me![Liste12] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub