VB.net 编写菱形 的 原代码

给你一个C的。

创新互联自成立以来，一直致力于为企业提供从网站策划、网站设计、网站建设、网站设计、电子商务、网站推广、网站优化到为企业提供个性化软件开发等基于互联网的全面整合营销服务。公司拥有丰富的网站建设和互联网应用系统开发管理经验、成熟的应用系统解决方案、优秀的网站开发工程师团队及专业的网站设计师团队。

你自己看下思想。

#include stdio.h

#include math.h

void PrintRhombus(int n);

void main()

{

int n;

scanf("%d" , n);

PrintRhombus(n);

}

void PrintRhombus(int n)

{

int i , j , k;

if(0 == n % 2)//n must be an odd number.

n++;

for(i = 1 ; i = n ; i++)

{

for(j = 0 ; j abs((n + 1) / 2 - i) ; j++)

printf(" ");

for(k = 0 ; k n - abs(n + 1 - 2 * i); k++)

printf("*");

printf("\n");

}

}

在vb.net中如何画实心的方形图

你应该填充这个矩形，比如说在你画的矩形上填充蓝色，要加上下面的语句

Dim myBrush As New SolidBrush(Color.Blue)

e.Graphics.FillRectangle(myBrush, 10,10, 100,100)

有关vb.net里的hatchbrush

Imports System.Drawing.Drawing2D

Public Class Form1

Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click

'定义一个 Graphics对象

'调用窗体的CreateGraphics 方法创建 Graphics 对象

Dim g As Graphics

g = Me.CreateGraphics

'创建用实心菱形图案进行绘制，并使用红色作为前景色，蓝色作为背景色的画笔

Dim aHatchBrush As HatchBrush = New HatchBrush(HatchStyle.SolidDiamond, Color.Red, Color.Blue)

'创建矩形的位置和大小

Dim x As Integer = 0

Dim y As Integer = 0

Dim width As Integer = 150

Dim height As Integer = 200

'调用图形方法FillRectangle 将定义的矩形绘制到创建Graphics 对象上

g.FillRectangle(aHatchBrush, x, y, width, height)

End Sub

End Class

vb.net 中输出空心菱形

这是C#的

Console.WriteLine("请输入一个数?");

//这里假设只能输入数字

int number = Convert.ToInt32(Console.ReadLine()) / 2 + 1;

for (int i = 1; i = number; i++)

{

Console.Write(new string(' ', number - i));

Console.WriteLine(new string('*', i * 2 - 1));

}

for (int i = number - 1; i = 1; i--)

{

Console.Write(new string(' ', number - i));

Console.WriteLine(new string('*', i * 2 - 1));

}

vb.net 怎么吧combobox的边框四个直角变成弧形

可以使用onpaint事件进行重绘使combobox的是边框四个直角变成弧形。这里需要用到gdi+绘制的知识和onpait事件。窗体和combobox设置自动重绘为true即可。你可以参考下gdi的圆角绘制的知识的。这里很容易做到的。希望能帮到你。有疑问继续提问哈。

vb.net中有没有哪个控件可以自定义形状（如圆形，多边形）和颜色，如果有，希望你您给出代码

记得VB6当中有Shape控件，但是VB.net里这个控件不存在了。

提个思路：使用Picture控件或Label控件，通过代码在控件里绘图想要的图形，可以试试。