Version =20
VersionRequired =20
Checksum =-850513549
Begin Form
    AllowFilters = NotDefault
    AutoResize = NotDefault
    PopUp = NotDefault
    RecordSelectors = NotDefault
    MaxButton = NotDefault
    MinButton = NotDefault
    ControlBox = NotDefault
    NavigationButtons = NotDefault
    AllowDeletions = NotDefault
    CloseButton = NotDefault
    DividingLines = NotDefault
    AllowAdditions = NotDefault
    DefaultView =0
    ScrollBars =0
    ViewsAllowed =1
    TabularFamily =119
    BorderStyle =3
    PictureAlignment =2
    DatasheetGridlinesBehavior =3
    GridY =10
    Width =9184
    DatasheetFontHeight =10
    ItemSuffix =14
    Top =2340
    Right =6255
    Bottom =5310
    DatasheetGridlinesColor =12632256
    RecSrcDt = Begin
        0xbe20e8abc8ffe340
    End
    RecordSource ="qry_VKBestellung"
    Caption ="qry_TageKalender"
    OnOpen ="Mkr_Max"
    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 =566
            BackColor =16777164
            Name ="Formularkopf"
            GUID = Begin
                0x290602544b3efa4898f2589c81f52fe9
            End
            Begin
                Begin Label
                    OverlapFlags =85
                    Top =165
                    Width =2205
                    Height =345
                    FontSize =12
                    Name ="Bezeichnungsfeld9"
                    Caption ="Handybestell_NR:"
                    FontName ="Arial"
                    GUID = Begin
                        0x5dca7dc27d25384ab0ba35a70dc3940b
                    End
                End
                Begin Label
                    OverlapFlags =85
                    Left =2325
                    Top =165
                    Width =2580
                    Height =345
                    FontSize =12
                    Name ="Bezeichnungsfeld10"
                    Caption ="Artikelbezeichnung:"
                    FontName ="Arial"
                    GUID = Begin
                        0xdb9e5b1dde84394bb0de233f0db0dc77
                    End
                End
                Begin Label
                    OverlapFlags =85
                    Left =5216
                    Top =165
                    Width =825
                    Height =345
                    FontSize =12
                    Name ="Bezeichnungsfeld11"
                    Caption ="Anzahl:"
                    FontName ="Arial"
                    GUID = Begin
                        0x430073b848ab114ca941b860f102961c
                    End
                End
                Begin Label
                    OverlapFlags =85
                    Left =6236
                    Top =165
                    Width =1980
                    Height =345
                    FontSize =12
                    Name ="Bezeichnungsfeld12"
                    Caption ="VkEinzelpreis:"
                    FontName ="Arial"
                    GUID = Begin
                        0xa343bf881ec70643b62fd1e536643d68
                    End
                End
            End
        End
        Begin Section
            Height =572
            Name ="Detailbereich"
            GUID = Begin
                0x76c9589a452ab4428a3e62194257db22
            End
            Begin
                Begin CommandButton
                    OverlapFlags =85
                    Left =8560
                    Top =56
                    Width =516
                    Height =516
                    TabIndex =4
                    Name ="Befehl8"
                    Caption ="Befehl8"
                    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
                        0x6db8e3de1a323d44a10f47e3381527d9
                    End
                End
                Begin TextBox
                    Locked = NotDefault
                    OverlapFlags =85
                    IMESentenceMode =3
                    Top =120
                    Width =2196
                    Height =345
                    FontSize =12
                    Name ="Handybestell_NR"
                    ControlSource ="Handybestell_NR"
                    FontName ="Arial"
                    GUID = Begin
                        0x22a50ca03fc19441ad060046c2f37ed9
                    End
                End
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =2267
                    Top =120
                    Width =2661
                    Height =345
                    FontSize =12
                    TabIndex =1
                    Name ="Artikelbezeichnung"
                    ControlSource ="Artikelbezeichnung"
                    FontName ="Arial"
                    GUID = Begin
                        0x549b742ae077c949b07714f9737e78c4
                    End
                End
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =5215
                    Top =120
                    Width =846
                    Height =345
                    FontSize =12
                    TabIndex =2
                    Name ="Anzahl"
                    ControlSource ="Anzahl"
                    FontName ="Arial"
                    GUID = Begin
                        0x2040216ea422ef488ba5ff70211fb11b
                    End
                End
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =6292
                    Top =120
                    Width =1926
                    Height =345
                    FontSize =12
                    TabIndex =3
                    Name ="VkEinzelpreis"
                    ControlSource ="VkEinzelpreis"
                    FontName ="Arial"
                    GUID = Begin
                        0x7d8eb2e9161bef449026a1f65f2c87ff
                    End
                End
            End
        End
        Begin FormFooter
            Height =566
            BackColor =16777164
            Name ="Formularfuß"
            GUID = Begin
                0x13eb1bd8f983ab4cbd0dc778ebec9026
            End
            Begin
                Begin CommandButton
                    OverlapFlags =85
                    Left =60
                    Top =15
                    Width =546
                    Height =516
                    Name ="Befehl13"
                    Caption ="Befehl13"
                    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
                        0x2c00b700aeb9d24ba99e2f6aef9e57d6
                    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 Befehl8_Click()
On Error GoTo Err_Befehl8_Click


    DoCmd.Close

Exit_Befehl8_Click:
    Exit Sub

Err_Befehl8_Click:
    MsgBox Err.Description
    Resume Exit_Befehl8_Click
    
End Sub
Private Sub Befehl13_Click()
On Error GoTo Err_Befehl13_Click


    DoCmd.Close

Exit_Befehl13_Click:
    Exit Sub

Err_Befehl13_Click:
    MsgBox Err.Description
    Resume Exit_Befehl13_Click
    
End Sub