Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] hỏi về cập nhật textbox
#1
Xin Chào mọi người!
Mình có 1 form như thế này
[Hình: as1_zps38e59c0f.png]

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.
[Hình: as2_zps49a6a2ff.png]
Chữ ký của vqbao0702 Xin chào, mình là vqbao0702, Tham gia http://thuthuataccess.com/forum từ ngày 13-03 -13.
Reply
Những người đã cảm ơn
#2
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 
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn vqbao0702
#3
ý 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.

[Hình: as3_zps13ef1a2d.png]
Chữ ký của vqbao0702 Xin chào, mình là vqbao0702, Tham gia http://thuthuataccess.com/forum từ ngày 13-03 -13.
Reply
Những người đã cảm ơn
#4
Sửa lại là:
MsgBox ("Sai ma KH",,"Thong bao")
Chữ ký của cpucloi Tôi chỉ biết mỗi một điều là những điều tôi biết được còn quá ít 021
Gmail: cgiahuy13@gmail.com


ღღღღღTài sản của cpucloi (View All Items) ღღღღღ
Reply
Những người đã cảm ơn vqbao0702
#5
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á.
Chữ ký của vqbao0702 Xin chào, mình là vqbao0702, Tham gia http://thuthuataccess.com/forum từ ngày 13-03 -13.
Reply
Những người đã cảm ơn
#6
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"
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn vqbao0702
#7
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] [, helpfilecontext]) 
nhưng ghi như vậy nó không hiểu mà phải ghi giống như bạn.
Chữ ký của vqbao0702 Xin chào, mình là vqbao0702, Tham gia http://thuthuataccess.com/forum từ ngày 13-03 -13.
Reply
Những người đã cảm ơn
#8
(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] [, helpfilecontext]) 
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
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn vqbao0702
#9
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"

[Hình: as5_zpsb46c2965.png]

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
[Hình: as4_zps77aaa743.png]

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")
 
CStr(s)
 
Text9 

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
Chữ ký của vqbao0702 Xin chào, mình là vqbao0702, Tham gia http://thuthuataccess.com/forum từ ngày 13-03 -13.
Reply
Những người đã cảm ơn
#10
Lưu ý : Cột thành tiền năm ở subform nhé
Thân mến
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
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
  [Help] Cập nhật combobox 2 từ combobox 1 (dữ liệu ở nhiều bảng) votinh.tq 6 209 22-11-16, 11:34 PM
Bài mới nhất: votinh.tq
  [Help] Dòng chữ chạy trên form báo đến ngày sinh nhật tronghieu9792 1 122 20-10-16, 09:30 AM
Bài mới nhất: lamvankhanh
  Click đúp chuột hiện form và cập nhật dữ liệu theo số phiếu Ranju 1 132 05-10-16, 11:02 AM
Bài mới nhất: lmthu
  Form và Textbox vuthaiha90 2 334 15-08-16, 11:57 AM
Bài mới nhất: vuthaiha90
  [Help] Cập nhật từ table vào form dthminh1991 3 249 14-06-16, 01:06 AM
Bài mới nhất: truongtrungviet

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ơ