examen en Visual Basic 2005

[Aquaventus]

Hola coor podrias crear constructores en tus form a los cuales les pasas el puntaje de su respuesta e ir sumando con el puntaje de la respuesta actual y nuevamente pasarlo... Algo así :

Creas el constructor para tu 2do formulario al cual le vas a asignar el puntaje de la respuesta
del form anterior y lo iras sumando por ejemplo al apretar el boton "Siguiente Pregunta":

Código vb.net:

'Variable del cual obtendras el puntaje hasta el form anterior
    Dim total As Integer
 
    'Constructor  
    Public Sub New(ByVal _total As Integer)
        InitializeComponent()
        'Recibo el total enviado del form anterior
        'Y la asigno a mi variable para usarla
        total = _total
    End Sub
 
    Private Sub Pregunta3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Pregunta3.Click
 
    if radiobutton1.checked = true then
total= total+ 3
else
total= total
end if
 
        'Aqui le pasas
        Dim form As New Form3(total)
        'Oculto el form actual
        Me.Hide()
        'Muestro la siguiente pregunta
        form.Show()
        
    End Sub
 

Y de tu primer formulario le pasas el puntaje :

Código vb.net:

'Como es el primer form no se crea ningun constructor
        'Ya que no va a recibir ningun parametro
 
        'Sin embargo creas tu variable que iniciara la suma de todos
        'los puntajes
        Dim total as Integer = 0
 
Private Sub Pregunta2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Pregunta2.Click
 
    if radiobutton1.checked = true then
total= total+ 3
else
total= total
end if
 
        'Aqui le pasas
        Dim form As New Form2(total)
        'Oculto el form actual
        Me.Hide()
        'Muestro la siguiente pregunta
        form.Show()
        
    End Sub
 

Y para la ultima pregunta(ultimo form) solo recibes el parametro lo sumas el puntaje que obtengas ahora y lo muestras :

Código vb.net:

'Variable del cual obtendras el puntaje hasta el form anterior
    Dim total As Integer
 
    'Constructor  
    Public Sub New(ByVal _total As Integer)
        InitializeComponent()
        'Recibo el total enviado del form anterior
        'Y la asigno a mi variable para usarla
        total = _total
    End Sub
 
    Private Sub Puntaje_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Pregunta3.Click
 
    if radiobutton1.checked = true then
total= total+ 3
else
total= total
end if
 
        'Muestras el resultado
        MessageBox.Show("Puntaje Obtenido : " & total.toString())
 
    End Sub
 

Espero haberte ayudado. Saludos!..