Mensajes

y si no vas a usar lo que se almacena en la variable X, no veo por que la usas, solo que me digas que si tiene un fin.

si, lo q tienes q hacer ahi es:

Código [Seleccionar] Expandir

MsgBox "debe seleccionar una opcion", vbCritical, "Opciones"


P/D:krackwar... si te molesta ayudar simplemente no postees...
igual para el resto q solo postea lo mismo... ya con el primer post bastaba para q se de cuenta q habia encarado mal la situacion...

SALUDOS

mmm no encuentro el componte, me podrias decir el nombre exsacto?
puede ser que se haya borrado? lo raro es que la primera vez lo abrio... desp dejo de funcionar, y yo no modifique nada :S

Disculpen que reabra el tema, pero lo quise probar y me dio un error:

Línea 15: la clase SHDocVwCtl.WebBrowser del control WebBrowser1 no era una clase de control cargada.

Es de esta la DLL ieframe.dll

Queria saber si la podias anexar al archivo, honestamente no se porque ahora me tirara este error, ya que la primera vez lo abri sin problemas.

SALUDOS

muchas gracias!
el problema de leerla logre solucionarlo... el problema despues era borrarla...

muchas gracias a estos post!

SALUDOS

Buena, disculpen por esta pregunta tan sencilla, es q estoy teniendo problemas (y me siento muy ***** por ello) con leer la primer linea de un archivo.
Lo que debo hacer es eso, leer solo la primera, y una vez leida borrarla, pero dejando las otras (osea q la segunda pase a primera)
se q es con lineput pero no se xq no lo logro hacer.


desde ya muchas gracias

SALUDOS

jaja yo tb conocia el metodo con los screenshot, de hecho lo hice, y ponia un circulo rojo donde se hacia el click, lo q nunca logre hacer es q campte solo ese pedasito de pantalla, de ese modo seria mas facil de enviar...

muy bueno el programa


SALUDOS

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

bueno el tema quizas no venga aca... les pido q me lo muevan si es asi..

lo q quiero es ver lo q mi computadora envia en el puerto 13...
se q hice una pregunta similar el año pasado... (x si alguien piensa q ya la leyo) pero en el anterior me dieron un ej de como ver lo q entraba en el puerto 13, ahora quiero ver q sale de mi compu en ese puerto...
no pido un source (x eso no se si esto viene aca)
es q quiero intentar hacer mi propio cliente de un juego.. pero no se bien q datos envia el cliente...

desde ya gracias

SALUDOS

el codigo esta bien... pero si lo dejas asi, siemrpe el primer varon sera Carlos (en mi computadora, en la tuya quizas sea otro...
lo mejor seria asi..

Código [Seleccionar] Expandir

Option Explicit

Private Sub Command1_Click()
Randomize
    Label3.Caption = List1.List(Int(Rnd * List1.ListCount))
End Sub

Private Sub Command2_Click()
Randomize
    Label4.Caption = List2.List(Int(Rnd * List2.ListCount))
End Sub

Private Sub Form_Load()
    With List1
        .AddItem "Juan"
        .AddItem "Pedro"
        .AddItem "Jose"
        .AddItem "Carlos"
        .AddItem "Cabron"
    End With
   
    With List2
        .AddItem "Juana"
        .AddItem "Petra"
        .AddItem "Josefa"
        .AddItem "Carla"
        .AddItem "p**a"
    End With
End Sub



llamar a Randomize antes del Rnd


probalo y decime

SALUDOS

lo mejore... jaja va en realidad lo hice en un modulo para poder añadirlo a todos los proyectos q quiera
les dejo el code...

EN UN MODULO:

Código [Seleccionar] Expandir

''''PROPIEDADES DEL PICTURE, PONER EN FORM LOAD
'Picture1.BackColor = vbWhite
'Picture1.Width = 5000
'Picture1.Height = 220
'Picture1.DrawWidth = 11
''''''''''''''''''''''''''''''''
'''cambiar los datos del form

Sub BarradeProgreso(Maximo As Long, Progreso As Long)
Dim Resultado As Long
Resultado = Progreso * 5000 / Maximo
For i = 0 To Resultado
Form1.Picture1.PSet (i, 67), vbBlue
Next
If Resultado >= 5000 Then
    Form1.Picture1.BackColor = vbWhite
End If
End Sub


es bastante sencillo , si tienen dudas pregunten...
creo q es muy efectivo ya q la ocx q tienen el progressbar pesa mas de 1MB :S

SALUDOS