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

hỏi về cập nhật textbox

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Forms
  • [Help] hỏi về cập nhật textbox
• hỏi về cập nhật textbox

• hỏi về cập nhật textbox

  vqbao0702 > 13-03-13, 12:05 PM

  Xin Chào mọi người!
  Mình có 1 form như thế này
  
  
  mình muốn khi nhập xong txt_MaKH thì phân ra 2 trường hợp:
  
  1/ thông báo sai mã khác hàng nếu mã khách hàng không tồn tại
  2/ txt_TenKH , txt_diachi và txt_thanhtien sẽ tự động đổi tương ứng đúng với mã khách hàng ấy nếu mã khách hàng tồn tại.
  
  phần 1 mình đã tìm ra đc cách làm,h mình muốn hỏi cách làm phần 2.Bạn nào biết xin chỉ giáo cho mình. thanks
  
  Phần 1 của mình.
  

• RE: hỏi về cập nhật textbox

  Xuân Thanh > 13-03-13, 01:32 PM

  Dùng Dlookup trong sự kiện AfterUpdate của txt_MaKH
  
  

  Mã PHP:

  Private Sub txt_MaKH_AfterUpdate()
     Me.txt_TenKH = DLookup("[TenKH]", "[tblKhachhang]", "[MaKH] = Me.txt_MaKH")
     Me.txt_DiaChi = DLookup("[DiaChi]", "[tblKhachhang]", "[MaKH] = Me.txt_MaKH")
End Sub 


• RE: hỏi về cập nhật textbox

  vqbao0702 > 13-03-13, 06:05 PM

  ý bạn là sử dụng Code Builder và phải code tay = ngôn ngữ VB à, không có cách nào khác à?
  mình thử code tay thì gặp vấn đề ở phần MsgBox.
  
  

• RE: hỏi về cập nhật textbox

  cpucloi > 13-03-13, 07:04 PM

  Sửa lại là:
  MsgBox ("Sai ma KH",,"Thong bao")

• RE: hỏi về cập nhật textbox

  vqbao0702 > 13-03-13, 08:43 PM

  mình cũng thử rồi. thử các kiểu mà mình có thể nghĩ ra.
  MsgBox ("Sai ma KH", ,"Thong bao")
  MsgBox ("Sai ma kh", ,"Thông Báo")
  MsgBox ("Sai ma kh", ,"Thông Báo",)
  MsgBox ("Sai ma kh", ,"Thông Báo","")
  MsgBox ("Sai ma kh", ,"Thông Báo", abcxyz)
  
  MsgBox ("Sai ma kh", abcxyz ,"Thông Báo")
  MsgBox ("Sai ma kh", abcxyz ,"Thông Báo",)
  MsgBox ("Sai ma kh", abcxyz ,"Thông Báo","")
  MsgBox ("Sai ma kh", abcxyz ,"Thông Báo", abcxyz)
  
  
  ai biết chỉ hộ với, chủ nhật này mình thi bằng b rồi mà h kẹt quá.

• RE: hỏi về cập nhật textbox

  Noname > 13-03-13, 10:50 PM

  Bạn nên tận dụng phím F1 mỗi khi khó khăn, nhất là lúc phát biểu hàm. Không ai nhớ hết tất cả các hàm cả. Toàn gõ rồi F1 nhờ Access gợi ý thôi!
  
  Như trường hợp msgbox của bạn ta phát biểu
  

  Mã:

  msgbox "sai ma khach hang",,"thong bao"

• RE: hỏi về cập nhật textbox

  vqbao0702 > 14-03-13, 01:15 PM

  thanks mình đã làm đc. nhưng mình không hiểu tại sao trong funtion của MsgBox ghi là
  

  Mã PHP:

  MsgBox(prompt[, buttons] [, title] [, helpfile, context]) 


  nhưng ghi như vậy nó không hiểu mà phải ghi giống như bạn.

• RE: hỏi về cập nhật textbox

  Xuân Thanh > 14-03-13, 02:58 PM

  (14-03-13, 01:15 PM)vqbao0702 Đã viết: thanks mình đã làm đc. nhưng mình không hiểu tại sao trong funtion của MsgBox ghi là
  

  Mã PHP:

  MsgBox(prompt[, buttons] [, title] [, helpfile, context]) 


  nhưng ghi như vậy nó không hiểu mà phải ghi giống như bạn.

  
  1/ Nếu để thể hiện thông báo ra màn hình ngay thì dùng như Noname đã hướng dẫn
  2/ Nếu để thực hiện một hàm MsgBox thì làm như bạn. Ví dụ :
  
  

  Mã PHP:

  Dim TraLoi
TraLoi = Msgbox("Ban muon thoat?",vbYesNo+vbQuestion,"Thong Bao")
If TraLoi = vbYes Then
.....(câu lệnh của ban)
End If 


  
  Thân mến

• RE: hỏi về cập nhật textbox

  vqbao0702 > 15-03-13, 03:30 PM

  cho mình hỏi thêm về vấn đề gán giá trị cho textbox luôn nha.
  mình có form ntn , với Text9 là textbox ghi tổng tiền của kh với mã
  

  Mã PHP:

  =DSum("ThanhTien","CT","MaKH=form.MaKH") 


  
  
  
  nhưng khi thay đổi mã KH textbox này không thay đổi theo nên mình đưa ra cách giải quyết ntn
  
  
  và nó luôn báo lỗi, mình Bấm F1 vào xem thì thấy ghi không rõ rãng và mò mãi mà vẫn không thể gán đc.Mình đã thử 1 số cách như sau
  1/
  

  Mã PHP:

  Text9.Text = DSum("ThanhTien", "CT", "MaKH=form.MaKH") 


  2/
  

  Mã PHP:

  Text9 = DSum("ThanhTien", "CT", "MaKH=form.MaKH") 


  3/
  

  Mã PHP:

  Dim s
 Dim b
 s = DSum("ThanhTien", "CT", "MaKH=form.MaKH")
 b = CStr(s)
 Text9 = b 


  
  nhưng cứ báo lỗi liên tục.ai chỉ giúp mình sai chỗ nào và phải làm gì được không? thanks

• RE: hỏi về cập nhật textbox

  Xuân Thanh > 15-03-13, 04:01 PM

  Lưu ý : Cột thành tiền năm ở subform nhé
  Thân mến
• Bài trước Bài tiếp