Alberto Castrejon respondió:
Mejor que un case yo te recomendaría que lo hagas en el evento Change del textbox1 y del textbox2, quedaría así: Private Sub Text1_Change() If Text1 = "" Then com1.Enabled = False: Exit Sub If Not Text2 = "" Then com1.Enabled = True Else com1.Enabled...