0votos
Juego del disparejo en VB.NET
por

ARIEL

hace 2 años

'Hecho en LibreOffice Basic Sub Main Dim moneda(1) As String Dim valorA2 As String'Hugo Dim valorB2 As String'Paco Dim valorC2 As String'Luis Dim miHoja 'para manipular la hoja Dim ganador As String'para definir el ganador 'valores de la moneda moneda(0)="SOL" moneda(1)="AGUILA" miHoja=ThisComponent.CurrentController.ActiveSheet 'lanzamos las monedas valorA2=CStr(moneda(Int(Rnd*2))) valorB2=CStr(moneda(Int(Rnd*2))) valorC2=CStr(moneda(Int(Rnd*2))) 'colocamos los valores

0votos
Kata FizzBuzz en VB.NET
por

Raul GM

usando Visual Basic Excel hace 4 años

Visual Basic (Macros Excel). Utilizo la primera columna para devolver el resultado, ya que no consigo usar la consola y he buscado en stackoverflow y tampoco :(... Más de lo mismo...