Re: Organizing Constants for Easier Maintenance
- From: "Jim Edgar" <djedgar<removethis>@cox.net>
- Date: Fri, 14 Oct 2005 15:30:27 -0700
> Function GetCallouts(ByVal sScale As String) As String
> If InStr(sScale, "Detl") > 0 Then
> GetCallouts = sScale & " Detl Callouts"
> Else
> GetCallouts = sScale & " Callouts"
> End If
> End Function
>
Oops, I looked a little closer at your code and the following seems to be
what you're looking for.
Function GetCallouts(ByVal sScale As String) As String
If InStr(sScale, "Detl") > 0 Then
GetCallouts = "Detl Callouts"
Else
GetCallouts = sScale & " Callouts"
End If
End Function
.
- Prev by Date: Re: Toolbar button sizeing...
- Next by Date: Re: VB 6, SP 5 and Hyperthread
- Previous by thread: Re: Organizing Constants for Easier Maintenance
- Next by thread: Re: Organizing Constants for Easier Maintenance
- Index(es):
Relevant Pages
|