ficha de trabalho numero 3 exercicio5

Private Sub cmdafar_Click()
Label1.Caption = 9 / 5 * Val(Text1.Text) + 32
End Sub

Private Sub cmdsair_Click()
End
End Sub