Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Thủ Thuật] Nhập dữ liệu trong texbox
#1
Hi! chào mọi người.

- Mong mọi người giúp đỡ mình về nhập dữ liệu trong texbox access. Mình chỉ muốn nhập dữ liệu là số trong  texbox thì có cách nào làm được không? Bạn nào biết thì giúp mình với. Đang rất cần.

Thanks!
Chữ ký của quocdung9999 quocdung9999,gia nhập Thủ Thuật Access từ 24-07 -15.
Reply
Những người đã cảm ơn thucgia
#2
Mã PHP:
Private Sub texbox_AfterUpdate()
  If VarType(texbox.Value) <> 2 Then
      MsgBox 
"du lieu phai la so"
      texbox.Value 0
  End 
If
End Sub 
Chữ ký của tranthanhan1962 Kết quả cuối cùng của một đời người, không phải bạn có được bao nhiêu tiền bạc, tài sản. Mà bạn còn bao nhiêu người bạn  thumbs up
ღღღღღTài sản của tranthanhan1962 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn maidinhdan , thucgia , Minh Tiên , Che_Guevara
#3
Xin góp thêm 1 cách khác cho bạn
Mã PHP:
Private Sub txtTextBox_KeyPress(KeyAscii As Integer)
   Select Case Chr$(KeyAscii)
       Case "0" To "9"Chr$(8)
       Case Else
           DoCmd.CancelEvent
   End Select
End Sub 
ai còn cách nào khác up lên mọi người cùng học hỏi với nào
Chữ ký của bvchauthanh
rose"Luôn luôn lắng nghe
Lâu lâu mới.... hiểu." rose
Reply
Những người đã cảm ơn tranthanhan1962 , thucgia , Minh Tiên , Che_Guevara
#4
(07-09-15, 07:52 PM)bvchauthanh Đã viết: Xin góp thêm 1 cách khác cho bạn
Mã PHP:
Private Sub txtTextBox_KeyPress(KeyAscii As Integer)
   Select Case Chr$(KeyAscii)
       Case "0" To "9"Chr$(8)
       Case Else
           DoCmd.CancelEvent
   End Select
End Sub 
ai còn cách nào khác up lên mọi người cùng học hỏi với nào

Cả một rừng hoa, mình hay làm cùi bắp, Xài thông báo của access luôn như sau:


Set thẳng thừng trong tab format : format= General number
Chữ ký của thucgia Hix, Access quả nhiên lợi hại !!!! http://vibigaba.esy.es/
ღღღღღTài sản của thucgia (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#5
Nếu Set thẳng thừng trong tab format : format= General number như bạn  thucgia có thể chơi luôn Msgbox tiếng Việt.


Mã PHP:
Private Sub Form_Error(DataErr As IntegerResponse As Integer)

Response acDataErrContinue
Select 
Case DataErr
  
Case 2113
    MsgBox 
"Giá trị nhập phải là số."vbCritical vbOKOnly"Chú ý"
    txtcuuchuong.Value ""
  End Select
End Sub 
Chữ ký của tranthanhan1962 Kết quả cuối cùng của một đời người, không phải bạn có được bao nhiêu tiền bạc, tài sản. Mà bạn còn bao nhiêu người bạn  thumbs up
ღღღღღTài sản của tranthanhan1962 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn thucgia , caytregiavn77
#6
(08-09-15, 12:28 AM)tranthanhan1962 Đã viết: Nếu Set thẳng thừng trong tab format : format= General number như bạn  thucgia có thể chơi luôn Msgbox tiếng Việt.


Mã PHP:
Private Sub Form_Error(DataErr As IntegerResponse As Integer)

Response acDataErrContinue
Select 
Case DataErr
  
Case 2113
    MsgBox 
"Giá trị nhập phải là số."vbCritical vbOKOnly"Chú ý"
    txtcuuchuong.Value ""
  End Select
End Sub 

ghi vào note book liền liền thôi!!!!!!
Chữ ký của thucgia Hix, Access quả nhiên lợi hại !!!! http://vibigaba.esy.es/
ღღღღღTài sản của thucgia (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#7
(08-09-15, 01:13 AM)thucgia Đã viết: ghi vào note book liền liền thôi!!!!!!

Để không bị lỗi font Unicode. Bạn phải tắt bộ gõ tiếng Việt (Ví dụ UniKey hoặc VietKey...) Chọn Keyboard Tiếng Việt của Windows, rồi mới thực hiện việc copy và dán code của mình vào module.
[Hình: Ie2gVCX.png]
Mình cũng đã giới thiệu cách sử dụng Vietnamese keyboard của Microsoft để viết code VBA tiếng Việt (không cần sử dụng VBA để xử lý font Unicode). Bạn vào đây để tham khảo
Chữ ký của tranthanhan1962 Kết quả cuối cùng của một đời người, không phải bạn có được bao nhiêu tiền bạc, tài sản. Mà bạn còn bao nhiêu người bạn  thumbs up
ღღღღღTài sản của tranthanhan1962 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#8
Thanks các bạn rất nhiều, rất hay mình đã làm được!
Chữ ký của quocdung9999 quocdung9999,gia nhập Thủ Thuật Access từ 24-07 -15.
Reply
Những người đã cảm ơn
#9
Hi, chào các bạn.

Làm phiền các bạn nữa rồi, như vậy khi nhập số thập phân, ví dụ 258.25 thì mình nhập không được, vì đã khóa bàn phím vơi dấu chấm, vậy bạn nào có cách nào vừa chỉ cho nhập số vừa nhập được số thập phân không?

Thanks!
Chữ ký của quocdung9999 quocdung9999,gia nhập Thủ Thuật Access từ 24-07 -15.
Reply
Những người đã cảm ơn
#10
020
Chữ ký của quocdung9999 quocdung9999,gia nhập Thủ Thuật Access từ 24-07 -15.
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
Question [Help] Link tất các table trong một file.mdb bằng VBA MinhnHang 6 145 29-11-16, 05:18 PM
Bài mới nhất: MinhnHang
  Tránh xung đột dữ liệu trong access quocdung9999 16 1,688 23-11-16, 11:13 AM
Bài mới nhất: quocdung9999
  [Hỏi] Kết nối nhiều lần hay kết nối 1 lần trong ADO ưu điểm hơn Minh Tiên 1 115 10-11-16, 10:41 AM
Bài mới nhất: maidinhdan
  Summary bằng VBA trong MS Access. MinhnHang 6 315 08-11-16, 08:36 AM
Bài mới nhất: MinhnHang
  [Hỏi] Số Thứ Tự Theo Nhóm Hàng Hóa Trong Access pherotao 2 141 02-11-16, 03:05 PM
Bài mới nhất: pherotao

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ