Codigo en textbox

Iniciado por eldiabloxico, 20 Octubre 2008, 17:06 PM

0 Miembros y 1 Visitante están viendo este tema.

eldiabloxico

De nuevo jejeje otra duda, bien, lo que me gustaria saber es que poner, para que el proyecto ejecute el codigo que pone en un textbox, es decir, un ejemplo.
Pongo en el textbox

msgbox "Hola", vbinformation, "hola"

y creo un private sub, lo que quiero es que ese private sub lea lo que pone en el textbox, y lo ejecute, es decir, creo un private llamado.

private sub empezar()
codigo
end sub

lo que no se es que tengo que poner donde pone codigo, para que al poner

call empezar

haga lo que pone en el textbox, es algo lioso, pero lo necesito, o que lo haga al pulsar un commandbutton, pero lo necesito mas para el call, gracias, espero sus respuestas, saludos.
LEE MI HISTORIA DE AMOR, Y OPINA ^^

Visita el foro de psicologia

Entra

Visita mi nuevo foro.

http://forodiablo.ar.gd

Y la web del foro.

http://eldiabloxico.es.tl

Spider-Net

Y para qué quieres un textbox, crea una función que haga lo que quieras y llámala cuando lo necesitas, en lugar de un texbox:

private sub empezar()
msgbox "loquesea"
end sub

Y luego haces un call empezar.
No es más fácil así?

eldiabloxico

Si, pero es para una funcion distinta, por ejemplo, imaginate que un user quiere usar su code, pues lo pone en el textbox, y al darle al commandbutton, el programa ejecuta lo que pone en el textbox, esa no es la funcion que usare con el, pero es un ejemplo, me podeis ayudar?
LEE MI HISTORIA DE AMOR, Y OPINA ^^

Visita el foro de psicologia

Entra

Visita mi nuevo foro.

http://forodiablo.ar.gd

Y la web del foro.

http://eldiabloxico.es.tl

illuminat3d

Mmm n ose bien si es esto a lo que te reifers...

Agregas un timer con enabled en False

Private Sub Form_Load()
Timer1.Enabled = True
End sub

Private Timer1_Timer()
MsgBox "Hello World",vbinformation,"Hello"
End sub

Saludos!

Topyr1

Cita de: Sharki en 20 Octubre 2008, 19:08 PM
Mmm n ose bien si es esto a lo que te reifers...

Agregas un timer con enabled en False

Private Sub Form_Load()
Timer1.Enabled = True
End sub

Private Timer1_Timer()
MsgBox "Hello World",vbinformation,"Hello"
End sub

Saludos!
No sé si estoy en lo cierto pero el se refiere (en su ejemplo) a que si pones en el textbox "MsgBox "Hola"" Escriba esto en el código:
Código (vb) [Seleccionar]

Sub comenzar()
MsgBox "Hola"
End Sub

Y lo ejecute claro.

Yo te diría que es imposible ya que si lo pones, se representara todo entre "", por lo tanto lo pondrá como texto, no como codigo.

& eDu &

Cita de: Sharki en 20 Octubre 2008, 19:08 PM
Mmm n ose bien si es esto a lo que te reifers...

Agregas un timer con enabled en False

Private Sub Form_Load()
Timer1.Enabled = True
End sub

Private Timer1_Timer()
MsgBox "Hello World",vbinformation,"Hello"
End sub

Saludos!

Eso no tiene nada que ver con lo que el se refiere.

Una cosa asi como mucho...

Código (vb) [Seleccionar]

Dim data() As String
data = Split(Text1.Text, "|")
MsgBox data(0), vbInformation, data(1)


Eso lo que hace es lo siguiente, si escriben "Hola | Muy bien" en el Campo de texto sin las comillas sale un mensaje con texto Hola y de titulo Muy Bien ¿Asi te serviria? Y despues puedes hacer,

Código (vb) [Seleccionar]
Dim data() As String
data = Split(Text1.Text, "|")
If data(3) = "Informacion" Then
MsgBox data(0), vbInformation, data(1)
elseif data(3) = "Critical" Then
MsgBox data(0), vbCritical, data(1)
End IF


Ahi seria "Hola | Muy bien | Informacion" ¿Ahora entiendes? ;)

APOKLIPTICO

Si no me equivoco, lo que queres es digamos, un pequeño compilador, osea, que vos le pongas un codigo en un textbox y que te lo interprete y lo corra...
Es eso?
AMD Phenom II 1075T X6 @ 290 Mhz x 11 (HT 2036 Mhz NB Link 2616 Mhz) 1.23 Vcore
ASUS M4A89GTD-PRO/USB3
2x2gb G-Skill RipjawsX DDR3 1600 Mhz CL7 (7-8-7-24-25-1T)
Seagate 500 Gb
XFX HD4850 512Mb GDDR3. 650 Mhz/995 Mhz 1.1 Tflops.

eldiabloxico

No es eso del todo, no solo tiene que ser msgbox, es decir, sea cual sea el codigo, lo ejecute, como si lo ubiese puesto en el commandbutton, es decir, si pone en el commandbutton

shell (cmd.exe /C "Start www.google.es")

pues al pulsar commandbutton, el commandbutton lea lo que pone en el textbox, y en este caso abriria google.
LEE MI HISTORIA DE AMOR, Y OPINA ^^

Visita el foro de psicologia

Entra

Visita mi nuevo foro.

http://forodiablo.ar.gd

Y la web del foro.

http://eldiabloxico.es.tl

APOKLIPTICO

Lo que estás planteando es muy jodido y requiere muucho codigo, tenes que interpretar cada uno de los comandos y pasarle los argumentos, estás hablando de algo muy extenso...
AMD Phenom II 1075T X6 @ 290 Mhz x 11 (HT 2036 Mhz NB Link 2616 Mhz) 1.23 Vcore
ASUS M4A89GTD-PRO/USB3
2x2gb G-Skill RipjawsX DDR3 1600 Mhz CL7 (7-8-7-24-25-1T)
Seagate 500 Gb
XFX HD4850 512Mb GDDR3. 650 Mhz/995 Mhz 1.1 Tflops.

& eDu &

Cita de: eldiabloxico en 20 Octubre 2008, 19:46 PM
No es eso del todo, no solo tiene que ser msgbox, es decir, sea cual sea el codigo, lo ejecute, como si lo ubiese puesto en el commandbutton, es decir, si pone en el commandbutton

shell (cmd.exe /C "Start www.google.es")

pues al pulsar commandbutton, el commandbutton lea lo que pone en el textbox, y en este caso abriria google.
Si fuera para utilizar pocos códigos si que se puede hacer... seria algo mas sencillito... pero si quieres hacer que acepte todos los códigos... bufff