[AccessD] A2000:Make Visible based on the looped integerreturned

Darren DICK darrend at nimble.com.au
Mon Jun 5 09:53:03 CDT 2006


Hi Liz

Thanks I did eventually work it out and yes - I used the same syntax you
suggested

Many many thanks  

Thanks for the swift reply - Gotta love this list and the legends on it :-))

Have a great day
 
Darren
------------------------------
T: 0424 696 433
 

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Liz Doering
Sent: Tuesday, 6 June 2006 12:47 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] A2000:Make Visible based on the looped integerreturned

On a form where there are twelve combo boxes which sometimes show and
sometimes don't, I've successfully used

For intCount = 1 To 12
            Me("cboActual1" & intCount).RowSource = "Actual"
Next intCount 

I would expect, in your example, Me( "txtProfile" &  intX).visible =
True should be the correct syntax.

Are you having trouble because the value of intX isn't matching the name
of your text box?  i.e., are you generating txtProfile0 when there isn't
one?


Liz


 

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Darren DICK
Sent: Monday, June 05, 2006 9:31 AM
To: 'Access Developers discussion and problem solving'
Subject: [AccessD] A2000:Make Visible based on the looped integer
returned

Hi All
 
Can't quite get the syntax right on this one
 
I am looping through an SQL statement
 
The Statement produces sequential numbers (as integers) 1,2,3,4,5 etc
 
e.g...
 
 rs!ProfileID will = 1 on the first loop
 rs!ProfileID will = 2 on the second loop etc etc until EoF
 
So far so good...
 
Based on those numbers I wanna loop thought the recordset  the number of
times
the dot recordcount allows 
 
and I want to make controls on the form - that end with the looped
Recordset
integer - visible or not
 
Code above and below my air code works fine - all the declarations are
OK
 
Air Code.....
 
dim strControlName as string
 
        For intX = 1 To rs.RecordCount
            strControlName = "txtProfile" &  intX.
            Me(strControlName).Visible = True
        Next intX
 
Anyone know what the correct syntax for the air code is??
 
Many thanks
 
Darren
 
-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com




More information about the AccessD mailing list