wintq > 22-07-15, 09:37 PM
tranthanhan1962 > 22-07-15, 09:51 PM
(22-07-15, 09:37 PM)wintq Đã viết: Sau khi đã chọn lọc mình muốn đánh số TT từ 1,2,3, lại nhưng không được. Mình đã tìm nhiều bài trên mạng tuy đã đánh được nhưng những giá trị trung nhau nó lại cho số TT trung nhau. Ai làm được điều này giúp mình mới đang cần gấp. (stt trong Report thì ok mình muón hiên ra trên Form).
Kiều mình muốn hiên ra là: STT và Họ tên người thứ nhất rồi bấm Next để hiên tiếp stt và Họ tên người thứ 2
Minh Tiên > 24-07-15, 11:13 AM
tranthanhan1962 > 24-07-15, 03:00 PM
Private Sub Form_Current()
Me.STT = Me.CurrentRecord
End Sub
Minh Tiên > 24-07-15, 03:50 PM
paulsteigel > 24-07-15, 04:23 PM
(22-07-15, 09:37 PM)wintq Đã viết: Sau khi đã chọn lọc mình muốn đánh số TT từ 1,2,3, lại nhưng không được. Mình đã tìm nhiều bài trên mạng tuy đã đánh được nhưng những giá trị trung nhau nó lại cho số TT trung nhau. Ai làm được điều này giúp mình mới đang cần gấp. (stt trong Report thì ok mình muón hiên ra trên Form).
Kiều mình muốn hiên ra là: STT và Họ tên người thứ nhất rồi bấm Next để hiên tiếp stt và Họ tên người thứ 2
Minh Tiên > 24-07-15, 05:03 PM
tranthanhan1962 > 24-07-15, 11:22 PM
Minh Tiên > 25-07-15, 01:10 PM
tranthanhan1962 > 25-07-15, 11:46 PM
Sub DanhSoThuTu()
Dim Bang As Recordset
Dim numSTT As String
Set Bang = Me.RecordsetClone
numSTT = 1
Bang.MoveFirst
Do While Not Bang.EOF
Bang.Edit
Bang![STT] = numSTT
numSTT = numSTT + 1
Bang.Update
Bang.MoveNext
Loop
Bang.Close
End Sub
Private Sub ButtonChonLoc(Cancel As Integer)
DanhSoThuTu
End Sub