subform name on control tab weirdness

[pietlinden]

I have a stupid question (so finish swallowing now... I don't want to
be accused of any beverage-related mishaps).

I have a form with several subforms, with each subform on a separate
tab. I'm trying to loop through the subforms so that I can set the
caption of the tabcontrol page to something like <SubName>
(recordcount)

Okay, now the two dumb questions...
1. why do these subforms think they're called "tbl..." when I saved the
subforms with a "sfrm" prefix?

for a sanity check, I looped through the form's controls and got some
weird results - the forms were'nt always named "sfrm...", some were
"tbl..."

Dim ctl As Control
For Each ctl In Me.Controls
'If Left$(ctl.Name, 4) = "sfrm" Then
' Debug.Print ctl.Name
'End If
If TypeOf ctl Is SubForm Then
Debug.Print ctl.Name
End If
Next ctl

okay, second dumb question - to eliminate the mad blinking caused by
the OnCurrent event of the mainform requerying the subforms... should I
use just the subform's RecordCount property?

I have Keri's article from AccessWeb (examples of syntax for referring
to various objects) - I'm just trying (in vain) to figure out how to do
this right

Do you use .RecordsetClone .Recordcount in this instance?

Thanks!
Pieter

[MGFoster]

pi********@hotm ail.com wrote:

<SNIP>

I have Keri's article from AccessWeb (examples of syntax for referring
to various objects) - I'm just trying (in vain) to figure out how to do
this right

Do you use .RecordsetClone .Recordcount in this instance?

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Using DAO:
You can use .Recordset.Reco rdcount, but, because the Recordcount
sometimes isn't correct until you've hit the last "record" I usually use
the RecordsetClone - i.e.,

Set rs = Me.RecordsetClo ne
rs.MoveLast
rs.MoveFirst
Debug.Print rs.RecordCount

If I did that w/ the .Recordset the form would show the movement &
confuse the user.
--
MGFoster:::mgf0 0 <at> earthlink <decimal-point> net
Oakland, CA (USA)

-----BEGIN PGP SIGNATURE-----
Version: PGP for Personal Privacy 5.0
Charset: noconv

iQA/AwUBQuVF84echKq OuFEgEQKatQCfd/fgDXsr9rvbhJKwT rDiS8U/f0EAoKrL
2OLLlOG0wJoOicK/IpBMvGQW
=baQM
-----END PGP SIGNATURE-----

[pietlinden]

oh, I am sooo S-M-R-T! How about

Application.Ech o False
'do all the recalculating
Application.Ech o True

SOmetimes you have to reintroduce yourself to the Help file... I'm so
bright it hurts my eyes.