Salve a tutti, scrivo per cercare di chiarire un mio dilemma. Come si può vedere dalle foto allegate ho creato un piccolo programmino in grado di eseguire 4 banali calcoli su vb6. Premetto inoltre che prima di postare in questa sezione ho fatto una ricerca in questo sito ma senza brillanti risultati. Vi spiego vorrei che il programma in questione non appnea l'utente schiacci il command1button e nell'ipotesi un cui 3 dei campi ove inserire dei dati numerici fossero lasciati vuoti scatterebbe una msgbox con scritto Inserire Valori. Stesso dicasi anche quando nella textbox Saetta il risultato fosse inferiore di 10 scattasse un'ulteriore msgbox con scritto Inserire Corda 2 , cioè una nuova corda. E' fattibile tutto ciò?
P.s. Rivolto ai moderatori: Ho letto le guide su vb6 ma con tutto ciò non sono stato in grado di sfatare il mio dilemma, ma nel caso lo riteniate opportuno potreste anche cancellarlo.
Ringrazio a tutti anticipatamente.
Posto anche il codice nel caso in cui i link non dessero nessun risultato:
Private Sub command1_click()
Dim Cateto2 As Double

If Len(Me.Altezza) = 0 Or Len(Me.Conicità) = 0 Then
MsgBox "Inserire Valori"
End If

Tangente.Caption = Conicità.Text / Altezza.Text
Arcotangente.Caption = Atn(Tangente)
Seno.Caption = Sin(Arcotangente)
Cateto.Text = Corda / 2
Ipotenusa.Text = Cateto / Seno
Cateto2 = Sqr(Ipotenusa ^ 2 - Cateto ^ 2)
Saetta.Text = Ipotenusa - Cateto2
Diametro.Text = (Corda ^ 2 / (4 * Saetta) + Saetta) / 2


If Saetta.Text < 10 Then
Dim Cateto3 As Double
MsgBox "Inserire una nuova Corda (Corda2)"
Cateto3 = Sqr(Ipotenusa ^ 2 - (Corda2 / 2) ^ 2)
Saetta2.Text = Ipotenusa - Cateto3
End If
End Sub

Foto1)
http://www.megaupload.com/?d=BH4IMD23

Foto 2)
http://www.megaupload.com/?d=BH4IMD23