inputbox或者调用另一个设计窗体,然后获取返回值
command1_click() dim n as integer dim d as integer dim z as long n=inputbox("请输入价格"，单价) s=inputbox("请输入数量"，数量) z=n*s print zend sub
inputbox,
