Cíceropb

Já programei em VB5 em 2000 apenas como Hobby, somente agora voltei a brincar como VB6 novamente para depois quem sabe migrar para VB.net. Bem Eleutério, quanto a sua 2ª dúvida e fiz assim e funcionou: Private Sub Command1_Click() Dim Maior As Variant If (Text1.Text > Text2.Text) Then Maior = Text1.Text Label1.Caption = Maior Else Maior = Text2.Text If (Maior > Text3.Text) Then Label1.Caption = Maior Else Label1.Caption = Text3.Text End If End If End Sub