แสดงกระทู้

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - yot

หน้า: [1]
1
น่าจะเพราะตกเครื่องหมาย quote ไป ลองแก้เป็น =DLookup("D1", "DATA", "[D2] = '"& Mid([textbox1],4,4) & "'")
โพสต์นี้ได้รับคำขอบคุณจาก: yot

2
สมมติผมมี database=ชื่อ Master    และมี 3 Filed คือ Code=002, Name=Jorn, Add=Bangkok
ผมมี form ชื่อ frmMain     บนform มี textbox 2 ช่อง
คือ txtcode และ txtname
เงื่อนไขคือเมื่อผมใส่ 002 ลงใน txtcode
txtname จะปรากฏ Jorn ทันที (ในช่อง txtืname ต้องใส่สูตรอย่างไรครับ)

ขอบคุณมากครับ

ใช้ DLookup ครับ
โค๊ด: [Select]
Private Sub txtcode_AfterUpdate()
Me.txtname = DLookup("NAME", "Master", "CODE='" & Me.txtcode & "'")
End Sub
โพสต์นี้ได้รับคำขอบคุณจาก: yot

หน้า: [1]