Suppose I have a form "na",
I want to create another form using the VB, the form style and format as sama as the "na", all the fields are same, same positions.
Dim frm As Form
Set frm = CreateForm(, "na")
DoCmd.Restore
frm.RecordSource = "na"
I tried these code, the code is created based on "na", but it still needs to add the fields, and it will automatically open the design view to design, i want to VB to copy the "na" design to the new form.
How can I write? Does VB copy the same design and format to the new form?
Please let me know,
Thanks.
In my current database there seems to be two different types of borders in my pop-up forms! The best way to explain it is that some forms will have the Access style border while others have the glass style border that you see in windows. I can't seem to find any settings that will change this or even determine what causes it.
I have created a master form, which is a tab style. I have five additional forms that I want to use as sub-forms within each tab. I also want to include master navigation buttons that will work for each sub-form in unison. In other words if I navigate to record 10 on tab 1 and switch to tab 2, I want the new tab to show the information related to record 10. It would appear that I need to link them together in some fashion.
How do I copy a form from one database that have reports and quaries linked to it to another so that I can change the information in the new database and keep the form style in the old database?
I have a form which I use for many different tasks, in order to save database size, reuse code and keep things at their simplest. Sometimes, I'll click a button to open the form which will only show specific filtered data in "Form" view, using a default "Dialog" border style. Sometimes, I click another button which opens the same form, filters different data and displays the form in "DataSheet" view, but this time, I want the borderstyle to be "Sizable".
What I need is a line of VB code which will force the form to open-up with "Sizable" borderstyle, regardless of the form's Design view settings.
Something that would look like this (which obviously doesn't work):
I am currently creating a database to link together a maintenance system and a conditional reporting system and I’ve run into a little problem.
I am trying to create a form for assigning skills to a given contractor (contractor selected via a combo box (cboContractor)) by transferring selected items from a list box on the left (lstAvailable) to a list box on the right (lstselected). (much like any windows wizard would) This is done through the 4 buttons cmdSelect, cmdSelectAll, cmdDeselect, cmdDeselectAll.
Now it has been a long time since I have had to work with VB and I am struggling a little to create the required coding to pass data from one listbox to the other.
For reference:
CboContractor takes information from tblContractor. The data is ContID and ContName and the bound column is 1. LstAvailable takes information from tblSkills. The data is SkillID, SkillComm and SkillNotes. Bound column is 1 LstSelected will place data into tblcontskills. Tblcontskills has the fields, tcsID, ContID, SkillID
Can anyone help or does anyone know where I can find some good examples on the net as I have browsed through the search pages here and not really found a great deal that is valid
how to make my form controls change size / position as my form is resized / loaded on a computer with a different resolution. Several of the tutorials out there suggest putting code on the "on resize" property of the form. When I looked at the Northwind database to try to mimic their code however, it looks like they must be doing something different as there is no on resize code under the form properties and I was unable to find the code they do use.
I have several forms that can be called from more than one other form, but I need to build my forms so that the user is returned to the form from which they started.
I have looked in the help files and FAQ and I can't find what I am looking for.
Please, can someone direct met to the required information or tell me how to achieve this?
I would like to genreate a query from a form. So when I want to run a monthly report for a month I can pick a mont or a date range and a criteria for the form such as crew meetings attended, paperwork in on time or up to seven different points of interest for a particular person.
I can do this relative simple in parameter query, but he users want a more efficient input form. Or maybe the word i "quicker". And if they use a drop down box from a data table to start the form/query, there won't be as many input errors.
Greetings. I have three forms that are open at the same time. They are related and cascading. The first form (frmEventAdd) is the anchor. Each event can have many Trials. The second form is frmTrialInfo. Each Trial can have three Classes. The third form is frmClassInfo. These forms are used for update and adding new records.
The user displays an event for update (frmEventAdd). Then clicks on a button to display the Trials for that event (opens frmTrialInfo). frmTrialInfo displays information for one Trial at a time. The user clicks on a button to display class information for that trial (frmClassInfo).
One of the fields on frmClassInfo is called cboJudge. It's a combobox with names of Judges (judges of dog competitions). The judge information in the combobox comes from two tables: tblPeople and tblJudges. If the user wants to add a new judge they may click on the btnNewJudge. btnNewJudge will open a form that is used to add a new person (frmPeople).
Because frmPeople is opened from many different points in the application, I found it easier to simply make the three, already opened, forms INVISIBLE. So...command button btnNewJudge opens frmPeople and makes frmEventAdd, frmTrialInfo, and frmClassInfo INVISIBLE.
When frmPeople is closed (btnClose), it checks to see if each of the previously opened/visible windows is open and then makes each VISIBLE, again. frmEventAdd and frmTrialInfo reappear just fine. However frmClassInfo does not.
I have traced the btnClose_Click routine in frmPeople and it certainly looks like every line of code is being hit, but the line that should make frmClassInfo visible does not do anything (nor does it generate any error).
Here is the code from btnClose_Click in frmPeople. Can you help me?
********************************************
Private Sub btnClose_Click() On Error GoTo Err_btnClose_Click
Dim blnEventAdd_Open As Boolean Dim blnTrialInfo_Open As Boolean Dim blnClassInfo_Open As Boolean
blnSecondChance = False
If blnDataChanged = True Then If DataHasChanged() = vbYes Then Call btnSave_Click End If End If
'================================================= ======================================= 'blnSecondChance=False = NO SECOND CHANCE ... Close this Form 'blnSecondChance=True = USER GETS A SECOND CHANCE ... Do NOT Close this Form '================================================= ======================================= If blnSecondChance = False Then 'Zero out Relative Record Number from Array svRecNo(intCallerIX) = 0 blnDoUpdate = False blnDataChanged = False DoCmd.Close acForm, Me.Name
'Is the frmEventAdd form open? blnEventAdd_Open = SysCmd(acSysCmdGetObjectState, acForm, "frmEventAdd") And _ acObjStateOpen
'Is the frmTrialInfo form open? blnTrialInfo_Open = SysCmd(acSysCmdGetObjectState, acForm, "frmTrialInfo") And _ acObjStateOpen
'Is the frmClassInfo form open? blnClassInfo_Open = SysCmd(acSysCmdGetObjectState, acForm, "frmClassInfo") And _ acObjStateOpen
If blnEventAdd_Open Or blnTrialInfo_Open Or blnClassInfo_Open Then If blnEventAdd_Open Then Forms("frmEventAdd").Visible = True Forms("frmEventAdd")!cboContact.Requery Forms("frmEventAdd")!cboSecretary.Requery End If
If blnTrialInfo_Open Then Forms("frmTrialInfo").Visible = True Forms("frmTrialInfo")!cboTrialRep.Requery End If
If blnClassInfo_Open Then Forms("frmClassInfo").Visible = True Forms("frmClassInfo")!cboJudge.Requery End If
intCallerIX = intCallerIX - 1 Else DoCmd.OpenForm PopCaller(), acNormal End If End If
I have a query by form named QBF_Form, I use it to help users query a form without having to open the query directly. A query, Cert, is based on this form using expressions like: Like Forms!QBF_Form!Sales & "*" Or Forms!QBF_Form!Sales Is Null
This Cert query is a source for a form called Manage. I have a macro to open the "Manage" form, run the Cert query, and close the query . Everything works fine when I do this.
But when I click on the Manage form directly, I get this: Enter Parameter Value: Forms!QBF_Form!Sales
How can I prevent this from happening? How can I change the logic?
I have a form that has a subform in it. I want the key field in the form to dictate what fields show up on the subform. When I try to set the Link child and master fields, I get a 'can't build a link between unbound forms'. How do I make this subform bound to the form????
Hi, I am new to Access. Pardon me if I post it in a wrong post. I've a field name "HotelAmt" in "Meeting Members " table. I've four fields on the form 1.Hotel arrival date 2. hotel depart date 3. Hotel Cost/night 4.Total Amt. All these fileds are in Meeting Members table. I gave the formula to calculate "Total Amt = ([Hotel Depart date]-[hotel arrival date])*hotel cost" I put this formula on Total Amt field on the form (properies-control source). This one is working on the form. My question is, when i make query for this to pull total Amt, its coming $0 (defalult) . I checked back in the Table, there its not inserting the Total Amout. Anyone can you please give me the answer.
I am trying to make a class attendance form, where user chooses classType ex:"English, French" then the program shows all of the students from tblStudents that are enregistered in that class. And some how make it so that user could select on or many users in the same class and press add button which will add the students into attendance table for the current class and the current day,
**Allso what I would like to do if possible after the form above works, is to if the student has been allready added for the current day, the check box becomes un editable with appropriable comment in the comments line for that student or for examples the student registered for 12 classes, the attendance keeps track of the classes and when the student tryed to go to 13'th class the check box is uneditable and in the comments line for that student metions the reases.
I have form containing some filtered records. What code do I need to put on a button to trigger a make-table query; the make-table thus containing only the current filtered records (not the entire database).
Okay this i definately need help with. I want my form to behave in the same manner as a datasheet in that it just displays rows of data. I want to create this how do i do that.
I have a form display project hours and also caculation of total for each project.
A user can spend time on multiple projects each day, I would like all zero invisiable. I had tried to set all default values to null (nothing) instead of zero. It causes problem in caculation of total.
I remember in Excel, it can make zero not to display, can we do this on an Access Form?
(Something I also want to know if this is possible. This is a time sheet, is anyway we can do on the form that projects (records) can be displayed horizonatally (on the top) while the dates can be displayed vertically (on the left), ,more like a transposed. But it would not change the struture of database (just display) so the date remains a field and projects are records.)
Access 2003 Database for tracking job search/applications I have three tables: Job (includes employer, contact) and Contact (First name, Last name, employer), and Employer (Employer name)
Form.Job is the main data entry mechanism. On this form, I enter the job details. I select the employer from a combo-box that draws from the Employer table. I would like to select the contact from a combo-box that filters contacts and shows only those that match the Job.Employer selection.
:confused: 1. How can I make a bi-directional link so that a new entry in the employer combo-box creates a new entry in the employer table? At the moment, I get around this with a "New employer" button on Form.Job that just opens up the employer table, but there seems to be an updating issue - new names don't show up in the combo-box for a while
:confused: 2. How can I get the contact combo-box to show only contacts with an employer that matches the employer selected in the employer combo-box?
Note that I got this to work once by using a sub-form, but I don't really understand how (presumably Access defaults that did what I wanted), and I don't want to have to use a sub-form.
how do i make the fields in my form uneditable(cannot delete or add but can copy a field from form), i tried setting the properties..allow additions deletions by setting it to no, but even then when i open the form and when data is dispalyed , if i go jus delete (say address field)a field it just gets deletd, i tried locking the fields too!..nothing worked, so how do i do this,? p.s IF i set allow edits to No then i am not able to copy the field (say name has to be copied and pasted into another application or something) how could this be accomplished. tried setting it in VBA as formname.form.allowdeletions=false , still no luck!
When a certain button on a form is click it makes a sub form become visible, I am trying then to make this form exclusive aka, must be complete and stop the user clicking on the main form until this sub form has been complete.
I have built a database and setup my Queeries and Reports and setup my securities. What I want to do is make the Form open from a short cut. I can create the short cut with the security privilages but after the proper name and password is entered I want it to open straight into the Form. How do I get my database to do this?
After data is entered into text box, on the "On Enter" event, how do I make it click a button on the form?Similar to the effect of when you enter your username then password, most people just hit enter on the keyboard to auto click the login button.