Ha! dejame ver si entendi...
seria esto:
CODIGO DEL FORM1:
Código:
Public NPC As Integer
Private Sub Picture1_Click()
NPC = 1
Form2.Show
End Sub
Private Sub Picture2_Click()
NPC = 2
Form2.Show
End Sub
CODIGO DEL FORM2:
Código:
Private Sub Command1_Click()
If Text1.Text <> "" And Text2.Text <> "" And Text3.Text <> "" And Text4.Text <> "" Then
Select Case Form1.NPC
Case 1
Form1.Label1.Caption = "NO DISPONIBLE"
Case 2
Form1.Label2.Caption = "NO DISPONIBLE"
End Select
End If
End Sub
Mira igual te dejo el proyecto en visual para que lo descargues y lo veas y analizes mejor
http://www.mediafire.com/download.php?2lnkgtizre3 [LINK DE DESCARGA DE MEDIAFIRE]
ESPERO QUE TE SIRVA