I wanna know if it's possible to use an access 2002 form to create some controls(icons) on top of a picture (a map) so that i can click those icons to display some info. The trick part is that those icons positions are generated by x,y coordinates from the db itself. Plus a zooming control wold be a plus...
So what are your opinions on my little project.
Thank you all in advance.
JT
Is it possible to add a control (textbox, commandbutton) at run time, I know it's possible with VB but is it with VBA?
Thanks.
Hi guys,
I would like to create text boxes using VBA code ....the reason is that I need a number of text boxes to be created that is equal to the number of rows that is generated by an SQL query.
Any suggestions?
Tnx!
Hello everybody,
Could anyone out there please help me with a small coding problem that I am experiencing....
I have a calculated control on my startup form called txtCurrentAge on which I have put VB code in the on-timer event of the form which makes the control 'flash on & off' if the persons age is below 18.
code as follows:
Private Sub Form_Timer()
If Me.txtCurrentAge.Value < 18 Then
Me.txtCurrentAge.Visible = Not Me.txtCurrentAge.Visible
Else
Me.txtCurrentAge.Visible = True
End If
End Sub
Everything works fine but when a user inadverently clicked on the control by mistake it caused the following error to be displayed: Runtime error 2165 "you cant hide the control that has the focus". What does this mean and how best could I prevent this from happening again as I cant guarantee that any of my users wont click on it again?? The text box concerned has been made 'visible', has not been 'locked' and is 'enabled'.
'
I find this 'flashing action' to be very useful and would like to keep it on my form....
I have searched on this site and various others but have been unsuccesful....
Any help or guidance would be very much appreciated.
P.S I obtained this code via databasedev.co.uk and adapted it to suit my particular DB.
Best Regards
CarolW
I am creating a database for creating quotations. The quotation number is generated using the date, for example the first quote today would be quote number "05202015-1" because it is the first one today. The next quote today would be quote number "05202015-2" and so on. Is there a way to make access automatically generate these quote numbers based on the date?
View 3 Replies View RelatedI need create controls with Controls.Add in one forms on event LOAD.
View 2 Replies View RelatedI have a form in my Access database that after trying to add another field to it today, I get the error "Microsoft Access can't create any more controls on this form or report."
I'm guessing I reached some type of limit that I was not aware of. How can I get around this?
I read somewhere that you can have more than one row of tab comtrols on a form. I have searched the forum for any threads or posts on the issue but can't find anything. Does anyone know how to do it?
View 2 Replies View Relatedis it actually possible to place a tab control within another tab control? every time i try to put one on it ends up beneath? would be good to have because even with one tab control my forms still look very busy!!
View 1 Replies View RelatedIs it possible to put a tab control on a page of a tab control?
And if so, how?
Everytime I try to fix another tab control on an already existing tab control, it places it on the form, not the control.
I have placed a tab control within a tab control (which I have done before). The problem is that the sub tab control appears on every page of the main tab form (encountered this before). I fixed it in the past by placing code on the on open event to make the sub tab control not visible unless the appropriate tab is selected. That worked fine.
I have tried this in the new program and find that when I set the value of the main tab form to 4 (the page index of the tab) the sub tab form will not display at all. However if I set it to zero it will display regardless of which tab is selected. Confusion has now set in :confused: . Any thoughts out there on what I have done incorrectly.
[/CODE]Private Sub Form_Open(Cancel As Integer)
'Me.OrderBy = "RankNo desc"
'Me.OrderByOn = True
If TabCtl44.Value = 4 Then
TabCtl144.Visible = True
Else
TabCtl144.Visible = False
End If
End Sub[CODE]
I have a main form which shows customer personal details including their budget and a subform which shows the costs for each course they book. The sub form has 4 boxes which I use to capture course fee, travel fees,subsistance and other expenses (along with other details such as course code etc). These cost details are stored in the table study_leave_recs in the respective 4 fields. I show on the subform the total spend for each course being booked using a calculated control. On the main form I use four dsum statements added together to show the total spend per customer.
=DSum("[COUR_ACT_FEE]","study_leave_recs ","BUDGET_HOLDER_ID=[study_leave_recs].[Form]![budget_holder_id]")+DSum("[COUR_ACT_TRAVEL]","study_leave_recs ","BUDGET_HOLDER_ID=[study_leave_recs].[Form]![budget_holder_id]")+DSum("[COUR_ACT_SUBSISTANCE]","study_leave_recs ","BUDGET_HOLDER_ID=[study_leave_recs].[Form]![budget_holder_id]")++DSum("[COUR_ACT_OTHER_EXPEN]","study_leave_recs ","BUDGET_HOLDER_ID=[study_leave_recs].[Form]![budget_holder_id]")
It works ok but is there a better way of doing this? Also is there any way I can use the resultant output to calculate / show the remaining budget (the budget is held in the general table "people"? I'm having trouble using the above statement to subtract the calculated spend from the budget box shown in the main form!!
I would appreciate any help, I seem to have spent ages on this on! Thanks in advance. Regards Peter
Hi,
I have a pretty standard form to enter data about contracts. Depending on the type of contract, the user will answer a yes/no type question, and the result will determine what set of information needs to be entered next. Since the variables are grouped intrinsically, I would like to make them visible or not depending on what is necessary. I know how to do this with just one control, but not several at a time. Is there a way to treat them as a group, and have the form make the group appear/disappear as needed, or do I have to list out each control everytime i need to do this? Any help would be much appreciated.
Carsie
I have application made in MS Access 2000
I got crazy with one Active X Control on one PC. On every other PC works fine but on this one I have error "Object is missing or does not exist".
I tried delete - copy - paste couple times, unregister and register control couple time, but error is still there.
Reference looks fine, I put control on the form and everything looks great.
I tried delete control from the form and put again.
When I try to assign some data to the control I have error "Object is missing or does not exists".
It's look like my Access programm see just as read only or something like that.
Does anybody have idea why my Active X Control does not work on this PC?
I am currently using a popup Calendar in Access "Calendar Control 9". I mousedown on a field and the Calendar pops-up. I select the date and it populates field1. So far, so good. After I select the date I need I would like for field2 to populate with a date that is exactly six months out from the date I selected for field1. Any suggestions.
I hope this can be done as it would help immensely.
Hi guys,
please give me some directions.
Recently I designed a form with several controls including both TextBox and Combox. Before I submit data by clicking the button, I use VBA to validate the values of those controls (textbox and combox). If the value is not valid, the system will eject a msgbox and automatically set the focus on that component. In order to tidy the code, I use a GoTo statement, which refers to a group of code to display the message due to the value of parameters
But it seems VBA doesn't recongize the control I set through the parameter.
The code as the following:
private function validation () as boolean
Dim ErrorMessage as string
Dim ErrorComponent as String
......
ErrorMessage="Please select the shop Name"
ErrorComponent="ShopName" // ShopNameis a combox
GoTo ExitFunction
.....
......
ErrorMessage="Please set the start date"
ErrorComponent="StartDate" // StartDate is a Textbox
GoTo ExitFunction
.....
ExitFunction:
msgResult = MsgBox(ErrorMessage, vbOKOnly, "Error Message")
Me(ErrorComponent).SetFocus
validation = False
Exit Function
=============
As I tested for seveal time, I'm sure there is something wrong with
"
msgResult = MsgBox(ErrorMessage, vbOKOnly, "Error Message")
Me(ErrorComponent).SetFocus
"
but how can I fix it?
Many Thanks
Hello,
I want to use a tab form where the user can click add, search, and edit records all from 3 tabs. The problem is I only want to be able to add data on one form, edit data on another, and just read only on the search. This seems to cause a dilemma, how can I specifiy them to add, edit, and read only on one form using tabs?
Mateo
Hey, I was messing about with tools>startup because I wanted a form to appear whent he database was opened.... I unchecked far too many options in there, and now I cannot design and modify my database anymore... it just goes straight to the form, but i cannot get anything back in design view.. is there a way to fix this??
View 2 Replies View RelatedIn my program I have a tab control with three tabs in it, how can I tell which tab currently has focus (which tab is activated) in VB? I checked all the properties of the tabs, and there's no GetFocus or Value or anything like that, so how do I do it?
View 3 Replies View RelatedI am new to Access and have not used VBA.
I have searched the forum on this, but I can't find an example of this problem.
I have a data entry form with a two-page tab control. One is for company info and the other for contact info. The recordsource is a query based on the two tables. Initially I had the page set up as a rather large form with a subform and decided to convert to the cleaner looking tab control (I used copy and paste to transfer the controls).
This form worked initially, but now I have changed some setting so that it doesn't work anymore: I can enter data properly on the first tab, but not on the second.
I have tried changing the various form properties but I must be missing something obvious. All my tab-less forms work the way I expect them to.
What I don't understand is why one tab works and not the other.
So I swear what I want to do isn't that difficult....ok so I can't get it to work, but I'm sure one of you gurus out there can. I hope =) At the very least tell me if it’s possible to do.
I have a form (Edit Expert) on this form is a combo box with a list of all the experts names. Below is a tab control with 2 tabs. Each tab has a subform on it with different info pertaining to experts. (contact info and education) what I want to happen is that when someone selects an expert, I want that experts info to be populated into the subforms. I have tried a macros (findExpert) that is attached to the after update property of the combo box. When there isn’t a tab control on the form and there is only one form, it works great, with tab control it says my filter isn’t based on a table or query and to use selectObject. However I have no idea what object to select. I have read the word doc that is floating around the forum about the syntax for main/subforms, but have gone in circles. However I am reasonably sure that that is were my problem is. I need to tell access to apply the filter to the subform on the tab control.
I tried to zip my db, but no matter what i do it's too big, so i hope this is enough info for you to go on. Please let me know if you need more information. Thanks a billion for your time and effort!! - me
I know this was mentioned and dealt with in another post, but I can't seem to find it.
Basically, I have a couple of text boxes that I would like to hide, unless told to be visible by a command button.
I'm trying to do this to save space on the form.
Someone a while back had mentioned setting the height of the control to zero and also setting the control to canGrow.
I tried this on a particular field and it didn't seem to work.
Any ideas would be a total help. Thanks all.
Scenario:
I have a form that allows the user to enter various parameters to build a dynamic query behind the scenes. There are 'flavors' to this query process. I have a combo box from which the user selects the query type, and then I want only the proper controls to display to support the query the user chose. I have attempted this using the following code:
Code:Dim ctrl as Control Select Case mdc_cboSelectChgType.ValueCase 1 'Cust Dist - AddFor Each ctrl In Me.ControlsIf InStr(ctrl.Tag, "mdc_ca") Thenctrl.VisibleEnd IfNext ctrlCase 2 'Cust Dist - Modify Case 3 'Cust Dist - Delete Case 4 'Pending Dist - Add Case 5 'Pending Dist - Modify Case 6 'Pending Dist - DeleteEnd Select
Each Case statement would be built out similar to that in Case 1. I use distinct values in the control's Tag property to determine which controls to perform the operations on.
The problem is, however, that the ctrl.Visible throws an error: Object doesn't support this property or method.
Any suggestions for how to get around this? I'm stumped...I really thought this was going to work well....
Thanks!
John
Hello,
I have a form with a lot of controls. To make it much more clear for users, I was thinking of adding tab controls or page breakes.
I have placed a tab control with two pages on my form and tried to move the existing controls on the required page but of course the control will show on all the pages.
Is there a way to bypass this without having to create a new form and placing controls one at the time?
Thanks
I have 17 textboxes in my form and I want to make them disabled on a click of a button. But all this will take a lot of code writing, 17 names.enabled=false....
Is there a way to make a collection of all the 17 textboxes, like "controlsTEXT" in which I can add all of them at once and can disable all of them just by one statement like this...
controlsTEXT.enabled=false
Is this possible? or is there an alternative??
I need to use various activeX controls in MsAccess2003. I downloaded a few activeX controls but I am having a problem with licensing. I registered the controls and the registration succeeded but when I try to add this ActiveX control on a form in MSAccess, I get the message that I don't have the license required to use this ActiveX control and that I should obtain the appropriate licence from the company that provides the licenced OLE object or ActiveX control. Any ideas on how to overcome this problem?
View 3 Replies View Related