No me muestra nada, cuando hago el label, en la rutina if del botton
asi que se me ocurrio ponerlo en el evento del radiobutton y
me dijo
Invalid attempt to read when no data is present.
Label22.Text = (Ctype(dr("Respuesta1"),Integer))
que te parece?