Re: IIf syntax

> Sorry, I misunderstood where your error was.
>
> But try this, you may find the results interesting....
>
> Public Function f1(a As Integer)
>   Print a; TypeOf(a)
> End
>
> Public Function f2(a As String)
>  a = "a string"     'Line 5
>  Print a; TypeOf(a)
> End
>
> Public Sub Main()
>  Dim i As Integer
>  For i = 0 To -1 Step -1
>    IIf(i, f1, f2)(1)
>  Next
> End
>
> On Fri, Mar 16, 2012 at 1:46 PM, Emil Lenngren <emil.lenngren@...
> >wrote:
>
> > What do you mean? None of f1 or f2 has a return type...
> >
> > /Emil
> >
> > 2012/3/16 Randall Morgan <rmorgan62@...>
> >
> > > I suspect that since you are declaring a return type on your functions
> > that
> > > the functions default to an integer return type. Try it and see...
> > >
> > > On Fri, Mar 16, 2012 at 11:20 AM, Emil Lenngren <
> emil.lenngren@...
> > > >wrote:
> > >
> > > > Hi. I wonder if this syntax is intended to be allowed ;)
> > > >
> > > > Public Function f1()
> > > >  Print "f1!"
> > > > End
> > > >
> > > > Public Function f2()
> > > >  Print "f2!"
> > > > End
> > > >
> > > > Public Sub Main()
> > > >  IIf(True, f1, f2)()
> > > > End
> > > >
> > > > It prints out "f1!" ...
> > > >
> > > > But in this code:
> > > > Public Function f1(a As Integer)
> > > > End
> > > >
> > > > Public Function f2(a As String)
> > > >  a = "a string"     'Line 5
> > > > End
> > > >
> > > > Public Sub Main()
> > > >  Dim i As Integer
> > > >  For i = -1 To 0
> > > >    IIf(i, f1, f2)(1)
> > > >  Next
> > > > End
> > > >
> > > > I get this message: MMain.f2.5: #6: Type mismatch: wanted Integer,
> got
> > > > String instead
> > > > Which is weird because isn't the a argument of type String? ;)
> > > >
> > > > /Emil
> > > >
> > > >
> > >
> >
> ------------------------------------------------------------------------------
> > > > This SF email is sponsosred by:
> > > > Try Windows Azure free for 90 days Click Here
> > > > http://p.sf.net/sfu/sfd2d-msazure
> > > > _______________________________________________
> > > > Gambas-user mailing list
> > > > Gambas-user@...
> > > > https://lists.sourceforge.net/lists/listinfo/gambas-user
> > > >
> > >
> > >
> > >
> > > --
> > > If you ask me if it can be done. The answer is YES, it can always be
> > done.
> > > The correct questions however are... What will it cost, and how long
> will
> > > it take?
> > >
> > >
> >
> ------------------------------------------------------------------------------
> > > This SF email is sponsosred by:
> > > Try Windows Azure free for 90 days Click Here
> > > http://p.sf.net/sfu/sfd2d-msazure
> > > _______________________________________________
> > > Gambas-user mailing list
> > > Gambas-user@...
> > > https://lists.sourceforge.net/lists/listinfo/gambas-user
> > >
> >
> >
> ------------------------------------------------------------------------------
> > This SF email is sponsosred by:
> > Try Windows Azure free for 90 days Click Here
> > http://p.sf.net/sfu/sfd2d-msazure
> > _______________________________________________
> > Gambas-user mailing list
> > Gambas-user@...
> > https://lists.sourceforge.net/lists/listinfo/gambas-user
> >
>
>
>
> --
> If you ask me if it can be done. The answer is YES, it can always be done.
> The correct questions however are... What will it cost, and how long will
> it take?
>
> ------------------------------------------------------------------------------
> This SF email is sponsosred by:
> Try Windows Azure free for 90 days Click Here
> http://p.sf.net/sfu/sfd2d-msazure
> _______________________________________________
> Gambas-user mailing list
> Gambas-user@...
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>