[AccessD] Select Multiple records on form

Gustav,

Thanks for the compliment.  As I started going through the code line by 
line...it got more confusing.  Apparently the function "Fn_SelectedBlock" 
goes through each control...but 1 record at a time.  The thing is if you are 
stepping through the code...when it gets to where it calls 
"Fn_SelectedBlock"...it does NOT go there...it just continues on...then when 
you get to the end of the code(hit F8 1 last time on END SUB)...it zips 
through the function"Fn_SelectedBlock", without breaking.

This code, in my opinion, is doing something very 'cool'...almost what I 
need...but just out of my understanding.

Thanks,

Mark A. Matte


>From: "Gustav Brock" <Gustav at cactus.dk>
>Reply-To: Access Developers discussion and problem 
>solving<accessd at databaseadvisors.com>
>To: <accessd at databaseadvisors.com>
>Subject: Re: [AccessD] Select Multiple records on form
>Date: Mon, 15 May 2006 18:53:48 +0200
>
>Hi Mark and A.D.
>
>Sorry A.D. - didn't notice that. You normally know very well what you are 
>doing but this With .Add(..) thingy looks strange to me.
>It may be perfectly OK ... but 3 seconds?
>
>/gustav
>
> >>> markamatte at hotmail.com 15-05-2006 18:39 >>>
>Gustav,
>
>A.D.Tejpal sent this code...I hate to admit...but I don't quite understand.
>I've tried to step through the code...but it doesn't do the
>"Fn_SelectedBlock" part until after I finish stepping though( I can 
>actually
>see the VBA window "zip" through that function...after it appeard to be
>done) if that makes any sense???...and in all honesty I'm not sure what to
>change.
>
>Thanks,
>
>Mark A. Matte
>
> >From: "Gustav Brock" <Gustav at cactus.dk>
> >Reply-To: Access Developers discussion and problem
> >solving<accessd at databaseadvisors.com>
> >To: <accessd at databaseadvisors.com>
> >Subject: Re: [AccessD] Select Multiple records on form
> >Date: Mon, 15 May 2006 18:30:29 +0200
> >
> >Hi Mark
> >
> >      With Me(ControlName).FormatConditions
> >        .Delete
> >         Cdn = "Fn_SelectedBlock(ID) <> 0"
> >         With .Add(acExpression, , Cdn)
> >           .BackColor = 16777164
> >           .FontBold = True
> >         End With
> >      End With
> >
> >That code looks clunky to me. Did you try changing it to something that
> >specifically Set a FormatCondition object, then adjusts properties
> >BackColor and FontBold of this?
> >
> >/gustav
>
>
>--
>AccessD mailing list
>AccessD at databaseadvisors.com
>http://databaseadvisors.com/mailman/listinfo/accessd
>Website: http://www.databaseadvisors.com