Recent content by PowerChamp

a Single line code me.move (screen.width-me.scalewidth)/2, (screen.height-me.scaleheight)/2

here is the very very simple solution to get each and every pixel in the picture contol picture1.picture = loadpicture ("c:\yourpic.jpg"); ' set the pixel mode ' ************************ Picture1.ScaleMode = 3 For X = 1 To Picture1.ScaleWidth For Y = 1 To Picture1.ScaleHeight...

Hi Here is you solution: simply add a blank string when you assing a recordset field value to a text box or any control -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Private Sub cboDate_Click() rsLogAccess.Open If Not rsLogAccess.BOF Then rsLogAccess.MoveFirst...

Hi! Here is the way you can control keys only you allow to enter in the field. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Function AllowChar(KeyAscii As Integer, s As String) As Boolean If InStr(s, Chr(KeyAscii)) Then AllowChar = True Else AllowChar =...

Your First Way is find out the duplicate records your can do as following query SELECT Easy.EasyID FROM East GROUP BY Easy.EasyID HAVING (((Count(Easy.EasyID))>1)); this list shows you the only douplcate records id and save this to qryDuplicateReords you can add the record in anther table by...

Here is your solotion Step #1: Create a form by form wizard and include all fields you want to show in this form. Step #2: This form must be created in "Datasheet View" Step #3: Create an another form by using "Design View" Step #4: Add an unbounded text box in this form...