Weno mi pregunta es como hacer para buscar las palabras, me explico, lo que quiero es que cuando escriba una palabra le envie a un form o otro y si no existe diga que esa palabra no existe
hola, no entiendo en q parte debe realizar la busqueda de la palabra por ejemplo: en un textbox, en un richtextbox, en archivos, en base de datos :huh: explica un poco mas.
Saludos.
si se dan cuenta todos, este tipo de preguntas estan reinando por este y otras secciones del foro muy a pesar que en el regflamento general del foro dice que se eliminaran aquellos mensajes que solo dicen "ayudaaa por favooooooooor", es mas hace mucho pero mucho tiempo tambien se dijo que el foro ya es de level 2 osea un poco mas avanzado pero todo es letra muerta, sino miren estos post si ir mas lejos aqui mismo
http://foro.elhacker.net/index.php/topic,207595.0.html
o este otro
http://foro.elhacker.net/index.php/topic,207187.0.html
en fin... y los moderadores?
Cita de: ((( SPAWN ))) en 11 Abril 2008, 20:30 PM
hola, no entiendo en q parte debe realizar la busqueda de la palabra por ejemplo: en un textbox, en un richtextbox, en archivos, en base de datos :huh: explica un poco mas.
Saludos.
pues mira, are un programa que tiene muchos form y lo que quiero es que cuando una persona escriba en un textbox la palabra o nombre del form si existe lo mande alli y sino diga que no existe por ejemplo
un programa que tiene 1 form llamado por ejemplo principal y alli estara el textbox y aparte de ese form existe otro que se llama prueba1 y prueba2
aora lo que yo digo es que si la persona escribe prueba 1 en el texbox lo mande al form prueba 1 y si escribe por ejemplo prueba3 como no existe le diga que no existe espero aberme explicado
Hola como estas, este codigo q hice, recorre todo los formularios q tiene tu proyecto y verifica los caption de cada uno con el nombre q ingresaste en el textbox, si se da la coincidencia pasa a mostrar el form llamado.
Al cargar el form "Principal" cargar en memoria tambien todos los form del proyecto.
Private Sub Command1_Click()
Dim ok As Boolean
For i = 0 To Forms.Count - 1 '---> Recorre todos los formularios con el objeto "Forms"
If Text1 = Forms(i).Caption Then '---> Compara con el q tipeaste
Forms(i).Show '---> Lo ejecuta
ok = True
End If
Next
If ok = False Then
MsgBox "El Form " & Text1 & " no existe."
End If
End Sub
Private Sub Form_Load()
Form1.Hide '---> Carga el Form1 pero no lo muestra
Form2.Hide '---> Carga el Form2 pero no lo muestra
End Sub
Private Sub Form_Unload(Cancel As Integer)
For i = Forms.Count - 1 To 0 Step -1
Unload Forms(i) '---> Cierra todos los form
Next
End Sub
Esta es una forma de verificar, otra seria con un Select Case verifiques cada uno de los caption de todos los form con el q escribiste en el textbox, claro q, tendras q escribir todos los caption, de cada form para cada Case.
No se si sera lo q necesitas. Saludos.