Shifting fields up in the form if data is not present

  • Thread starter Thread starter Brian Beck
  • Start date Start date
B

Brian Beck

I have a form I've constructed in Access 2003 to display data that comes in
via a web form. One of the areas of the form asks for information on all
the individuals who were involved in a particular incident. Most times
there is only 1 or 2 people, but sometimes it goes as high as 7, and so I've
created fields from 1 through 7 to store the following data:

InvolvedFN_1
InvolvedLN_1
InvolvedPos_1
InvolvedRole_1
..
..
..
InvolvedFN_7
InvolvedLN_7
InvolvedPos_7
InvolvedRole_7

Now I'm sure there is a better way to handle this then simply adding more
fields in the event that someone submits a form with more then 7 individuals
involved, but I'm not really concerend about that at the moment.

My concern focuses on the form I'm using for editing and viewing the data.
Near the bottom of the form I have text boxes the display the data for
InvolvedFN_1 al the way to Involved_Role_7. I've written code that will
hide the text boxes when there is no data, but that still leaves me with a
big blank spot in my form when I don't have 7 involved individuals. How can
I get Access to not only hide those text boxes, but reclaim that form space,
so that everything on the form below those hidden boxes shifts up to cover
up that now empty space on the form?

Any ideas?

-Brian Beck
 
Brian said:
I have a form I've constructed in Access 2003 to display data that comes in
via a web form. One of the areas of the form asks for information on all
the individuals who were involved in a particular incident. Most times
there is only 1 or 2 people, but sometimes it goes as high as 7, and so I've
created fields from 1 through 7 to store the following data:

InvolvedFN_1
InvolvedLN_1
InvolvedPos_1
InvolvedRole_1
...
InvolvedFN_7
InvolvedLN_7
InvolvedPos_7
InvolvedRole_7

Now I'm sure there is a better way to handle this then simply adding more
fields in the event that someone submits a form with more then 7 individuals
involved, but I'm not really concerend about that at the moment.

My concern focuses on the form I'm using for editing and viewing the data.
Near the bottom of the form I have text boxes the display the data for
InvolvedFN_1 al the way to Involved_Role_7. I've written code that will
hide the text boxes when there is no data, but that still leaves me with a
big blank spot in my form when I don't have 7 involved individuals. How can
I get Access to not only hide those text boxes, but reclaim that form space,
so that everything on the form below those hidden boxes shifts up to cover
up that now empty space on the form?
Click to expand...


First you need to move the invisible controls to the top of
the footer section:
Me.InvolvedFN_x.Top = 0
Me.InvolvedFN_x.Visible = False
. . .
Me.InvolvedRole_x.Top = 0
Me.InvolvedRole_x.Visible = False
. . .

Then you can adjust the height of the footer:
Me.FormFooter.Height = . . .

Finally, set the form's display height:
Me.InsideHeight = Me.Detail.Height + Me.FormHeader.Height
+ Me.FormFooter.Height
 
Back
Top