Imprimir Página - dos dudas pabas

Título: dos dudas pabas
Publicado por: kakinets en 14 Enero 2006, 19:07 pm

hola a todos tengo 2 dudas

1- como inoro las mayusculas en este codigo

Código:



Private Sub Command2_Click()
busca (Text1.SelStart + 1)
End Sub


Sub busca(Optional ByVal bs As Integer)
Dim a As Integer
Dim b As String
 b = Text2.Text
  If Len(b) Then
     a = InStr(bs + 1, Text1.Text, b)
      If a > 0 Then
      Text1.SelStart = a - 1
      Text1.SelLength = Len(b)
      Text1.SetFocus

      Else
      MsgBox "No se puede encontrar: " & Chr$(13) & b, vbDefaultButton1, "Error en Busqueda"
      Text2.SetFocus

       End If
    End If
End Sub

2 - al MSHFlexGrid como ago para borar todo una ves que esta puesto o escrito ( No se si me esplico) y para no poder haserle 2 veces click una ves seleccionado un cuadrodo.

Saludos KakiNets

Título: Re: dos dudas pabas
Publicado por: Gangrel en 14 Enero 2006, 22:43 pm

No te entiendo a que te refieres con tus preguntas, Explicate un poco mejor y explica que es lo que quieres lograr con la funcion.

Título: Re: dos dudas pabas
Publicado por: xadap en 14 Enero 2006, 23:36 pm

Título: Re: dos dudas pabas
Publicado por: kakinets en 15 Enero 2006, 00:54 am

Con respecto a la pregunta 1 ese es el codigo para buscar palabras en un Text mi pregunta es cual es la Solusion para que si hay una palabra escrita: HoLa y yo ponga hola me la encuentre =. (Creo que fui muy claro)

En cuanto a la 2 duda no se como esplicarla. En ese contro lo utiloso para marcar con puntos cada ves que ago click en algun cuadrado de la tabla queda un O ahora mi pregunta es como borar toda la tabla ya que deberia quedar marcados los cuadrados. Tambien me gustaria saber como hacer para que no pueda marcar 2 veces el mismo cuadrado en la Tabla.Espero que mme entiendan. Sino pongo Imagenes

Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: kakinets en 14 Enero 2006, 19:07 pm