Me parece que no le captaste al idea a rootk
Tienes un update en RadioButton1_CheckedChanged que cambia con una update
aumentando en uno respuesta1.
Lo primero que me planteo es y si el aumento tiene que ser respuesta 2 donde lo cambias en la base de datos???
Yo simplemete lo que haria sin utilizar el add.tostring ese.....
tendria las 5 opciones en un radiobuttonlist (si cada vez solo puede elegir uno)
Si tinees un boton ok que creo q es lo q kieres utilizar
en ses boton dependiendo de cual este clikao hacer la update de esa respuesta:
Dim DS As DataSet
Dim MyCommand As SqlCommand
If RadioButton1.Checked = true then
Dim UpdateCmd As String ="update Formulario set Respuesta1 = "& (Ctype(dr("Respuesta1"),Integer) + 1) & " + 1 where formulario = 2"
Else If RadioButton2.Checked = true then
Dim UpdateCmd As String ="update Formulario set Respuesta2 = "& (Ctype(dr("Respuesta2"),Integer) + 1) & " + 1 where formulario = 2"
Else If RadioButton3.Checked = true then
...
Else If RadioButton4.Checked = true then
...
Else If RadioButton5.Checked = true then
...
end if
Algo asi,teniendo por supuesto que hacer la consulta como haces al principio
El whlie dr.read tiene sentido ponerlo?? entiendo q solo te devolvela un registro la consulta "Select Respuesta1, Respuesta2, Respuesta3, Respuesta4, Respuesta5 from Formulario where FormularioID=2"