Lap trinh VB ( Visual basic 6.0 )
Thứ Năm, 9 tháng 5, 2013
Tính tổng 2 số
code " tinh tong 2 so "
Private Sub Command1_Click()
Dim a As Long, b As Long, c As Long
a = Text1.Text
b = Text2.Text
c = a + b
Text3.Text = c
End Sub
Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
Không có nhận xét nào:
Đăng nhận xét
Bài đăng Mới hơn
Trang chủ
Đăng ký:
Đăng Nhận xét (Atom)
Không có nhận xét nào:
Đăng nhận xét