vb怎么输出菱形图案

1、启动VB60，新建一个标准exe工程。

2、在窗体上绘制一个命令按钮，名称为Command1。

3、双击命令按钮进入代码窗口。

4、编写命令按钮单击事件（代码详情可参考图中的绿色字体部分的注释）。

5、按F5运行测试。完成效果图。

Private Sub Form_Click()

Dim I As Integer

For I = 1 To 7 '菱形

If I <= 4 Then

Print Space(4 - I); String(2 I - 1, "")

Else

Print Space(I - 4); String(15 - 2 I, "")

End If

Next I

Print

For I = 1 To 4 '三角形

Print Space(4 - I); String(2 I - 1, "")

Next I

Print

For I = 1 To 5 '平行四边形

Print Space(7 - I); String(7, "")

Next I

Print

For I = 1 To 5 '直角反三角形

Print Space(2); String(6 - I, "")

Next I

Print

For I = 1 To 5 '直角三角形

Print Space(2); String(I, "")

Next I

Print

End Sub

vb流程图中长方形、菱形代表意义：

长方形表示：行动方案、普通工作环节用；

菱形表示：问题判断或判定（审核／审批／评审）环节；

一、说明

流程图是描述活动执行顺序的图形方法。虽然它不是一个统计范畴，但许多质量专家仍然把它纳入统计技术的范畴，因为在质量管理过程中，流程图是我们经常使用的工具。

一个好的流程图能够直观地描述整个活动中各个过程的物流和信息流，使人们能够很容易地了解整个过程。质量管理过程中常用的流程图有产品生产流程图、产品检验流程图、服务流程图等，在这里您可以简单的了解其使用方法，以使以后的流程图更加专业化、规范化。

二、符号

开始和结束的符号是椭圆符号。用于指示进程的开始或结束。”“开始”或“结束”是用符号写的。活动标志是一个矩形符号。用于表示流程中的单独步骤。活动的简要描述写在矩形中。判断标志是钻石的象征。

用于表示过程中的决策或分歧点，决策或分歧的描述用菱形书写，通常是问题的形式。这个问题的答案决定了决策符号之外的路线，并且每条路线都标有相应的答案。流线型标志。用于按顺序指示步骤的进度。流线的箭头表示流程的流向。

文档徽标。用于表示属于进程的书面信息。文件的标题或说明用符号书写。

连接标志是圆形标志。用于表示流程图的延续。圆圈里有一个字母或数字。在互连的流程图中，连接符号使用相同的字母或数字来指示进程是如何连接的。

三、形式

流程图通常采用两种形式：

1、流程图

上下流程图是最常用的流程图，它只表示上一步和下一步之间的顺序关系。下图显示了一家公司的购买过程。

2、矩阵流程图

矩阵流程图不仅显示了下面的关系，还显示了某一过程的责任部门。

扩展资料：

功能

算法的流程图或框图由特定的图形符号和插图表示。

流程图是流经系统的信息流、意见流或组件流的图形表示。在企业中，流程图主要用来说明一个过程。这个过程可以是生产线上的一个过程，也可以是完成一项任务所必需的管理过程。

例如，流程图可以是解释零件制造过程，甚至组织决策过程的方法之一。这些过程的所有阶段都由图形块表示，图形块通过箭头连接以表示它们在系统中的流向。下一步要去哪里取决于上一步的结果。典型的做法是用“是”或“否”的逻辑分支来判断。

流程图是揭示和掌握封闭系统运动的有效方法。作为一种诊断工具，它可以辅助决策，让管理者清楚地知道问题可能发生在哪里，从而确定替代行动计划。

流程图有时被称为输入输出图。图表直观地描述了工作流程的具体步骤。流程图对于准确理解事情的进展以及决定如何改进流程非常有帮助。该方法可应用于整个企业，直观地跟踪和说明企业的经营模式。

流程图使用标准符号来表示特定类型的 *** 作，例如菱形框中的决策和框中的特定活动。但比这些符号规则更重要的是，需要清楚地描述工作流程的顺序。流程图也可以用来设计和改进工作流程，具体做法是先画出应该做什么，然后再与实际情况进行比较。

参考资料来源：

百度百科-流程图

百度百科-流程图符号

Private Sub Command1_Click()

n = CInt(InputBox("N="))

Print "N="; n

For i = 1 To n

Print Spc(n + 1 - i);

For j = 1 To 2 i - 1

Print "";

Next j

Print

Next i

For i = n - 1 To 1 Step -1

Print Spc(n + 1 - i);

For j = 1 To 2 i - 1

Print "";

Next j

Print

Next i

End Sub

第一个

main()

{

int i, j;//定义变量

for (i = 1; i <= 4; i++)

{

for (j = 1; j <= i; j++)

printf(" ");

printf("");

printf("\n");

}

}

第二题

main()

{

int i,j;

for (i = 1; i <= 4; i++)

{

for (j = 1; j <= 4 - i; j++)

printf(" ");

printf("");

printf("\n");

}

}

第三题：

main()

{

for (int i = 1; i <= 3; i++)

{

for (int j = 1; j <= 3 - i; j++)

printf(" ");

for (int k = 1; k <= 2 i - 1; k++)

printf("");

printf("\n");

}

}

第四题：

Main()

{

int i, j, k;

for (i = 5; i < 10; i++)

{

for (j = 1; j <= i - 5; j++)

printf(" ");

for (k = 1; k <= 19 - 2 i; k++)

printf("");

printf();

}

}

拿第一个举例，定义变量。i从一开始执行内循环，j=1,j<=i，满足条件输出空格，j++为2，这时j>i，不再执行此循环。输出回车。然后第二次循环，i++为2，j=1,j<=i,输出空格，j++为2，j<=i，在输出空格，j++为3,j>i；执行下条语句：输出回车。以此类推。当i++为5时，i>4，则整个程序停止输出

ps:我这些都是用c#做的，哪个错了，跟我说

Space函数的功能是返回由指定数目空格组成的字符串

函数原型Space(Number As Long)

String函数的功能是返回一个指定长度的重复字符串

函数原型String(Number As Long, Character)

故

Space(Abs(i) / 2 + 2) & String(9 - Abs(i), "")

的意思就是生成Abs(i) / 2 + 2个空格+9 - Abs(i)个星号~

前面加上print 就是在窗口打印

以上就是关于vb怎么输出菱形图案全部的内容，包括:vb怎么输出菱形图案、求VB编写的以"*" 菱形、三角形、 平行四边形、 直角反三角形、的代码 分不够了 我再加分。！！！、vb流程图中长方形、菱形、各代表什么意义等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！