VB控制结构

ick()\ra=InputBox(v@P1wx”)\rb=InputBox("v@P01wx)\rPrinta+b/3\rEndSub\r??o?@2345\n@Pqr* 0@P321`456,@?\r17.???o-\rPrivateSubCommandl_Click()\rX=1EvaluationWarning:ThedocumentwascreatedwithSpire.PDFfor.NET.\rFork=lTo3\rIfk<=lThena=x*x\rIfk<=2Thena=x*x+l\rIfk>=3Thena=x*x+2\rPrinta\rNextk\rEndSub\r18.???o#?+-\rDimx\rIfxThen\rPrintx\rElse\rPrintx+1\rEndIf\r19.7?Ž?5X+4Y=2,\n|X|<=50,|Y|’=100“?wx”,X+Y•–+—˜-\rPrivateSubForm_click()\rMax=0\rForx=-50To50\rFory=-100To100\rIf[1]Thens=x+y\rIfs>MaxThen\rNexty\rNextx\rPrintMaxEvaluationWarning:ThedocumentwascreatedwithSpire.PDFfor.NET.\rEndSub\r20.Ž?5X-4Y=2,\n|X|<ž100,|Y|<=50“?wx”*|X|+|Y|•–-\rPrivateSubForm_click()\rMax=0\rForx=-100To100\rFory=-50To50\rIf5*x-4*y=2Thens=[1]\rIf[2]ThenMax=s\rEndIf\rNexty\rNextx\rPrintMax\rEndSub