这个是vb吧这么写你双击判断按钮并把那个要输入的框命名为a,输出框命名为c然后 private sub 判断的按钮名dim b as doubleb=a.valueif b<0 c.text='负数'end ifif b=0 c.text='零'end ifif b>0 c.text='正数'end ifend sub
这个例程好丑陋(1) "正数"(2) "零"(3) a<0(4) "负数"
1."正数"2."零"3.a < 04."负数"