• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

tạo msg box thông báo "đã hết hàng"

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Thành viên giúp nhau
  • tạo msg box thông báo "đã hết hàng"
• tạo msg box thông báo "đã hết hàng"

• tạo msg box thông báo "đã hết hàng"

  kimanh87 > 10-12-10, 02:53 PM

  trong form xuat kho co 1cobo box fldmahanghoa, và text box fldsoluong
  trong cobo box có 3 cột:mahanghoa, tenhanghoa,và tonkho
  em muốn tạo msg box thông báo :"đã hết hàng" khi nhập fldsoluong lớn hơn số lượng tonkho trong cobo box mahanghoa
  em phaỉ làm thế nào mong các anh chị giúp em! tks![/code][/php]
  (vì dung lượng file đính kèm quá lớn, em nén rùi mà vẫn ko gửi đc)

• RE: tạo msg box thông báo "đã hết hàng"

  Noname > 10-12-10, 03:06 PM

  Bạn có thể vào: http://thuthuataccess.co.cc/forum/Thread...-file-hinh để biết các trang chia sẻ file dùng up khi file quá lớn.
  Trở lại, vì bài viết bạn không có ví dụ mẫu nên mình không hình dung ra hết. Chỉ trả lời thế này:
  Trong sự kiện update textbox fldsoluong, bạn đặt
  

  Mã:

  Private Sub fldsoluong_AfterUpdate()
If fldsoluong> mahanghoa.column(2) then
msgbox " Da Het hang"
end if
end Sub

• RE: tạo msg box thông báo "đã hết hàng"

  kimanh87 > 10-12-10, 04:11 PM

  cảm ơn bạn đã giúp,những mình làm thử theo cách của bạn rùi mà vẫn ko đc.
  minh xin nói rõ hơn vấn đề của mình để bạn hiểu hơn và giúp đỡ mình nhé.
  trong form xuất kho có:
  cobobox mahanghoa , text box tenhanghoa, text box soluong,text box dongia.......
  (trong cobo box mahanghoa co 3cột:mahang, tenhang, tonkho)
  
  ví dụ
  cobobox:mahanghoa có
  BH01 sp1 20
  BH02 sp2 10
  nếu mình nhập vào text box soluong với sp1 là 22 thì sẽ xuất hiện bảng thông báo "đã hết hàng"
  thì mình phải viết câu lệnh như thế nào? mong các anh chị và các bạn giúp đỡ!
  tks!

  ---

  cảm ơn bạn đã giúp,những mình làm thử theo cách của bạn rùi mà vẫn ko đc.
  minh xin nói rõ hơn vấn đề của mình để bạn hiểu hơn và giúp đỡ mình nhé.
  trong form xuất kho có:
  cobobox mahanghoa , text box tenhanghoa, text box soluong,text box dongia.......
  (trong cobo box mahanghoa co 3cột:mahang, tenhang, tonkho)
  
  ví dụ
  cobobox:mahanghoa có
  BH01 sp1 20
  BH02 sp2 10
  nếu mình nhập vào text box soluong với sp1 là 22 thì sẽ xuất hiện bảng thông báo "đã hết hàng"
  thì mình phải viết câu lệnh như thế nào? mong các anh chị và các bạn giúp đỡ!
  tks!

• RE: tạo msg box thông báo "đã hết hàng"

  haquocquan > 10-12-10, 04:42 PM

  Như Noname trả lời bạn là được rồi.
  Nhưng cũng còn phụ thuộc vào column count của cobo của bạn nữa.
  Bạn up file lên nhé, cụ thể hơn để mọi người hỗ trợ trực tiếp. Nói vo khó lắm.

• RE: tạo msg box thông báo "đã hết hàng"

  kimanh87 > 11-12-10, 11:38 AM

  cám ơn tất cả các bạn quan tâm đến câu hỏi của mình, cảm ơn ban noname đã giúp mình trả lời câu hỏi của mình
  nhờ bạn mà mình đã làm đc rùi, mình chỉ xin sửa một chút về câu lệnh của bạn như thế này:
  Private Sub fldSoLuong_KeyDown(KeyCode As Integer, Shift As Integer)
  If KeyCode <> 13 Then Exit Sub
  If CInt(fldSoLuong) > CInt(fldMaHangHoa.Column(2)) Then
  MsgBox " Da Het hang"
  End If
  End Sub
  bạn nào gặp phải vấn đề giống mình thì có thể làm giống mình xem co đc ko nhé.
  tks!

• RE: tạo msg box thông báo "đã hết hàng"

  haquocquan > 11-12-10, 12:33 PM

  (11-12-10, 11:38 AM)kimanh87 Đã viết: cám ơn tất cả các bạn quan tâm đến câu hỏi của mình, cảm ơn ban noname đã giúp mình trả lời câu hỏi của mình
  nhờ bạn mà mình đã làm đc rùi, mình chỉ xin sửa một chút về câu lệnh của bạn như thế này:
  Private Sub fldSoLuong_KeyDown(KeyCode As Integer, Shift As Integer)
  If KeyCode <> 13 Then Exit Sub
  If CInt(fldSoLuong) > CInt(fldMaHangHoa.Column(2)) Then
  MsgBox " Da Het hang"
  End If
  End Sub
  bạn nào gặp phải vấn đề giống mình thì có thể làm giống mình xem co đc ko nhé.
  tks!

  
  Theo cách của bạn, thì cứ nhập một phím, thì lại phải kiểm tra xem phím đó có phải ENTER không.
  Bạn nên đặt vào sự kiện After Update như Noname, hoặc sự kiện On Enter
  
• Bài trước Bài tiếp