Added SampleVbModelessFormCommand.vb