You can shortcut this a bit with this code:

If Type("Thisform.Command1.Name") = "C"


>>If TYPE("Thisform.Command1")="O" And Not IsNull(Thisform.Command1)
>> =messagebox("It really exists!")
>>Endif
>
>Thanks Edward, You have been doing a good job for me in these days