VB6SP6で、ある文字列値がCBoolで変換できる値か否かを調べる関数とかって無いの?

"0"、"1"、"false"とかならTrueを返し
""、"a"、"t"とかならFalseを返すみたいな

今はOn Error Resume NextでCBoolに掛けちゃってるけど、もっと良い方法ある?