làm thế nào

[nguyenvanduc3112]

mình có 1 caí textbox (lưu số thứ tự ) và 1 cái button
mỗi lần nhắn vào cái button thì số trong textbox sẽ cộng lên 1
bạn nào bít code giúp minh với

[mavabi]

Textbox.Text = Val(Textbox.Text) + 1

Fun!

[nguyenvanduc3112]

cám ơn ban, được rùi, bạn cho mình hỏi là nếu mình muốn giữ lại cái số đó, để lần sau khi làm tiếp thì bấm cho + lên 1 thì làm sao
chứ nếu mình tắt đi thì lần sau nó lại bắt đầu tư 1

[QuyNam]

muốn vậy thì bạn phải lưu giá trị đó để dùng lần sau, lưu vào registry chẳng hạn



Private Sub Form_Load()
Text1.Text = GetSetting("AppName", "Infomation", "ValueName", "1")
End Sub

Private Sub Form_Unload(Cancel As Integer)
SaveSetting "AppName", "Infomation", "ValueName", Val(Text1.Text)
End Sub

[nguyenvanduc3112]

mình đã làm theo cách của bạn nhưng ko được, mỗi lân thoát ra vào lại nó đều bắt đầu từ số 1