Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Form Input Step1, Step2, Step3 ...

Status
Not open for further replies.

matrixindicator

IS-IT--Management
Sep 6, 2007
418
BE
Hello,

Drawing the situation. I have a single simple Order Input Form. In these form there are 4 parts.
1. Who enters the order.
2. Client Addresse selection.
3. Delivery Date (Calender ms access object).
4. Articles (subform).

The input should follow these order (1 > 2 > 3 > 4).
The wish I have is to compose a new order on starting with one screen (1. Who enter the data), if this is completed show the second part and so on.... It should be this way, because we also like to work afterwards with a touch screen.

Any creative mind can giving ideas on how to do this ?
eg, 4 screens ? or hidden parts of one form and activate when the previous is filled in ? or pop-up forms ? Of course it must be technical possible, strong, stable.
 
How are ya matrixindicator . . .

How about controling the visibility of 4 subforms ... one for each step. Show 1, hide the others!

See Ya! . . . . . .

Be sure to see thread181-473997 [blue]Worthy Reading![/blue] [thumbsup2]
Also faq181-2886 [blue]Worthy Reading![/blue] [thumbsup2]
 
An idea, but only one subform (4. Articles). Could you hide rectangles (1., 2. and 3.) and his content ?
 
I would probably just set the visible property of controls. You can easily set the Tag property based on the "order". Then create a function that loops through all of the controls and sets visible to true or false based on some calculation. The code might look something like:
Code:
Function ShowHide()
Dim ctl as Control
Dim intOrderNum as integer
intOrderNum = 'your stuff here
For each ctl in Me.Controls
    If IsNumeric(ctl.Tag) Then
        ctl.Visible = (Val(ctl.Tag) <= intOrderNum)
    End If
Next

Duane
Hook'D on Access
MS Access MVP
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top