dividing a number of two figures over two variables

[bvdv]

Is it possible to divide a number which contains two figures over two variables.

So par example if A= 14, then B sould be 1 and C should be 4.
And if A = 59, then B should be 5 and C should be 9.

I hope someone knows the command for this.Is it possible to divide a number which contains two figures over two variables.

So par example if A= 14, then B sould be 1 and C should be 4.
And if A = 59, then B should be 5 and C should be 9.

I hope someone knows the command for this.Is it possible to divide a number which contains two figures over two variables.

So par example if A= 14, then B sould be 1 and C should be 4.
And if A = 59, then B should be 5 and C should be 9.

I hope someone knows the command for this.

 

[dpaulson]

B = left$(A,1)
C = right$(A,1)

or

B = mid$(A,1,1)
C = mid$(A,2,1)
David Paulson

 

[JohnYingling]

The general case

Dim lngDigits() as long
lngDigits = GetDigits(59,2)
'===========
Function GetDigits(byval lngIn as long, byval lngNo) as long()
    dim lngW() as long
    dim lngNext as long
    lngNext = lngIn
    Redim lngW(lngNo)
    ' Subscript 0 Unused
    For I = Ubound(intW) to 1 Step-1   ' Reverse Order
        intW(I) =  lngNext mod 256 ' Remainder after divide
        lngNext = lngNext \ 256        ' integer division
    Next
    GetDigits = lngW
End Funtion

http://WWW.VBCompare.Com