vb中怎么画菱形?
vb怎么输出菱形图案?vb绘制菱形的教程
启动vb6，新建一个标准的exe文件，拖动窗体周边的小正方形调节窗体的大小，直至合适为止。选择窗体，找到右边的属性窗口，设置boderstyle属性为0-none，设置startupposition属性为屏幕中心。
启动VB0，新建一个标准exe工程。在窗体上绘制一个命令按钮，名称为Command1。双击命令按钮进入代码窗口。编写命令按钮单击事件（代码详情可参考图中的绿色字体部分的注释）。按F5运行测试，输出菱形图形。
启动VB0，新建一个标准exe工程。在窗体上绘制一个命令按钮，名称为Command1。双击命令按钮进入代码窗口。编写命令按钮单击事件（代码详情可参考图中的绿色字体部分的注释）。按F5运行测试。完成效果图。
用vb,windows窗体应用程序设计一个菱形,用strdup函数
StrDup 函数 J# JScript Visual Basic 语言参考StrDup 函数示例 请参见 返回由指定字符重复指定次数后形成的字符串或对象。
Dim s2 s1 = InputBox(请输入要重复的个数)s2 = TextBoxText TextBoxText = StrDup(s1， s2)End Sub 其中TextBox1用来输入入“A”，InputBox用来输入“5”，就会在TextBox2显示“AAAAA”注：在VB.NET已经测试可用，VB0上不支持此方法。
VB打菱形
1、启动vb6，新建一个标准的exe文件，拖动窗体周边的小正方形调节窗体的大小，直至合适为止。选择窗体，找到右边的属性窗口，设置boderstyle属性为0-none，设置startupposition属性为屏幕中心。
2、启动VB0，新建一个标准exe工程。在窗体上绘制一个命令按钮，名称为Command1。双击命令按钮进入代码窗口。编写命令按钮单击事件（代码详情可参考图中的绿色字体部分的注释）。按F5运行测试，输出菱形图形。
3、启动VB0，新建一个标准exe工程。在窗体上绘制一个命令按钮，名称为Command1。双击命令按钮进入代码窗口。编写命令按钮单击事件（代码详情可参考图中的绿色字体部分的注释）。按F5运行测试。完成效果图。
4、StrDup 函数 J# JScript Visual Basic 语言参考StrDup 函数示例 请参见 返回由指定字符重复指定次数后形成的字符串或对象。
