Comprobar que Boton se ha elegido para desactivar..

[pasudo]

Iniciado por vbx3m

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