Ver Mensaje Individual
  #1 (permalink)  
Antiguo 23/09/2011, 22:45
davchi
 
Fecha de Ingreso: septiembre-2009
Mensajes: 108
Antigüedad: 15 años, 2 meses
Puntos: 1
limpiar frame

hola a todos
tengo 5 frame
Frame1
Frame2
Frame3
Frame4
Frame5

y una funcion para borrar el frame que la llamo mediente un checkbox

Function:
Código:
Public Sub Limpiar(sFORM As Frame)
Dim ctl As Object
For Each ctl In Me.Controls
If TypeOf ctl Is CheckBox Then
ctl.Value = False
ElseIf TypeOf ctl Is OptionButton Then
ctl.Value = False
ElseIf TypeOf ctl Is TextBox Then
ctl.Text = ""
End If
Next
End Sub
el problema es que lo lo llamo de la siguiente manera
Call Limpiar(Frame1)
o
Call Limpiar(Frame2)
o
Call Limpiar(Frame3)
o
Call Limpiar(Frame4)
o
Call Limpiar(Frame5)

pero el problema es que si llamo al (Frame4) me limpia todos, y yo necesito limpiar solo el (frame4) o el que llame

alguna idea

muchas gracias