Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnAggiorna.Click
If IsNumeric(txtQnt.Text) Then
a = Prodotti(i)
b = prezzoprodotti(i)
c = qntProdotti(i)
Prodotti(i) = txtNome.Text
prezzoprodotti(i) = txtPrezzo.Text
qntProdotti(i) = txtQnt.Text
txtPrezzo.Text = FormatCurrency(prezzoprodotti(i))
Else
MessageBox.Show("prova")
End If
End Sub

E' un programmino mooolto semplice!
non riesco a far funzionare il controllo sul textbox contenente la quantità,
se si inseriscono nel txtqnt stringhe diverse da numeri interi deve visualizzarmi il messagge box...
niente da fà. Le ho provate tutte try catch ecc ecc...mi arrendo e mi affido ad un vostro aiuto!