Visual Basic用For-Next结构画图

来源 :电脑报 | 被引量 : 0次 | 上传用户:zjzjzj13
下载到本地 , 更方便阅读
声明 : 本文档内容版权归属内容提供方 , 如果您对本文有版权争议 , 可与客服联系进行内容授权或下架
论文部分内容阅读
  Visual Basic是一種由Microsoft公司开发的结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,今天我们来讲讲如何用Visual Basic输出一个平行四边形,但是对角线要显示为空(如图1)。



  分析:图1是有两个三角形,一个是正三角形,另一个是倒三角形,那么如何用VB来做出这样的图形呢?其实我们换种方式来思考这个图形,这是一个删除对角线的平行四边形,问题核心就是用什么办法可以把对角线删除。
  代码分析,以For-Next为基础结构,“i”代表行数,这里图形有五行,所以设置变量1到5,然后Print Tab语句就是输出每行开始的空位,(7-i)实现每行第一个*号向左移动一个位置。“j”代表每行*号的个数,这里设置11个,其中10个*,1个对角线的空位。
  用一个if语句的判断,如果(2 * i)=j 为真时,打印一个空格,否则打印*号。
  看看执行的效果。这个实例重点在于理解内嵌For-Next结构中循环变量终值的推导和输出位置Tab函数中参数的推导(如图2)。



  完成了这个实例后我再给大家出道使用For-Next输出图形的题目,数学和图形结合(如图3)。


其他文献
和小米10青春版一起来的,还有全新的MIUI 12。据官方表示,稳定版本将会在6月底推送,目前支持升级机型覆盖面很广,甚至3年前的小米6等老款机器也包括在内。  为了尝鲜,我们也在第一时间将手里的小米10 Pro升级到MIUI 12开发版,为大家带来了详细的体验。可能是最好的Android动画体验  系统过渡动画效果,应该是本次MIUI 12系统的重磅升级,至少从官方的口径来看,MIUI 12的动
期刊
摘要:目的:探讨护理品管圈活动在降低门诊输液室护患纠纷方面的效果。方法:成立品管圈组织,确立主题,明确存在问题并进行原因分析,针对原因制定对策并实施。结果:降低了护患纠纷发生率(P<0.05)结论:开展品管圈活动,可以增进护士的团队精神,充分发挥其工作积极性,改善护患关系,降低护患纠纷的发生。  关键词:品管圈;门诊输液室;护患纠纷  我院为三级甲等医院,由于输液室工作量大、人员流动快、环境嘈杂、
期刊
牛大叔购机经验谈  由于竞争激烈,第十代酷睿H和锐龙4000H游戏本新品的价格的确很便宜,帮消费者省下了不少银子。在这里我给大家出个点子,把省下的钱投入到与性能和体验密切相关的配件上,让笔记本真正“飞起来”。当然了,预算有限,所以投入得讲个先后顺序。  第一优先:扩容1TB SSD  现在的主流价位游戏本在存储环节大多采用的是单个512GB SSD形式,让用户后续自行添加HDD或SSD。显然,51
期刊
有时我们会通过微信朋友圈来发布一些内容,但是当我们辛辛苦苦编辑完成并发布以后,展示出来的只有短短的开头一句话。如果要想查看其他内容,则需要点击下面的按钮才能进行展示,这样就大大降低了其他用户的阅读感受。那么如何才能让朋友圈的发文不被折叠显示呢?  先安装最新版本的讯飞输入法,接着点击工具栏中的设置按钮,在弹出的界面中找到“定义工具栏”选项。点击它以后,将已有的选项去掉一个,然后再将“剪贴板”选项进
期刊
平价大碗诚不欺我  夏天洗澡绝对是一个享受的过程,不仅仅可以洗去一天的疲乏,还可以放松心情,洗澡的时候绝对是最好的贤者时间。如果再选择香味比香水还要好闻留香更持久的沐浴露就更棒了,省下了香水钱不说,还可以避免尴尬的汗臭味(甚至是狐臭味),简直加分到满分。  师姐第一次见这款东方宝石沐浴露是某位网红推荐的,后来就开始霸屏了,也不知道是真的推荐,还是营销做得好。不过价格实在是太便宜了,我买了!师姐为钱
期刊
今天来聊一聊我们的口粮——水稻。  水稻(Oryza)是一种草,也是全世界一半人的能量来源,亚洲吃掉了全世界90%的大米。  水稻名字里有水字,而且从小到大看到的稻田似乎总是有水,很多人想当然地认为水稻是喜欢水的水生植物。其实往稻田里灌水主要是为了淹死杂草。  根据国际粮农组织(FAO)报告,水稻是唯一一种在泡在水里的情况下还能存活的谷类作物,给稻田灌水是重要的除草方式,可以避免杂草滋生和除草剂的
期刊
本期的BestBuy榜单是根据4月里的线上线下实际销售情况,通过评比选出的热卖产品,所有获奖与提名的产品均在市场有售,而且人气和销量都遥遥领先于其他竞品。  No.1 AMD 锐龙7 3700X 2249元  No.2 AMD 锐龙9 3950X 5749元  No.3 AMD 锐龙5 3600 1369元AMD 锐龙7 3700X  锐龙7 3700X虽说是第三代锐龙7产品中定位最低的一款,但是
期刊
世界范围内,前列腺癌的发病率已经跃升至男性恶性肿瘤的第二位[1],放射性粒子组织间种植治疗肿瘤是将放射性核素直接种植到肿瘤内或肿瘤周围,通过放射性核素持续释放放射线,达到杀伤肿瘤细胞的目的[2],我科于2011年3月~2013年12月行前列腺癌病人行放射性125I粒子植入术46例,效果良好。现将手术期护理配合报告如下。  1 临床资料  1.1 一般资料 年龄59~87岁,平均年龄76岁;经病理活
期刊
600,3/5,-7.99……这些数字都是十进制数,因为人有十根手指头,所以最常用的是十进制。十进制就是满十进一,满二十进二,以此类推……十进制数字按权展开,第一位权为10^0,第二位权为10^1……以此类推,第N位按权展开10^(N-1),该数的数值等于每位的数值乘该位对应的权值之和。  在计算机的世界里除了十进制之外,常用的还有二进制、八进制、十六进制,今天我们就来讲一讲这个二进制。  二进制
期刊
摘要:铅是一种金属元素,带蓝色的银白色重金属,质柔软,延伸性弱,展性强。空气中表面易氧化而失去光泽,变暗。可用作耐硫酸腐蚀、防丙种射线、蓄电池等的材等。许多化学品在环境中滞留一段时间后可能降解为无害的最终化合物,但是铅无法再降解,一旦排入环境很长时间仍然保持其可用性。由于铅在环境中的长期持久性,又对许多生命组织有较强的潜在性毒性,所以铅一直被列为强污染物范围。长期慢性性接触铅及其化合物会导致心悸,
期刊