Visual Basic 6 - Programma Visual Basic (per un esame)

Ciao a tutti. Sono Alessandra di Viareggio. Sono onel panico più totale per l'esame di Informatica che dovrò fare martedi....
Ho appena finito tutto il libro ma devo presentare un programma in Visual Basic, che proprio non riesco a creare.

In pratica devo fare una programma che fa domanda a scelta multipla (su qualsiasi argomento). L'utente deve dire se è vero o falso. Il programmo deve contare le Vere e dire quante sono state. Dopo ogni risposta, se giusta, il programma deve rispondere "Bravo!", se sbaglio "hai sbagliato, mi spiace". Infine su 6 domande, se ne hai indovinate 5-6 deve dire "ottima preparazione", 3-4 "preparazione sufficiente", 1-2 "preparazione scarsa", 0 risposte esatte "Preprazione totalmente insufficiente".

Mi potreste aiutare per piacere....vi prego!!!!

allora dipende da come vuoi che il programma faccia le domande:

vuoi che le faccia una ad una attraverso msgbox a risposta multipla (yes o no) oppure vuoi che ogni domanda abbia un form a parte e poi in un form principale vengono memorizzate tutte le risposte?

Allora sono riuscita fare questo prgramma (dalle Marco di Word).
Ho fatto 5 domande, con risposta multipla (3 risposte: a,b,c).
E sono riuscita anche a far dare il giudizio.
Ho però un problemone....
Se io quando mi compare la domanda, scrivo invece di "a", "b", "c"...qualche altra stringa me la conteggia come sbagliata...invece vorrei che il computer mi dicesso che "Ho inserito una posisbilità sbagliata". Come faccio????
Con un ciclo Do...Loop Until....se sì come????
Vi prego aiutatemi

metti un if
se è diverso da una una risposta accettabile allora...

come scusa???

P4p3r0g4 non ha specificato il codice:allora lo posto io

Ho ipotizzato che tu metti tre checkbox , un button con il nome di conferma e una label che segnala la risposta giusta;
Nel button metti questo

Private Sub Command1_Click()
If check1.checked Then
Label1.Caption = "hai dato la risposta giusta"
End If
If check2.checked Then
Label1.Caption = "Hai sbagliato"
End If
If check3.checked Then
Label1.Caption = "Hai sbagliato"
End If
End Sub

P.S.La risposta naturalmente la puoi cambiare nei vari check

gius hai commesso una piccola disattenzione, infatti il tuo codice non funzionerà mai poikè

if check1.checked then non indica assolutamente niente

devi utilizzare questo codice

Private Sub Command1_Click()
If check1.value = checked Then
Label1.Caption = "hai dato la risposta giusta"
End If
If check2.value = checked Then
Label1.Caption = "Hai sbagliato"
End If
If check3.value = checked Then
Label1.Caption = "Hai sbagliato"
End If
End Sub

Scusavb6 c'è lo nell'altro computer e infatti mi scordavo che mancava qualcosa