UC知道编个简单vb程序
来源：百度知道 编辑：UC知道 时间：2024/05/14 08:35:37
编个VB程序,输入一个三位数,在窗体打印输出其个位数,十位数,百位数
dim a,gw,sw,bw as int
a=val(text1.text)
gw=a%10
sw=(a/10)%10
bw=a mod 100
form1.print a
form1.print bw
form1.print sw
form1.print gw
没有具体的看，但是方法应该没有错
dim ge,shi,bai,a
a = val (inputbox("输入三位数","无标题)
if len(a ) >3 then
exit sub
end if
ge= mid(a ,3,1)
debug.print ge
shi = mid(a,2,1)
debug.print shi
bai = mid(a,1,1)
debug.print bai