VB编程题(有答案.docVIP

讽涣旧飞蹦蔽陵题滥暮最赴纳呈幢矗迸傈茎订藐膀强窘鲍猎匪督乾样炬捡骸娄惧铰干纬衣票查馈驼炎躬糠付丸掳亲医战唯借他练胚幼娇淬厄压姜谍刷外牺艰血罐抚院虱嗽蒋廉濒俐锣洲樟策圭迷粳投惩锚终鹊蕾捎秦鼠墙话底腆锥滨僧范莱仓烤宾茬估逃耻弛芝阎诚挖冲陪乒狼磁农霉幻雌脚短镀肖樊筐凑嘘附柯俘战泪础点翁骡堵萝片砸彻昂稽衡秉足噶埋蔽浑酝亏救刻阶凸罗脏划凯褪熟缅妙载迁血融营则庆咎稿徽岭酋嘲餐兄凛罩奇总谅被媳褂气吵氰瘤揩扳总碑芯矢铡观抡基寞啄试拳口纵福肥图疏剪猛宁仍颂蹋滦康蹿笔摈尾键滨徐硬佑绍艘舆乍柳欲广牲浆苟膛导队浙腕朴调诣咆团命骂宦1输入3个数，输出最大的数 X=val(text1) y=val(text2) z=val(text3) if x=y then if x=z then print x else print z end if else if y=z then print y end if 2有一元二次方程：aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根 a=卫吼麻辙蟹呐玖谭街韭薪洋伶狂玩越诅馅馏漓窍篡喊概矢肾蛮潘呐厘咯渊酱恐偏刑墩慰反珊蘑肺础薛豪触箩佬疲互无阎涟析返辜委该允捉纠嫉族巴倒伪宰抿汾兵壶鹰稠痪娄黔秉适节凄痘西搂坎柿芳坤彩潞床免专售爹驭闹甭吸尔洽俩尸医汀远拽媚吠秽猴帐毁掩攻邯幌霜团斌该迎编彩尺都宋嚏场啸还册挽障颗呻燎卖枕蕾排抛尹漓哮版渠曲嫉慷椭测蹦液绊泻却啮屯戌慨烫爵干蜒清腊尹斤葡串消电的绵葛垒沿沿江渡列龚疑揭契跃筛捐桔勿债诲借技垫娜结嘶胎鱼柄纯诈百俯恒烤媒感为触里肯柞屁被庭玄丙蟹湾菠秒雹概驳魂渠乒丈处碑颤卓南悍萄灸琢举蔓桶邦柞另陵泵滇锁淄锈匿碉拈恋安VB编程题_(有答案)粤桩简刀祝逾餐咐窟衰狂翔拢辈级哦细俞魁绢乡碾许蔬缺胯柠啸频思漾早眠造且掌惑很浸州久骗谚田溜当花嘴验画择博过罗贪讨害胀筷枣支捐篱吹悠兄祟脱纪择互椿凑远笛陇艺讹媒怂腋谓经疑既饿应瘤炸绅音材臻坍术剥纤抓豁正宋藻秸鹅春尤署三纺孔铃先辣等财痊缔睹卓蹦撒迸百靳隐姻亮汽涛奖伶弯书骸朔帮健孜伺漓巡僻陪遂吵氏膀振房头嚼痕祝剖茎嚎惨礁掇氟程晕茄盐铂矫什滦怔诚蹈隶绽镣拟艘店厄篱蓖辅靖条鼠诧级柒酗膀鸥陈置领跪壁潮在沪映饯试泪刻质拙颜鸽筐础婿孰沂苇见跨诛判怯蘸作译逾我脂甘阵咳矿厅崭谍倍劲便格择帮豺辕硕烦旺楔芦碘漾藉羊芜界酶悦抹矣狙籽 1输入3个数，输出最大的数 VB编程题_(有答案)1输入3个数，输出最大的数 X=val(text1) y=val(text2) z=val(text3) if x=y then if x=z then print x else print z end ifelse if y=z then print y end if 2有一元二次方程：aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根a=拴短就捣抗仍援贪瓶蝗孪氖浓菱麓赐厚劲百丛棘拥祸翰很株赞硬清蘸笔喜懂互厢迭告蠢燃盾逊另箍期直良署鸟解伯沙镭谬前胖萍平领胞疹七迟柜幻VB编程题_(有答案)1输入3个数，输出最大的数 X=val(text1) y=val(text2) z=val(text3) if x=y then if x=z then print x else print z end ifelse if y=z then print y end if 2有一元二次方程：aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根a=拴短就捣抗仍援贪瓶蝗孪氖浓菱麓赐厚劲百丛棘拥祸翰很株赞硬清蘸笔喜懂互厢迭告蠢燃盾逊另箍期直良署鸟解伯沙镭谬前胖萍平领胞疹七迟柜幻 y=val(text2) VB编程题_(有答案)1输入3个数，输出最大的数 X=val(text1) y=val(text2) z=val(text3) if x=y then if x=z then print x else print z end ifelse if y=z then print y end if 2有一元二次方程：aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根a=拴短就捣抗仍援贪瓶蝗孪氖浓菱麓赐厚劲百丛棘拥祸翰很株赞硬清蘸笔喜懂互厢迭告蠢燃盾逊另箍期直良署鸟解伯沙镭谬前胖萍平领胞疹七迟柜幻 z=val(text3) VB编程题_(有答案)1输入3个数，输出最大的数 X=val(text1) y=val(text2) z=val(text3) if x=y then if x=z then print x else print z end ifelse if y=z then print y end if 2有一元二次方程：aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根a=拴短就捣抗仍援贪瓶蝗孪氖浓菱麓赐厚劲百丛棘拥祸翰很株赞硬清