 Autor
|
Tema: Codigo en textbox (Leído 8,594 veces)
|
eldiabloxico
 Desconectado
Mensajes: 58
Aprendiendo algo nuevo cada dia
|
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.
|
|
|
|
|
En línea
|
|
|
|
Spider-Net
Desconectado
Mensajes: 1.165
Un gran poder conlleva una gran responsabilidad
|
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í?
|
|
|
|
|
En línea
|
|
|
|
eldiabloxico
Desconectado
Mensajes: 58
Aprendiendo algo nuevo cada dia
|
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?
|
|
|
|
|
En línea
|
|
|
|
|
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!
|
|
|
|
|
En línea
|
|
|
|
Topyr1
Desconectado
Mensajes: 5
|
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: 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.
|
|
|
|
|
En línea
|
|
|
|
& eDu &
Desconectado
Mensajes: 580
|
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... 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, 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? 
|
|
|
|
|
En línea
|
|
|
|
APOKLIPTICO
Desconectado
Mensajes: 3.871
Toys in the attic.
|
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?
|
|
|
|
|
En línea
|
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
Desconectado
Mensajes: 58
Aprendiendo algo nuevo cada dia
|
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. |
|
|
|
|
En línea
|
|
|
|
APOKLIPTICO
Desconectado
Mensajes: 3.871
Toys in the attic.
|
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...
|
|
|
|
|
En línea
|
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 &
Desconectado
Mensajes: 580
|
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
|
|
|
|
|
En línea
|
|
|
|
|
 |
