VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



This code converts centigrades to fahrenheit

by Oscar Garcia (1 Submission)
Category: String Manipulation
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Fri 17th October 2003
Date Added: Mon 8th February 2021
Rating: (1 Votes)

This code converts centigrades to fahrenheit

API Declarations


Dim a, b As Double
Dim c As String

Rate This code converts centigrades to fahrenheit



'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
 

Download this snippet    Add to My Saved Code

This code converts centigrades to fahrenheit Comments

No comments have been posted about This code converts centigrades to fahrenheit. Why not be the first to post a comment about This code converts centigrades to fahrenheit.

Post your comment

Subject:
Message:
0/1000 characters