i have three arrays below
l = 0
For k = LBound(Tstk) To UBound(Tstk)
Tstk(k) = stk(l)
l = l + 1
Next k
z = 0
For x = LBound(qty) To UBound(qty)
qty(x) = Text5(z).Text
z = z + 1
'Tstk(x) = stk(z) - Text5(z).Text
'Print qty(x)
Next x
m = 0
For t = LBound(stk2) To UBound(stk2)
stk2(t) = Tstk(m) - qty(m)
m = m + 1
Print stk2(t)
Next t
how can i subtract the result of the 1st array Tstk(m) to the second array qty(m)
i always get runtime error 13 type mismatch please help
Unsolved 
