*!*Init: this.RowSourceType= 0
*!*GotFocus Keyboard '{ALT+DNARROW}' Plain ClearThe click event of another control (ComboBox) contains:
SELECT style,descrip,colors,retail,uniqueid FROM catalog WHERE page =VAL(this.value) INTO array gathispage LOCAL lnDisplayCount lnDisplayCount = MIN(16,ALEN(gathispage,1)) thisform.combo1.RowSource= 'gathispage' thisform.combo1.ColumnCount = ALEN(gathispage,2) thisform.combo1.RowSourceType= 5 thisform.combo1.DisplayCount= lnDisplayCount thisform.combo1.Visible = .t. thisform.combo1.SetFocusThis accurately populates and displays the ComboBox.
*!*Click Event thisform.combo1.Visible = .f. thisform.combo1.rowsource = 0The desired action is to make the ComboBox invisible, but sometimes it only closes the DropDown List and a second click event is needed to make the ComboBox invisible. How can I make the ComboBox always become invisible on the first click?