• Home
 · 
• String Manipulation
 · 
• This code converts centigrades to fahrenheit

This code converts centigrades to fahrenheit

This code converts centigrades to fahrenheit

API Declarations


Dim a, b As Double
Dim c As String



Rate This code converts centigrades to fahrenheit

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'operate
Private Sub Command1_Click()
b = (a * 1.8) + 32
Label1.Caption = "Howdy  " + c + " the temperature is " & b
End Sub
'cleaning
Private Sub Command2_Click()
a = 0
b = 0
c = ""
Label1.Caption = ""
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus
End Sub
'end button
Private Sub Command3_Click()
End
End Sub
'textbox 1
Private Sub Text1_Change()

c = Text1.Text

End Sub
'text box2
Private Sub Text2_Change()
If Text2.Text <> "" Then
a = Text2.Text
End If
End Sub

Private Sub Timer1_Timer()
times.Caption = Time
End Sub