-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
On Aug 10, 2006, at 7:01 PM, Lennox Jacob wrote:
How can I simplify this code?
Protected Sub SetupColor(Extends EF as Editfield)
If EF.text = "" then
EF.backcolor = &cDBDBDB
else
If val(EF.text) > 18 then
EF.backcolor = &cFF8CC8
else
EF.backcolor = &cF9FFCF
end if
end if
End Sub
And then just call it:
EF1.SetupColor
EF2.SetupColor
EF3.SetupColor
EF4.SetupColor
EF5.SetupColor
Christian
Pariahware, Inc. Custom Software
<[EMAIL PROTECTED]>
<http://www.pariahware.com>
- --
God loved you so much that He gave His only son Jesus. What have you
done with God's gift?
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.3 (Darwin)
iD8DBQFE28aUvplmRR9PMqERAhjZAJwPV4jbMk/U3ZSNvhD4cRSIQ79S7wCfWuXv
qRu/JM/4VyTtIApIZ5TobW8=
=yMn+
-----END PGP SIGNATURE-----
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>