陈新龙
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)。