Ver Mensaje Individual
  #2 (permalink)  
Antiguo 23/05/2006, 11:36
Avatar de vbx3m
vbx3m
 
Fecha de Ingreso: febrero-2005
Ubicación: Venezuela
Mensajes: 524
Antigüedad: 19 años, 3 meses
Puntos: 1
Por que no trabajas con una matriz de controles?? Es mas facil ya q trabajas con los indices en vez del caption del boton....

Por ejemplo:
Código:
Dim muestra As Integer
Private Sub Command2_Click()
muestra = Val(Text1.Text)
Command1(muestra).Enabled = False
End Sub
El usuario indica el numero del boton que quiere desactivar... Si quieres q se desactive mas de un boton entonces trabajas con un Array...

Esta es otra fora de comparar sin necesidad de tanto codigo

Código:
Dim command As Object
Private Sub Command11_Click()
For Each command In Controls
    If TypeOf command Is CommandButton Then
        If command.Caption = Val(Text1.Text) Then command.Enabled = False
     End If
Next
End Sub
__________________
ホルヘ・ラファエル・マルティネス・レオン