VBClock v1.0 for VB 3.0/4.0. Release Version 1.0, Copyright Property of WolfeByte Ltd. 1995 This is NOT a VBX! Use this VB module in your app to produce 3D clock controls. Two styles: dropdown 'list box' or always open. It only takes 3 clicks to input time - one click for am/pm, left click/drag to set the minutes and right click/drag to set the hour. Thats it! The hands move with the mouse. You set the 3D, color and fonts for time area, clock face, and hour markers. ONE picturebox per clock is ALL that is needed. Code included ($10 see README.TXT). Files included: CLKDEMO.EXE, CLKCODE.ZIP and this README.TXT. DO NOT DELETE THE CLKCODE.ZIP FILE - IT CONTAINS THE SOURCE CODE! This zip file is password protected. Upon registering (GO SWREG) you will receive the password for this file within 24 hours. Regristration can be done via Compuserve ID: 76272,1422. Included with the $10 registration fee is general question and answer support via E-Mail. Resources needed: 1) NO VBX's 2) NO DLL's 3) NO large control arrays are created (labels or buttons) 4) To be placed on your form - 1 picturebox for each calendar (1 timer is optional if you want to make a system clock) Functionality: 1) 16 bit and 32 bit versions (VB 4.0 needed for 32 bit) 2) Multiple clocks can be created - all use the same .bas source code 3) Mouse click to select am/pm 4) Left mouse click/move to set minutes 5) Right mouse click/move to set hour 6) Time is stored in the Tag property of each picturebox and can be copied into a label or textbox control or placed in a database. 7) Two clock styles: dropdown 'list box' or always open. Variable settings: 1) Heading area - height, 3d, bevel, color, border and fonts 2) AM/PM area - 3d, bevel, fonts 3) Clock area - 3d, bevel, color and fonts - fonts (name, size, bold, italic and color) - hands color and width 4) Markers - hour 3d, bevel, color - minute color To make a clock data aware - place an invisible text box on the form and attach it to a valid Date/Time field in a database. In the Change event for the text box place the code: picture1(index) = format(text1,"hh:nn a/p") and also DrawFace Clock(index), picture1(index). Then in the picture1_MouseUp event add the code: text1 = picture1(index) inside the button if/then block.