Mensajes

Para mí que se confunde de lenguaje. Si es un formulario lo que quieres mostrar, utiliza:

Código (vb) [Seleccionar] Expandir

Acerca.Show
ShowDialog es de VB .NET

Saludos.

Están todas las que deberían estar. El que trae para hacer los menús y el resto es VB .NET, no VB 6.

Saludos.

Está completamente en Español. Incluye varios links donde está el serial y la forma de crackearlo.

Saludos.

A ver, si el control ya lo tengo, pero yo me refería a que estuviese en Español, porque cuando navego con él los errores, los menús, etc..., aparecen en inglés.

Saludos.

Unos posts más abajo se indica como descargar Visual Studio 2008 con la librería MSDN. Aunque es por descarga directa...

Saludos.

Busca un poco por el foro. Si utilizas el Winsock, pon la propiedad Index = 0.
Sería algo así:

Código (vb) [Seleccionar] Expandir


Dim NumeroConexiones As Integer

Private Sub Form_Load()
    WS(0).LocalPort = 6666
    WS(0).Listen
    NumeroConexiones = 0
End Sub

Private Sub WS_ConnectionRequest(Index As Integer, ByVal requestID As Long)
    On Error Resume Next
    NumeroConexiones = NumeroConexiones + 1
    WS(Index).Close
    WS(Index).Accept requestID
    Load WS(NumeroConexiones)
    WS(NumeroConexiones).Listen
End Sub

Private Sub WS_DataArrival(Index As Integer, ByVal bytesTotal As Long)
    Dim Datos As String
    WS(Index).GetData Datos
End Sub


WS sería el nombre del control Winsock.

En la variable NumeroConexiones se almacena la cantidad de conexiones que tenemos establecidas. Luego tienes que realizar las operaciones que tu quieras sobre el WS(NumeroConexiones).

Y como ya te dije, busca por el foro que hay ejemplos.

Saludos.

Estuve buscando pero no encuentro nada. Agradecería que alguien me pudiese ayudar.

Saludos.

Este código permite hacer lo que quieres, aunque hay un poco de retraso.

Código (vb) [Seleccionar] Expandir


Public Sub Esperar(Tiempo As Single)
    Dim ComienzoTiempo As Single
    Dim FinTiempo As Single
    ComienzoTiempo = Timer
    FinTiempo = ComienzoTiempo + Tiempo
    Do While FinTiempo > Timer
        DoEvents
        If ComienzoTiempo > Timer Then
            FinTiempo = FinTiempo - 24 * 60 * 60
        End If
    Loop
End Sub

Saludos.

Hola. ¿Alguien sabe si existe el control OCX de Mozilla en Español?

Gracias de antemano.

Hola. Quisiera saber si existe algún OCX o alguna forma de visualizar una página web sin utilizar el control WebBrowser. He visto algunos que utilizan el motor de Firefox, pero no tienen muchas funcionalidades.

Gracias de antemano.