Originariamente inviato da ladyBlu
fammi capire bene,
tu vuoi caricare un recordset con una select sulla tabella fornitori e caricare la combo solo se esiste almeno un fornitore, giusto?

bene, se così fosse utilizza la sub Form_Load() controllando la proprietà RecordCount del recordset, in questo modo:
codice:
Private Sub Form_Load()

   CnOrdNCli.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data " & _
                  "Source=GetsMag.mdb;"
   CnOrdNCli.CursorLocation = adUseClient
   qOrdNFor = "SELECT * FROM Fornitori"
 
   RsOrdNFor.Open qOrdNFor, CnOrdNCli, adOpenDynamic, _
              adLockOptimistic

   If RsOrdNFor.RecordCount = 0 Then
            MsgBox "Nessun Fornitore esistente per creare " & _
                   "un ordine"
       Else
            'Questa attività se esistono fornitori
            Inizializza_Combo 
            ControlloDB = False
   End If
  
End Sub
Ok, con il recordcount posso sfruttare una caratteristica dell'oggetto, a cui non avevo pensato. Grazie.
Ma il problema rimane. Nel senso che io ho la necessità di testare questa condizione ogni volta che entro nel form.
Io quando passo da un form ad un altro li nascondo solamente:
codice:
Private Sub cmdPrincipale_Click()
frmOrdineNuovo.Hide
Principale.Show
End Sub
qusto significa che se metto la condizione nel Form_Load, la condizione è verificata solo la prima volta che lo carico e non ogni volta che lo visualizzo.