codice:
Sub btDivide_Click(Sender As Object, e As EventArgs)
lblMessage.Text = “The answer is: “ & _
Cint(tbNumber1.Text) / Cint(tbNumber2.Text)
End Sub
Va bene condensare il codice, lo faccio anche io, ma qui dentro ci sono dei risultati impliciti fuori controllo 
Esegui una divisione (che probabilmente dà per risultato un numero razionale) tra due valori testo convertiti in interi e concateni il tutto ad una stringa.
Probabilmente l'errore della divisione razionale ("/") è dato dal fatto che un'operazione tra due interi dia implicitamente come risultato un intero
Se invece provi a fare:
codice:
dim risultato as double
risultato = integer.parse(tbNumber1.Text) / integer.Parse(tbNumber2.Text)
lblMessage.Text = “The answer is: “ & risultato.tostring
In risultato puoi mettere un numero razionale, e quindi non sei costretto a una divisione intera ("\").
Ho cambiato i CInt in integer.parse perchè .net è un linguaggio ad oggetti e, giustamente, i metodi degli oggetti sono più veloci in termini di prestazioni dei metodi derivati da VB6 
Ricorda inoltre che per postare del codice devi metterlo nei tag code come ho fatto io, altrimenti il moderatore si arrabbia 
Ciao,
b.