I have a form that has 25 controls each of which are textboxes or combo boxes. What I am trying to do is set the SelStart of each control equal to the SelLength. What I have done so far is to set the SelStart = to the SelLength on the Enter event for each control.
For example:
Private Sub...
I tried the ctl.SetFocus before the With...End With block and it attempted to set the focus on all controls including labels which triggered an error. I tried adding it before the .SelStart = .SelLength line and no errors, but it wouldn't physically work.
I have a form that has 25 controls each of which are textboxes or combo boxes. What I am trying to do is set the SelStart of each control equal to the SelLength. What I have done so far is to set the SelStart = to the SelLength on the Enter event for each control.
For example:
Private Sub...
I have a list box with the following columns:
| Product | ProductID | Category |
On the same form, I have a textbox for each column in the listbox.
I want the user to be able to select a row from the listbox and automatically update(fill-in) the textboxes for each control.
Here is a link to a tool that does almost exactly what I want to do:
http://secure.necaweb.com/caryp-cgi/hazel.cgi?action=serve&item=zipcodelookup.htm
Download the demo and have a look and let's see if we can come close if anyone can help. Why don't I just purchase the tool? Well, I think $679...
OK Here is what I want the form to do:
User opens form and hits new to create new record...
If user hits save, then either (X) or btnClose, the form will close.
If user doesn't hit save, then when closing with either (X) or btnClose, prompt user with Yes,No,Cancel
Yes will save record and close...
This is the code I am using:
Private Sub FormDirty()
Dim Msg, Style, Title, Response, MyString
Msg = "Do you want to save changes to the current record?"
Style = "vbYesNoCancel"
Title = "Save changes"
Response = MsgBox(Msg, Style, Title)...
I have a form with buttons where users can save,cancel,delete,create new, or close the form. What I want to do, is if the user attempts to close the form after changing data without clicking save, prompt them on close to accept or cancel changes. The same if they attempt to close with the...
I have a form with buttons where users can save,cancel,delete,create new, or close the form. What I want to do, is if the user attempts to close the form after changing data without clicking save, prompt them on close to accept or cancel changes. The same if they attempt to close with the...
Just picking one for example:
The zip code 78209 for example, corresponds to the following cities:
San Antonio, TX
Terrell Hills, TX
Alamo Heights, TX
And the zip code, 28621:
Austin, NC
Benham, NC
Burch, NC
North Elkin, NC
Pleasant Hill, NC
My zip code table initially has 78,000 zip codes...
Someone pointed me to a zip code table where there are about 32,000 zip codes that correspond to more than one city. I ran an append query and removed the duplicate zip codes and checked a few of the duplicates with USPS and indeed there are a good many that do correspond to muliple cities...
I have a form where the user enters a zip code and the city and state is automatically filled in. I am using the following code:
Private Sub ZipCode_Exit(Cancel As Integer)
Me!State = DLookup("State", "tblZipCode", "ZipCode = " & "'" & Me!ZipCode &...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.