Explore BrainMass

Visual Basic

I am having trouble creating a program in Visual Basic that prints the * in a diamond shape. Do you have any suggestions?

This is what I have so far. It is an un-proportioned diamond, I need a normal diamond. What am I doing wrong?

Dim i As Integer
Dim y As Integer
Dim j As Integer

For i = -9 To 9
y = System.Math.Abs(i)
y = (y * (-1)) + 10

For j = 1 To y

i += 1

Solution Preview

(Let x be the size of the diamond)

Dim x As Integer
Dim r As Integer
Dim c As Integer
Dim d As Integer
x= 17

if ( x mod 2 = 0) then
x = x + 1
End If
d = x/2 + 1
For r = 1 To d ...