Ayuda En Visual Basic 6.0

Tema en 'Foro Libre' iniciado por babalu88, 12 Oct 2009.

  1. bab

    babalu88
    Expand Collapse
    Recluta

    Mensajes:
    13
    Me Gusta recibidos:
    0
    ola a todos bueno soy principiante en esto del visual basic y les quiero pedir ayuda para programar un boton de comando quiero qe al ingreasar 3 numeros diferente y al hacer clic en el boton de comando Ordena rque saLGAN EN orden de mayor medio y menor en diferentes cuadros de texto porfavor ayudenme
     
  2. kin

    kingzad
    Expand Collapse
    Recluta

    Mensajes:
    48
    Me Gusta recibidos:
    0
    man kisas esto te sirva....
    a mi me pidieron lo mismo en mi cole J.C.M.L.CH
    mm que raro :p
    Private Sub Command1_Click()
    Dim A, B, C As Integer
    A = Val(Text1.Text)
    B = Val(Text2.Text)
    C = Val(Text3.Text)
    If A > B And C Then
    Text4.Text = A
    End If
    If B > A And C Then
    Text4.Text = B
    End If
    If C > B And A Then
    Text4.Text = C
    End If
    If A > B < C Then
    Text5.Text = A
    End If
    If B > A < C Then
    Text5.Text = B
    End If
    If C > B < A Then
    Text5.Text = A
    End If
    If A < B And C Then
    Text6.Text = A
    End If
    If B < A And C Then
    Text6.Text = B
    End If
    If C < B And A Then
    Text6.Text = C
    End If
    End Sub
    Private Sub Command2_Click()
    Text1.Text = ""
    Text2.Text = ""
    Text3.Text = ""
    Text4.Text = ""
    Text5.Text = ""
    Text6.Text = ""
    Text1.SetFocus
    End Sub
    Private Sub Command3_Click()
    End
    End Sub
     

Compartir esta página