Sentencia For para repetir bucle

[MicroHack]

Hola a tod@s

estoy realizando un ejercicio basico del libro que me pide hacer este dibujo con la sentencia for y cout (la cual desconozco porque en el capitulo estudiado no la mencionan y en internet tampoco he encontrado nada de cout en vb.net)

$
$$
$$$
$$$$
$$$$$
$$$$$$
$$$$$$$
$$$$$$$$
$$$$$$$
$$$$$$
$$$$$
$$$$
$$$
$$
$

El caso es que me he vuelto loco probando resolver el ejercicio pero no me sale el resultado deseado, aver si alquien ve el fallo en el codigo por favor:

Código [Seleccionar] Expandir


        Dim fila As Integer

        For fila = 1 To 10

            While fila <= 10
                Console.WriteLine("$")
                fila += 1
            End While
        Next

        Console.WriteLine("FIN")


Otra manera que he probado:

Código [Seleccionar] Expandir


Dim fila As Integer

        For fila = 1 To 10

            If fila <= 10 Then
                Console.WriteLine("$")
                 fila += 1
            End If
        Next
        Console.WriteLine("FIN")


Esta parte del codigo es solo para hacer la mitad del dibujo, la otra mitad seria el mismo proceso pero con cuenta atras, por lo cual todavia no he escrito nada de ello.

[Shell Root]

...y en internet tampoco he encontrado nada de cout en vb.net)

Cof, cof...

:http://msdn.microsoft.com/es-es/library/cc485138(VS.71).aspx

[MicroHack]

...y en internet tampoco he encontrado nada de cout en vb.net)

Cof, cof...

:http://msdn.microsoft.com/es-es/library/cc485138(VS.71).aspx

Gracias Shell por contestar pero mi verdadero problema no es buscar la funcion de cout sino como resolver el ejercicio con la sentencia for.

[Psyke1]

.
Yo en vB6 lo haría así:

Código (vb) [Seleccionar] Expandir


'Vivan las ranas
Option Explicit

' <Procedimiento x>
Const sChar                 As String = "$"
Dim Q                       As Long
   For Q = 1 To 15
       If Q > 8 Then
           Debug.Print String$(((15 - Q) + 1), sChar)
       Else
           Debug.Print String$(Q, sChar)
       End If
   Next Q
' </Procedimiento x>



Devuelve esto:

$
$$
$$$
$$$$
$$$$$
$$$$$$
$$$$$$$
$$$$$$$$
$$$$$$$
$$$$$$
$$$$$
$$$$
$$$
$$
$

Cabe recordar que esta no es la sección adecuada.
Ir a la sección de .NET

DoEvents!