I want to split a value like 150.87 to two different variables a = 150 and b= .87

i want to separate the decimal portion of the value.

Please guide me that how can i do it in VB6.