Problemino
se metto
AnteprimaConta = DCount("*", "[PagamentiAnnuale]", "[IDAnnuale]=25")
AnteprimaConta ha n° dei record contenuti nella tabella Pagamenti annuale dove IDAnnuale = 25
ma se lo faccio con il codice seguente non prende nessun valore ... dove sbaglio ?
Private Sub ComandoPagamenti_Click()
Dim Saldo As Variant
Dim AnteprimaConta As Integer
Dim IDAnnualevar As Integer
IDAnnualevar = Me.IDAnnuale.Value
MsgBox "valore IDAnnuale " & IDAnnualevar
AnteprimaConta = DCount("*", "[PagamentiAnnuale]", "[IDAnnuale]=IDAnnualevar")
MsgBox AnteprimaConta