Splitting strings with decimal point

[PremalathaP]

Try this,

num = "78:90"
Text1.Text = Mid(num, 1, InStr(1, num, ":", vbTextCompare) - 1)
Text2.Text = Mid(num, InStr(1, num, ":", vbTextCompare) + 1)