求编一个VB程序？输入一个三位整数，然后将它反向输出？

可以参考下面的代码： private sub command1_click() x=inputbox("输入一个三位数") X1=X\100 'x1=三位数 的百位 X2=(X-X1*100)\10 '十位 X3=X-X1*100-X2*10 '个位 msgbox X3&X2&X1 end sub 扩展资料： VB基本函数 CBool 函数： 返回已被转换为 Boolean 子类型的变体的表达式。 CByte 函数： 返回已被转换为字节子类型