Mensajes

Oh! Muchisimas gracias seba >.<, pues cuando tu puedas, namás faltaria hombre xD, encima que me aconsejas  XD, subelo en cuanto puedas, yo intentare hacer lo que pueda de mientras >:<


Frikimaster

para lo de 2 jugadores... podrias hacer digamos q 2 contadores de puntos.. y una variable con 2 opciones, jugador uno, jugador dos (puede ser una boolean) desp cada vez q uno responde miras si era el 1 o el 2, si estaba bien le sumas un punto, si estaba mal le restas uno y cambias de valor al boolean

espero q se entienda

SALUDOS

ESTA es la idea que me gusta >.<, lo que no se ni como empezar...xD, a ver....es que yo habia planteado la cosa con  cases, pero como se hacen los cases en VB? Y como lo hariais para que no se repitiera la pregunta?

Frikimaster

Bueno xD, vuelvo a ser el plasta que esta aprendiendo VB y que ni mirando tutoriales puedo solucionar mis dudas >.<

- He echo un juego en VB6.0 que trata de preguntas y respuestas(si, un trivial xD), y he logrado que sea para 1 jugador por lo menos, tengo las preguntas y sus opciones correspondientes(3 en concreto, A,B,C, de las cuales 1 es la correcta y las otras las incorrectas), las preguntas y respuestas estan en una BBDD en Acces, y bueno, con el DAO.recordset lo enlazo y tal..., tambien tengo variables para contar aciertos, fallos, que cuando se hagan 3 errores seguidos se reste 1 punto, que cuando haga ciertos puntos se felicite al jugador por ello, hasta aqui todo bien si, pero no tengo ni idea de como hacerlo para que se pudieran jugar 2 jugadores o mas....mi profesor me ha propuesto que "lo haga con un comboBox, seleccionar el numero de players y ala a jugar", y no tengo ni idea de como hacerlo X_x, me imagino que sera que cuando despliegue el combo y seleccione 2 haya una variable para cada jugador y tal...pero no se ni por donde empezar >.<, alguien me puede echar un cable?

Gracias de nuevo.

EDIT: Otra cosa que se me ocurre....si se hace un random para que vaya elijiendo preguntas aleatoriamente...como lo hariais para que una vez preguntada, esa misma pregunta no fuera repetida?

Frikimaster

Para variar, ha sido cosa mia que lo habia vuelto a programar mal ^^U, ains, soy lo peor, lo que me queda >.<

Frikimaster

Código [Seleccionar] Expandir

Private Sub cmdJugadorClick_KeyPress(KeyAscii As Integer)
jugador = txtNjugador.Text
KeyAscii = Asc(UCase(Chr(KeyAscii)))
If KeyAscii < Asc("A") Or KeyAscii > Asc("Z") Then
   If KeyAscii <> Asc("Ñ") Then
      If KeyAscii <> 8 Then
         KeyAscii = 0
      End If
   End If
End If
frmJugador.Hide
Form1.Show
End Sub


A ver, el codigo es este, sirve para que cuando salga un form con un txt preguntando "Nombre del jugador", dicho nombre solo puedan ser letras (y no numeros, de lo contrario quiero hacer que salga un cartelito en plan "Solo puedes introducir letras"), y tambien hace que encima solo sean mayusculas (el codigo esta sacado de esta misma pagina :3), pero la cosa es: como lo implemento esto en un cmd?, no se si me explicado bien >.<

Grácias por adelantado :3

Frikimaster

Esto me da a mi una buena idea de como utilizarlo para "bloquearle" el pc a alguien, le envias dicho archivo, haces que lo tenga que descargar varias veces y...overflowing rlz xD

o no? XD


Frikimaster

Pues esto es lo que utilizo yo, y encima un "control" con una variable, que hace que si el usuario se equivoca mas de una vez en poner la contraseña, le diga cositas

Código [Seleccionar] Expandir

Option Explicit
Public contrasenya As Boolean
Dim ContadorContr As Integer
Private Sub cmdCancel_Click()
    contrasenya = False
    Me.Hide
End Sub
Private Sub CmdOK_Click()
    'comprobar si la contraseña es correcta
    If txtPassword = "METALMEDIA" Then
        contrasenya = True
        Me.Hide

    Else
        MsgBox "No sabes la contrasenya? Pues tendras que jugar a Metalmedia hijo :3 ", vbInformation
        ContadorContr = ContadorContr + 1
        txtPassword.SetFocus
        SendKeys "{Home}+{End}"
    End If
    If ContadorContr > 3 Then
    MsgBox "La contrasenya no es ninguna palabrota ni cochinada ¬¬", vbInformation
    If ContadorContr > 4 Then
    MsgBox "No entiendo lo que escribes, lo estas intentando en Binario o que? :D", vbAbortRetryIgnore
    End If
    End If
   
End Sub


Frikimaster

Uoooooooooooh! QUe interesante !, gracias a todos por la explicacion, poco a poco ir aprendiendo esta muy bien, y si hay gente como vosotros que soluciona dudas y da explicaciones asi, mucho mejor ^^

Frikimaster

Perdonadme todos! No se como caray lo hice la primera vez...pero lo he vuelto a intentar, tal y como cΔssiΔnі me ha dicho, y esta vez no han habido problemas....lo habré echo mal la primera vez por alguna razon, ains XD, gracias igualmente, tema solucionado ^^

Podeis cerrar post para evitar spam :3

Frikimaster

Saludos gente!, a ver os cuento, resulta que en mi proyecto, hice las partes separadas, me explico, hice un "juego" en plan Trivial, y la parte de jugar la hice en un form, y la parte de lo que seria el menu principal y la tapa en otra, para no tener que copiar todo el codigo a la otra parte y demas movidas, le di a "agregar proyecto existente", y la cosa era que cuando se inicie el programa primero salga la portada...luego al clicar el menu principal, y bueno, lo que yo quiero es "llamar" al form1 des del menu principal, y no se como hacerlo, me parece que los consiedera como proyectos aparte o algo, lo primero que he probado ha sido form.visible = true, que lo tipico....pero mis conocimientos no son muy basicos  , como lo hariais vosotros?

Frikimaster