在窗体上画一个命令按钮,然后编写如下事件过程
privatesubcommand1click()x=0dountilx=-1a=inputbox("请输入a的值“)a-val(a)b=inputbox("请输入b的值...
private sub command1 click()x=0do until x=-1a=inputbox("请输入a的值“)a-val(a)b=inputbox("请输入b的值 ")b=val(b)x=inputbox("请输入x的值“)x=val(x)a=a+b+xloopprint aend sub程序运行后,单击命令按钮,依次在输入对话框中输入10,8,9,2,11,-1,则输出结果为()麻烦写一下过程,谢谢
展开
3个回答
2013-04-23
展开全部
在窗体上画一个名称为Command1的命令按钮,再画两个名称为label1.label2的标签,然后编写如下程序代码private x as integerprivate sub command2 click()x=5:y=3call proc(x,y)label1.caption=xlabel2.caption=yend subprivate sub proc(byval a as integer,byval b as integer)x = a*ay=b+bend sub程序运行后,单击命令按钮,则两个标签中显示的内容分别是什么。我是新手,麻烦具体和我写一下算的过程。谢谢
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询