caytregiavn77 > 21-02-16, 11:59 AM
tranthanhan1962 > 21-02-16, 12:37 PM
(21-02-16, 11:59 AM)caytregiavn77 Đã viết: http://www.mediafire.com/download/nynldn...NUMBER.rar=Val(Right([txtMSVN];14))
Chào các anh chị em trên diễn đàn, xin nhờ các anh chị em hướng dẫn giúp e cách chuyển đổi từ CHUỖI sang dạng NUMBER. Em xin nói rõ như sau:
Khi mở Frm lên, mình nhập [HoDem] va [Ten] thì MSNV sẽ tự động cập nhật: em lấy các ký tự đầu của [HoDem] & [Ten] &
Format(now(),"yyyymmddhhnnss"
P/s: Em dùng sự kiện như sau:
Private Sub txtTen_AfterUpdate()
Me.txtMSNV.Value = Firstchar(txtHoDem) & Firstchar(txtTen) & Format(Now(), "yyyymmddhhnnss")
End Sub
Nhờ các ACE chuyển txtMSVN thàng dạng NUMBER (để còn làm một số việc sau này).
Trân trọng.
Chúc cho diễn đàn ngày càng phát triển.
caytregiavn77 > 21-02-16, 07:45 PM