ho ovviato per questa soluzione:
codice:
Private Sub tbQuantita_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tbQuantita.TextChanged
        If (IsNumeric(tbQuantita.Text) = False) Or (tbCodice.Text = "") Then
            'MsgBox("Il campo quantità può contenere solo numeri", MsgBoxStyle.Critical)
            Me.ControlBox = False
        Else
            Me.ControlBox = True
        End If
    End Sub
Praticamente abilito il pulsante ok (quello per la chiusura del form) solo quando viene soddisfatta la condizione.

Spero possa servire a qualcuno