Tùy chọn
Nhập số nguyên tự chuyển thành thập phân
- Nhập số nguyên tự chuyển thành thập phân
-
RE: Nhập số nguyên tự chuyển thành thập phân
lamvankhanh > 24-09-18, 09:09 AM
(24-09-18, 07:48 AM)bằng lăng Đã viết:
(22-09-18, 12:00 PM)lamvankhanh Đã viết:
(21-09-18, 11:28 AM)bằng lăng Đã viết: Mình thấy người ta tạo 1 subform nhập điểm như sau: nhập 1 ra 1.0, nhập 125 xong chuyễn thành 1.25, nhập 55 thành 5.5, nhập 10 ra 10..... Trong access định dạng cái này ở đâu vậy các a/c? Xin cám ơn.
Gửi bạn: http://upfile.vn/uTXtKVXmNQGg/nhapdiem-rar.html
Bạn xem ở Forms: Nhapdhk giống như bạn yêu cầu.
Mật khẩu đăng nhập là gì bác lamvankhanh?
Bạn nhấn Shift lúc mở chương trình để vào trong luôn, (mật khẩu=khanh). -
RE: Nhập số nguyên tự chuyển thành thập phân
bằng lăng > 24-09-18, 09:44 AM
(24-09-18, 09:09 AM)lamvankhanh Đã viết:
(24-09-18, 07:48 AM)bằng lăng Đã viết: [quote="lamvankhanh" pid='40356' dateline='1537588841']
[quote="bằng lăng" pid='40330' dateline='1537500510']
Mình thấy người ta tạo 1 subform nhập điểm như sau: nhập 1 ra 1.0, nhập 125 xong chuyễn thành 1.25, nhập 55 thành 5.5, nhập 10 ra 10..... Trong access định dạng cái này ở đâu vậy các a/c? Xin cám ơn.
Gửi bạn: http://upfile.vn/uTXtKVXmNQGg/nhapdiem-rar.html
Bạn xem ở Forms: Nhapdhk giống như bạn yêu cầu.
Form đó chạy trên máy em bị lỗi code, bác lamvankhanh có thể trích ra cho em riêng phần nhập điểm thôi được không. Em tự học access qua youtube và tài liệu trên mạng thôi và cũng mới học nên xem không biết đoạn code nào để xử lý điểm như yêu cầu. Cám ơn lamvankhanh -
RE: Nhập số nguyên tự chuyển thành thập phân
lamvankhanh > 24-09-18, 10:00 AM
(24-09-18, 09:44 AM)bằng lăng Đã viết:
(24-09-18, 09:09 AM)lamvankhanh Đã viết:
(24-09-18, 07:48 AM)bằng lăng Đã viết: [quote="lamvankhanh" pid='40356' dateline='1537588841']
[quote="bằng lăng" pid='40330' dateline='1537500510']
Mình thấy người ta tạo 1 subform nhập điểm như sau: nhập 1 ra 1.0, nhập 125 xong chuyễn thành 1.25, nhập 55 thành 5.5, nhập 10 ra 10..... Trong access định dạng cái này ở đâu vậy các a/c? Xin cám ơn.
Gửi bạn: http://upfile.vn/uTXtKVXmNQGg/nhapdiem-rar.html
Bạn xem ở Forms: Nhapdhk giống như bạn yêu cầu.
Form đó chạy trên máy em bị lỗi code, bác lamvankhanh có thể trích ra cho em riêng phần nhập điểm thôi được không. Em tự học access qua youtube và tài liệu trên mạng thôi và cũng mới học nên xem không biết đoạn code nào để xử lý điểm như yêu cầu. Cám ơn lamvankhanh
Bạn vào Copy Code trong Form đó và dán vào Form cần xử lý của bạn và đặt sự kiện cho các textbox nhập điểm, thử đi. -
RE: Nhập số nguyên tự chuyển thành thập phân
tranthanhan1962 > 24-09-18, 10:19 AM
Dễ mà, giả sử bạn có một textbox có tên Diem bạn đưa code nay vào Event Diem_AfterUpdate
Trường hợp bạn nhập vào nhiều hơn 3 chữ số sẽ bị báo lỗi còn từ 3 chữ số trở xuống sẽ tự xử lý giống như bạn đã nói.Mã:Private Sub Diem_AfterUpdate()
Select Case Len(Diem.Value)
Case 1
Diem.Value = Diem.Value
Case 2
If Diem.Value = 10 Then
Diem.Value = Diem.Value
Else
Diem.Value = Diem.Value / 10
End If
Case 3
Diem.Value = Diem.Value / 100
Case Else
MsgBox "So khong duoc lon hon 3 chu so"
End Select
End Sub -
RE: Nhập số nguyên tự chuyển thành thập phân
bằng lăng > 24-09-18, 11:21 AM
(24-09-18, 10:19 AM)tranthanhan1962 Đã viết: Dễ mà, giả sử bạn có một textbox có tên Diem bạn đưa code nay vào Event Diem_AfterUpdate
Trường hợp bạn nhập vào nhiều hơn 3 chữ số sẽ bị báo lỗi còn từ 3 chữ số trở xuống sẽ tự xử lý giống như bạn đã nói.Mã:Private Sub Diem_AfterUpdate()
Select Case Len(Diem.Value)
Case 1
Diem.Value = Diem.Value
Case 2
If Diem.Value = 10 Then
Diem.Value = Diem.Value
Else
Diem.Value = Diem.Value / 10
End If
Case 3
Diem.Value = Diem.Value / 100
Case Else
MsgBox "So khong duoc lon hon 3 chu so"
End Select
End Sub
Cám ớn tranthanhan1962. Em làm được rồi. -
RE: Nhập số nguyên tự chuyển thành thập phân
NguyenDungAnh > 26-09-18, 12:09 PM
Bác an giải quyết bài này hay quá em đọc còn chưa hiểu ý tác giả muốn gì