VERSION 5.00 Object = "{F0EB2110-3CC3-11D0-8E54-006008104BEC}#1.0#0"; "VW4Index.ocx" Begin VB.Form FVBok BackColor = &H00C0C0C0& BorderStyle = 0 'Kein Caption = "VW4DateTime" ClientHeight = 9000 ClientLeft = 0 ClientTop = 0 ClientWidth = 12000 ControlBox = 0 'False Icon = "FVBok.frx":0000 LinkTopic = "Form1" LockControls = -1 'True ScaleHeight = 9000 ScaleWidth = 12000 StartUpPosition = 2 'Bildschirmmitte Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 1 Left = 4620 Top = 1320 Width = 675 _Version = 65536 _ExtentX = 1191 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Now" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VB.Timer tmrDateTime Interval = 500 Left = 6780 Top = 660 End Begin VW4IndexLib.VWIndex idxDateTime Height = 375 Index = 0 Left = 1740 Top = 1320 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08.12.1999 12:13:14 PM" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxCaption Height = 495 Index = 1 Left = 6000 Top = 0 Width = 6000 _Version = 65536 _ExtentX = 10583 _ExtentY = 873 _StockProps = 96 BorderStyle = 1 FontClass = "Arial12Bold" TextOff = "idxCaptionOK" IndexGroup = "FVB" UseTextProps = -1 'True BackColorOff = 12632256 ShadowStyle = 1 ShadowDepth = 3 ShadowColor2 = 14737632 Range = 32767 End Begin VW4IndexLib.VWIndex idxCaption Height = 495 Index = 0 Left = 0 Top = 0 Width = 6000 _Version = 65536 _ExtentX = 10583 _ExtentY = 873 _StockProps = 96 BorderStyle = 1 FontClass = "Arial12Bold" TextOff = "ProgramName" IndexGroup = "Global" UseTextProps = -1 'True BackColorOff = 16711680 ForeColorOff = 16777215 ShadowStyle = 1 ShadowDepth = 3 ShadowColor2 = 14737632 Range = 32767 End Begin VW4IndexLib.VWIndex idxDate Height = 375 Index = 0 Left = 1740 Top = 2310 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08.12.1999" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxTime Height = 375 Index = 0 Left = 1740 Top = 3990 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "12:13:14" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxDay Height = 375 Left = 1740 Top = 5400 Width = 855 _Version = 65536 _ExtentX = 1508 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxMonth Height = 375 Left = 5820 Top = 5400 Width = 855 _Version = 65536 _ExtentX = 1508 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "12" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxYear Height = 375 Left = 9420 Top = 5400 Width = 855 _Version = 65536 _ExtentX = 1508 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "1999" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxHour Height = 375 Left = 1740 Top = 6540 Width = 855 _Version = 65536 _ExtentX = 1508 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxMinute Height = 375 Left = 5820 Top = 6540 Width = 855 _Version = 65536 _ExtentX = 1508 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxSecond Height = 375 Left = 9420 Top = 6540 Width = 855 _Version = 65536 _ExtentX = 1508 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 5 Left = 4620 Top = 2310 Width = 675 _Version = 65536 _ExtentX = 1191 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Date" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 11 Left = 4620 Top = 3990 Width = 675 _Version = 65536 _ExtentX = 1191 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Time" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 16 Left = 2640 Top = 5400 Width = 1215 _Version = 65536 _ExtentX = 2143 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Day(Now)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 17 Left = 6720 Top = 5400 Width = 1215 _Version = 65536 _ExtentX = 2143 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Month(Now)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 18 Left = 10320 Top = 5400 Width = 1215 _Version = 65536 _ExtentX = 2143 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Year(Now)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 21 Left = 2640 Top = 6540 Width = 1215 _Version = 65536 _ExtentX = 2143 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Hour(Now)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 22 Left = 6720 Top = 6540 Width = 1215 _Version = 65536 _ExtentX = 2143 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Minute(Now)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 23 Left = 10320 Top = 6540 Width = 1215 _Version = 65536 _ExtentX = 2143 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Second(Now)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxWeekday Height = 375 Left = 1740 Top = 7080 Width = 855 _Version = 65536 _ExtentX = 1508 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 24 Left = 2640 Top = 7080 Width = 1335 _Version = 65536 _ExtentX = 2355 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Weekday(Now)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 0 Left = 4620 Top = 720 Width = 1335 _Version = 65536 _ExtentX = 2355 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "idxFunction" IndexGroup = "FVB" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxResult Height = 375 Left = 1740 Top = 720 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "idxResult" IndexGroup = "FVB" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 25 Left = 6720 Top = 7080 Width = 1635 _Version = 65536 _ExtentX = 2884 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "WeekdayName(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxWeekdayName Height = 375 Index = 0 Left = 5820 Top = 7080 Width = 855 _Version = 65536 _ExtentX = 1508 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "Do" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 26 Left = 10320 Top = 7080 Width = 1635 _Version = 65536 _ExtentX = 2884 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "WeekdayName(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxWeekdayName Height = 375 Index = 1 Left = 8700 Top = 7080 Width = 1575 _Version = 65536 _ExtentX = 2778 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "Donnerstag" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 28 Left = 2640 Top = 7620 Width = 1155 _Version = 65536 _ExtentX = 2037 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "DatePart(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxDayOfYear Height = 375 Left = 1740 Top = 7620 Width = 855 _Version = 65536 _ExtentX = 1508 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "351" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 29 Left = 6720 Top = 7620 Width = 1155 _Version = 65536 _ExtentX = 2037 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "DatePart(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxWeekNumber Height = 375 Left = 5820 Top = 7620 Width = 855 _Version = 65536 _ExtentX = 1508 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "44" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 27 Left = 10320 Top = 7560 Width = 1095 _Version = 65536 _ExtentX = 1931 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "DatePart(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxQuarter Height = 375 Left = 9420 Top = 7620 Width = 855 _Version = 65536 _ExtentX = 1508 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "3" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 1 Left = 0 Top = 1320 Width = 1695 _Version = 65536 _ExtentX = 2990 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxDateAndTime" IndexGroup = "FVB" BackColorOff = 12632256 ForeColorOff = 0 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 0 Left = 0 Top = 720 Width = 1695 _Version = 65536 _ExtentX = 2990 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxMeaning" IndexGroup = "FVB" BackColorOff = 12632256 ForeColorOff = 0 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 2 Left = 0 Top = 2310 Width = 1695 _Version = 65536 _ExtentX = 2990 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxDate" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 5 Left = 0 Top = 3990 Width = 1695 _Version = 65536 _ExtentX = 2990 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxTime" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 6 Left = 660 Top = 5400 Width = 1035 _Version = 65536 _ExtentX = 1826 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxDay" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 7 Left = 4740 Top = 5400 Width = 1035 _Version = 65536 _ExtentX = 1826 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxMonth" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 8 Left = 8340 Top = 5400 Width = 1035 _Version = 65536 _ExtentX = 1826 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxYear" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 10 Left = 660 Top = 6540 Width = 1035 _Version = 65536 _ExtentX = 1826 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxHour" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 11 Left = 4740 Top = 6540 Width = 1035 _Version = 65536 _ExtentX = 1826 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxMinute" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 12 Left = 8340 Top = 6540 Width = 1035 _Version = 65536 _ExtentX = 1826 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxSecond" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 13 Left = 360 Top = 7080 Width = 1335 _Version = 65536 _ExtentX = 2355 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxWeekday" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 14 Left = 0 Top = 7620 Width = 1695 _Version = 65536 _ExtentX = 2990 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxDayOfYear" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 15 Left = 4020 Top = 7620 Width = 1755 _Version = 65536 _ExtentX = 3096 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxWeekNumber" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 16 Left = 8340 Top = 7620 Width = 1035 _Version = 65536 _ExtentX = 1826 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxQuarter" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 2 Left = 8700 Top = 1320 Width = 975 _Version = 65536 _ExtentX = 1720 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Format(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxDateTime Height = 375 Index = 1 Left = 5820 Top = 1320 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08.12.1999 12:13:14 PM" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 6 Left = 8700 Top = 2310 Width = 975 _Version = 65536 _ExtentX = 1720 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Format(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxDate Height = 375 Index = 1 Left = 5820 Top = 2310 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08.12.1999" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 12 Left = 8700 Top = 3990 Width = 975 _Version = 65536 _ExtentX = 1720 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Format(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxTime Height = 375 Index = 1 Left = 5820 Top = 3990 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "12:13:14 PM" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 3 Left = 4620 Top = 1740 Width = 975 _Version = 65536 _ExtentX = 1720 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Format(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxDateTime Height = 375 Index = 2 Left = 1740 Top = 1740 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08.12.1999 12:13:14 PM" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 4 Left = 8700 Top = 1740 Width = 975 _Version = 65536 _ExtentX = 1720 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Format(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxDateTime Height = 375 Index = 3 Left = 5820 Top = 1740 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08.12.1999 12:13:14 PM" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 19 Left = 6720 Top = 5970 Width = 1635 _Version = 65536 _ExtentX = 2884 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "MonthName(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxMonthName Height = 375 Index = 0 Left = 5820 Top = 5970 Width = 855 _Version = 65536 _ExtentX = 1508 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "Do" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 20 Left = 10320 Top = 5970 Width = 1635 _Version = 65536 _ExtentX = 2884 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "MonthName(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxMonthName Height = 375 Index = 1 Left = 8700 Top = 5970 Width = 1575 _Version = 65536 _ExtentX = 2778 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "Donnerstag" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 9 Left = 4350 Top = 5970 Width = 1425 _Version = 65536 _ExtentX = 2514 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxMonthName" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 14 Left = 8700 Top = 4410 Width = 1035 _Version = 65536 _ExtentX = 1826 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Format(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxTime Height = 375 Index = 2 Left = 5820 Top = 4410 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "12:13:14 PM" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 10 Left = 9840 Top = 3420 Width = 975 _Version = 65536 _ExtentX = 1720 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Format(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxDate Height = 375 Index = 3 Left = 5820 Top = 3420 Width = 3975 _Version = 65536 _ExtentX = 7011 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "Donnerstag, 12. September 1999" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 15 Left = 8700 Top = 4830 Width = 975 _Version = 65536 _ExtentX = 1720 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Format(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxTime Height = 375 Index = 3 Left = 5820 Top = 4830 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "12:13:14 PM" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 8 Left = 8700 Top = 2880 Width = 975 _Version = 65536 _ExtentX = 1720 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Format(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxDate Height = 375 Index = 2 Left = 5820 Top = 2880 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08.12.1999" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxTime Height = 375 Index = 4 Left = 1740 Top = 4410 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "12:13:14" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 13 Left = 4620 Top = 4410 Width = 675 _Version = 65536 _ExtentX = 1191 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "Time" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxYesterday Height = 375 Left = 1740 Top = 2880 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08.12.1999" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 7 Left = 4620 Top = 2880 Width = 1095 _Version = 65536 _ExtentX = 1931 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "DateAdd(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 3 Left = 0 Top = 2880 Width = 1695 _Version = 65536 _ExtentX = 2990 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxYesterday" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4IndexLib.VWIndex idxTomorrow Height = 375 Left = 1740 Top = 3420 Width = 2835 _Version = 65536 _ExtentX = 5001 _ExtentY = 661 _StockProps = 96 FontClass = "Arial12Bold" TextOff = "08.12.1999" BackColorOff = 12632256 ForeColorOff = 12582912 End Begin VW4IndexLib.VWIndex idxFunction Height = 375 Index = 9 Left = 4620 Top = 3420 Width = 1095 _Version = 65536 _ExtentX = 1931 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10" TextOff = "DateAdd(...)" BackColorOff = 12632256 ForeColorOn = -2147483647 ForeColorOff = 4210752 ShadowStyle = 0 Alignment = 1 End Begin VW4IndexLib.VWIndex idxMeaning Height = 375 Index = 4 Left = 0 Top = 3420 Width = 1695 _Version = 65536 _ExtentX = 2990 _ExtentY = 661 _StockProps = 96 FontClass = "Arial10Bold" TextOff = "idxTomorrow" IndexGroup = "FVB" BackColorOff = 12632256 ShadowStyle = 0 Alignment = 4 End Begin VW4DateTime.XFooter XFooter1 Height = 840 Left = 0 TabIndex = 0 Top = 8160 Width = 12000 _ExtentX = 21167 _ExtentY = 1482 End End Attribute VB_Name = "FVBok" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Option Explicit Private Sub tmrDateTime_Timer() 'ACHTUNG: Die folgenden Funktion arbeiten nicht mit der ' VisiWin-Sprachumschaltung zusammen! 'Alle mit 'S markierten Funktionen beziehen ihre Formatierung aus der 'Systemeinstellung unter: 'Start-Einstellungen-Systemsteuerung-Ländereinstellungen-Uhrzeit/Datum idxDateTime(0).TextOff = Now 'S idxDateTime(1).TextOff = Format$(Now, "dd.mm.yyyy hh:nn:ss") idxDateTime(2).TextOff = Format$(Now, "General Date") 'S idxDateTime(3).TextOff = Format$(Now, "mm\/dd\/yyyy hh:nn:ss") idxDate(0).TextOff = Date 'R idxDate(1).TextOff = Format$(Now, "Short Date") 'S idxDate(2).TextOff = Format$(Now, "Medium Date") 'S idxDate(3).TextOff = Format$(Now, "Long Date") 'S idxYesterday.TextOff = Format$(DateAdd("d", -1, Date), "ddd\. dd\. mmm\. yyyy") idxTomorrow.TextOff = Format$(DateAdd("d", 1, Date), "ddd\. dd\. mmm\. yyyy") idxTime(0).TextOff = Time 'S idxTime(1).TextOff = Format$(Now, "Short Time") 'S idxTime(2).TextOff = Format$(Now, "Medium Time") 'S idxTime(3).TextOff = Format$(Now, "Long Time") 'S idxTime(4).TextOff = Format$(Now, "HH:NN:SS AM/PM") idxDay.TextOff = Day(Now) idxMonth.TextOff = Month(Now) idxMonthName(0).TextOff = MonthName(Month(Now), True) idxMonthName(1).TextOff = MonthName(Month(Now), False) idxYear.TextOff = Year(Now) idxHour.TextOff = Hour(Now) idxMinute.TextOff = Minute(Now) idxSecond.TextOff = Second(Now) 'Bitte beachten Sie die Zusatzparameter 'vbUseSystemDayOfWeek' und 'vbUseSystem' ! 'Die Systemparameter sind zu empfehlen, da sie die länderspezifischen Einstellungen 'darstellen; damit erhalten Sie auf allen Plattformen/Ländern immer die korrekten Ergebnisse. 'Die Vorbelegungen der Funktionen Weekday, WeekdayName, DatePart und Format sind 'unterschiedlich !?!? und entsprechen teilweise nicht den deutschen Definitionen! idxWeekDay.TextOff = Weekday(Now, vbUseSystemDayOfWeek) 'S idxWeekdayName(0).TextOff = WeekdayName(Weekday(Now, vbUseSystemDayOfWeek), True, vbUseSystemDayOfWeek) 'S idxWeekdayName(1).TextOff = WeekdayName(Weekday(Now, vbUseSystemDayOfWeek), , vbUseSystemDayOfWeek) 'S idxDayOfYear.TextOff = DatePart("y", Now, vbUseSystemDayOfWeek, vbUseSystem) 'S idxWeekNumber.TextOff = DatePart("ww", Now, vbUseSystemDayOfWeek, vbUseSystem) 'S idxQuarter.TextOff = DatePart("q", Now, vbUseSystemDayOfWeek, vbUseSystem) 'S End Sub