按键精灵做除法运算只要整数不要小数点不要四舍五入

0.5+x)+x=9.8÷2
2(X+X+0.5)=9.8
25000+x=6x
3200=450+5X+X
X-0.8X=6
12x-8x=4.8
7.5*2X=15
1.2x=81.6
x+5.6=9.4
x-0.7x=3.6
91÷x ＝1.3
X+8.3=10.7
15x ＝3
3x－8＝16
7(x-2)=2x+3
3x+9=27
18(x-2)=270
12x=300-4x
7x+5.3=7.4
3x÷5=4.8
30÷x+25=85
1.4×8-2x=6

Dim num,a
num = 10 / 3
a = Int(num)
MessageBox a