Visual Basic - problema con divisiones

hola a todos mi problema es el siguiente necesito hacer una division y mostrar el resultado en dos cajas de texto
en una la parte entera
y en otra el reciduo
por ejemplo 110/60
en la caja uno deberia ir 1
en la caja dos 50

La función "Mod" te da el residuo de una división y la función "Int" te da la parte entera de un número

Text1.TextT = "110"
Text2.Text = "60 "

Division.Text = Int(Val(Text1.Text) / Val(Text2.Text))
Residuo.Text = Val(Text1.Text) Mod Val(Text2.Text)

Espero esto te sirva