Como es posible deesplegar o tener el valor de una operacion en sql en la cual se realiza el conteo de x campo o suma y poder tenerlo este para manipular o realizar operaciones mi codigo es el siguiente
Dim rsGenerico As ADODB.Recordset
Dim cnConexion As ADODB.Connection
Dim strCadGenerica As String
Set cnConexion = New ADODB.Connection
cnConexion.CursorLocation = adUseClient 'para cliente
cnConexion.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & PathDatos & mdbDatosNom & ";"
strCadGenerica = "SELECT Sum(tblRelEventoTipoViol.IDTipoViolencia) AS SumaDeIDTipoViolencia "
strCadGenerica = strCadGenerica & "FROM tblNotificaciones INNER JOIN tblRelEventoTipoViol ON tblNotificaciones.IDNotificacion = tblRelEventoTipoViol.IDNotificacion "
strCadGenerica = strCadGenerica & "HAVING (((tblNotificaciones.Fecha) Between #01/01/2003# And #01/03/2003#) AND ((tblRelEventoTipoViol.IDTipoViolencia)=1));"
Set rsGenerico = New ADODB.Recordset
rsGenerico.Open strCadGenerica, cnConexion, adOpenDynamic, adLockReadOnly
Me.txtTotal1.SetText (rsGenerico.RecordCount)
Me.txtTotal1.SetText (rsGenerico.Fields(0))
Les encargo ayuda urge