Visual Basic - ayudaaaaaaaaaaaaaaaa

1.- calcular el tiempo equivalente e horas minutos y segundos a un numero de sgundos leido. el resultado debe imprimirse en un formato como el sgte:

7322segundos equivale a:2 horas, 2 minutos y 2 segundos

porfasssss como se programa!!!!!!!!!!!!!!!
en visual basic

2.-en un almacen se rebaja 20% del precio del cliente si el valor a pagar es mayor a 200. dado un valor muestre lo que debe pagar el cliente

ayudaaaaaaaaaaa porfaaa programar estos dos ejercicios en vbç

espero su respuesta

aqui esta mucho mejor para que ,me entiendan mas =)

la solucion del primero seria:

Private Sub Command1_Click()
Label1.Caption = Tiempo(Val(Text1.Text))
End Sub

Private Function Tiempo(t As Integer) As String
Dim Seg As Byte, Min As Byte, Hor As Byte
Seg = t Mod 60
Min = t \ 60
Min = Min Mod 60
Hor = t \ 3600
Tiempo = Format(Hor, "00:") & Format(Min, "00:") & Format(Seg, "00")
End Function

la segunda usarias un if
If precioCliente> 200 then
PrecioCliente= PrecioCliente-(precioCliente* 0.2) '20%
'demas procedimientos que tengas que programar
end if

Suerte

gracias!!!!!!!