Otra Pregunta Tonta

Iniciado por Thaorius, 15 Julio 2005, 20:32 PM

0 Miembros y 2 Visitantes están viendo este tema.

xavierote

He encontrado los errores que has provocado:
De la forma que te dije yo, en el código tu escribes esto

Comando = Split(txtLog.Text, " ")

Mientras que según lo que he visto, tu no quieres sacar el comando del txtLog, sino del txtCommand. Por tanto será:

Comando = Split(txtCommand.Text, " ")

Para la forma que dijo Anhur, me equivoqué con lo de las variables globales, porque creía que lo utilizabas de otra manera. El error está en:

frmClientMain.txtLog.Text = iPort
frmClientMain.txtLog.Text = sIp
frmClientMain.txtLog.Text = sPass


Tendrías que poner:
frmClientMain.txtLog.Text = frmClientMain.txtLog.Text & iPort & vbCrLf
frmClientMain.txtLog.Text = frmClientMain.txtLog.Text & sIP & vbCrLf
frmClientMain.txtLog.Text = frmClientMain.txtLog.Text & sPass & vbCrLf

Para no borrar el contenido del cuadro de texto.
Por tanto, ahí están los dos errores.

Para alwar, si quieres ejecutar el comando MsgBox cuando lo escribes en tiempo de ejecución en un cuadro de texto, lo que tendrías que hacer, por ejemplo, sería:

Private Sub Command1_Click()
If LCase(Left$(text1.Text, Len("msgbox "))) = "msgbox " Then
    If Len(text1.Text) <> Len("msgbox ") Then
        MsgBox Right$(text1.Text, Len(text1.Text) - Len("msgbox "))
    End If
End If

text1.Text = ""
End Sub



Thaorius

Pero esque los errores estupidos que cometo... solo yo...

Saludos y gracias.
Si te sirvio mi aporte, encontrarás más en www.teoxstudios.com. Gracias!
Buscando un buen hosting? Click aquí

{_The_Alwar_}

.. xavierote pero yo me referia que valiese cualquier comando.. se podria?

xavierote

Ahhh... ya se lo que quieres. Pues puede utilizar el Microsoft Script Control, que sirve para hacer scripts en varios lenguajes relacionados con visual basic y se pueden ejecutar en tiempo de ejecución.

{_The_Alwar_}

ah! osea que ese control vale para eso? vale pos ya busco en google sobre ese control, o en la msdn