>>516
Command1.Style = 1