Pode fazer assim... Código: DEFINE VARIABLE iCont AS INTEGER NO-UNDO. DEFINE VARIABLE iTot AS INTEGER NO-UNDO. ASSIGN iTot = INT64(cCombo:NUM-ITEMS). DO iCont = 1 TO iTot: cCombo:DELETE(1). END.
Você pode usar os atributos LIST-ITEM e LIST-ITEM-PAIRS, você os limpa e o combo-box fica vázio. Segue ex.: Código: COMBO-BOX-1:LIST-ITEM-PAIRS = ",".