select all field on form in code

[tziviak2]

how do I select all the fields on the form in code-because I want to move the top value of the fields?

 

[glalsop]

Something like this:

Dim ctl As Control

For Each ctl In Me.Controls
   'Do stuff to controls
Next ctl

-Gary

 

[dhookom]

I would write code to loop through the controls and set the top property.
Dim ctl as Control
For Each ctl in Me.Controls
ctl.Top = ctl.Top -360
Next

Duane
MS Access MVP
[green]Ask a great question, get a great answer.[/green]
[red]Ask a vague question, get a vague answer.[/red]
[green]Find out how to get great answers faq219-2884.[/green]
[blue]Ask me about my grandson, get a grand answer.[/blue]

 

[tziviak2]

thank u--it seems to be the right thing to do=but I don't see it working-I put the code-in the on-open of the detail section
is this correct (all the fields are there)

 

[tziviak2]

here is the code:
Select Case Me!MONTH
Case 9
For Each ctl In Me.Controls

ctl.Top = 1

Next

Case 10
For Each ctl In Me.Controls
ctl.Top = 2
Next
End Select

maybe because it's looking for the info-in one of the fields in the form???-so it's too late?

 

[dhookom]

There is no "On Open" of the detail section. I expect your Top values are set in TWIPS where one twip is 1/1440".

Duane
MS Access MVP
[green]Ask a great question, get a great answer.[/green]
[red]Ask a vague question, get a vague answer.[/red]
[green]Find out how to get great answers faq219-2884.[/green]
[blue]Ask me about my grandson, get a grand answer.[/blue]

 

[tziviak2]

I meant the on format-what where can I put my code-so that it works?