Text3 = Val(Text1) + Val(Text2)
End Sub
Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Text3 = ""
Text1.SetFocus
End Sub
Private Sub Command3_Click()
Unload Me
End Sub
About Fitri indah tria nanda
Templatesyard is a blogger resources site is a provider of high quality blogger template with premium looking layout and robust design. The main mission of templatesyard is to provide the best quality blogger templates which are professionally designed and perfectlly seo optimized to deliver best result for your blog.
Private Sub Command1_Click() Text3 = Val(Text1) + Val(Text2) End Sub Private Sub Command2_Click() Text1 = "" Text2 = "" Text3 = "" Text1.SetFocus End Sub Private Sub Command3_Click() Unload Me End Sub ...
Tidak ada komentar:
Posting Komentar