¡Urgente! ¡Por favor, dame el código fuente para escribir un juego simple en VB Visual Studio 2010 (algo tan simple como Buscaminas o Piedra, Papel, Tijera)~!

#include lt;iostreamgt;

#include lt;ctimegt;

usando el espacio de nombres std;

void main()

{

srand(time(NULL)

int p1, p2;

coutlt;lt; "Jugador uno fuera:"lt;lt;endl;

switch(rand()3)

{

caso 0 ：

coutlt;lt; "tijeras"lt;lt;endl;

p1=0;

romper;

caso 1 ：

coutlt;lt;lt; "rock"lt;lt;endl;

p1=1;

romper;

caso 2:

coutlt;lt; "Boo"lt;lt;endl;

p1=2

descanso

}

coutlt;lt; "Jugador dos eliminado:"lt;lt;endl;

switch(rand()3)

{

caso 0:

coutlt;lt; "tijeras"lt;lt;endl;

p2=0;

romper;

caso 1:

coutlt;lt."stone"lt;lt;endl;

p2=1;

ruptura;

caso 2:

coutlt;lt; "tela"lt;lt;endl;

p2=2;

rotura;

}

if(p1==0amp;p2==0)

coutlt;lt; "Empate" lt;endl;

else if(p1==0amp;amp;p2==1)

coutlt;lt;"El jugador dos gana" lt;lt;endl;

else if(p1 ==0amp;amp;p2==2)

coutlt;lt; "El jugador uno gana"lt;lt;endl;

else if(p1==1amp;amp; p2==1)

coutlt; "Empate"lt;lt; endl;

else if(p1==1amp;p2==2)

coutlt;lt;lt; "El jugador dos gana"lt;lt;endl;

else if(p1==1amp;amp;p2==0)

coutlt;lt; "El jugador uno gana"lt;lt;endl;

else if(p1

==2amp;amp;p2==2)

coutlt;lt;"Tie"lt;lt;endl;

En caso contrario, si (p1==2amp;amp;p2 ==0)

cout<

coutlt;lt; "Un jugador gana"lt;lt;endl;

}