Visual Basic - SUMA R REGISTROS

tengo una base de datos que se llama "registros.mdb" con 20 registros la tabla se llama "lpregun" con los campos r1, r2, r3, el programa consiste en revisar unas pruebas pero como puedo saber cuantos alumnos respondieron la alternativa "A" del campo r1 y que me imprima el total en un label.
espero que me puedan ayudar... gracias

Que conexion estas utilizando????
Bueno suponiendo que estas Uitlizando ADO, quedaría
Dim Rec As ADODB.Recordset
Dim sql As String
Dim cnbase As ADODB.Connection 'Variable de Conexion
'Esto lo adaptas a tu codigo
sql="Select * From lpregun Where r1='A'"
Rec.Open sql, cnbase, adOpenDynamic, adLockOptimistic
Label1=Rec.RecordCount 'Total de Registros con r1='A'