แสดงกระทู้

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 - S'Saifon SB B'Banjongjairak

หน้า: [1] 2
1
แนะนำให้ดูคลิปนี้ครับ สูตรนี้คำนวณแล้วไม่พลาดครับ ทดสอบลองใช้แล้ว


แล้วในกรณีที่ต้องการนำวันที่คำนวณไว้แล้วมารวมกันอันนี้สามารถทำยังไงได้บ้างค่ะ

2
สมมติใส่       1/4/2020       อีกค่าใส่ 5/5/2020
ให้ผลแสดงค่าว่าเป็น
1 เดือน 5 วัน แบบนี้อ่ะค่ะ
ขอบคุณค่ะ

แสดงในฟอร์ม หรือคิวรี่ ครับ

แสดงบนฟอร์มค่ะ

3
สมมติใส่       1/4/2020       อีกค่าใส่ 5/5/2020
ให้ผลแสดงค่าว่าเป็น
1 เดือน 5 วัน แบบนี้อ่ะค่ะ
ขอบคุณค่ะ

4
ต้องการให้ฟอร์มแสดงรายละเอียดของฟอร์มนัันๆคล้ายกับตาราง
สามารถทำได้ไหมค่ะ อย่างไร ขอบคุณค่ะ



5
ลองดูโพสนี้ครับ https://www.thai-access.com/yeadram_view.php?topic_id=5181

รบกวนอธิบายการทำงานได้ไหมค่ะ
เพราะพอนำไปใช้แล้วไม่สามารถใช้ได้แล้วขึ้น error ค่ะ

6
อยากทราบโค้ดในการขยายฟอร์มกับ object ในฟอร์มตามขนาดหน้าจอค่ะ
เพราะมี คนใช้หลายคนแล้วก็ขนาดของจอแต่ล่ะคนไม่เท่ากันค่ะ
ขอบคุณค่ะ

7
ต้องการใช้คำสั่ง requery หลังจากอัปเดตข้อมูลในซับฟอร์ม จาก ฟอร์มหลักค่ะ

8


ต้องการทราบว่า พนักงาน a ขับรถคนไหน มานานเท่าไหร่แล้ว
ควรสร้างเป็นตาราง หรือทำเป็นแบบสอบถามดีคะ
แล้วก็นำไปแสดงที่ฟอร์มพนักงานด้วยค่ะ

9
master form ที่เห็นอยู่ด้านซ้ายนั่นเป็นการแสดงข้อมูลฉบับเต็มที่มีอยู่จริงบน tb_ccr ไม่ใช้ผลการค้นหา(จากคำใดคำหนึ่งแบบซับฟอร์ม)
ดังนั่นถ้าจะให้ master form ด้านซ้าย ทำงานก็เปลี่ยน tx_search ไปเป็น combobox เพื่อเลือกข้อมูลจากตารางลงมาแสดงเลยอ่านะ(ที่นี้ตารางค้นหาก็ไม่จำเป็นล่ะมั้งนี่)

ไฟล์ตัวอย่าง(ผมก็ก๊อบมาจากที่อื่น)ที่ตัว combobox
1.แก้ Row Source ให้เป็นเทเบิ้ลที่ต้องการดึงรายการมาแสดง(tb_ccr)
2.แก้มาโคร AfterUpdate ด้านล่างที่ SearchForRecord ตรง Where.... ให้เป็น =="[ชื่อคอลัมน์ที่ใช้รันเลขที่]=" & [TempVars]![ActiveControlValue] 

ปล.รูปที่อัพมาวาดเขียนลงไปด้วยก็ได้นะว่าอะไรเป็นอะไรคืออะไร?

ขอบคุณค่ะ  :miao: :miao: :miao:

10
ลองเปลี่ยนตามนี้ดูครับ

โค๊ด: [Select]
Private Sub bt_se_car_Click()
     Me.ชื่อซับฟอร์ม.Form.Filter = "[id_cr] like '*" & [tx_search] & "*'"
     Me.ชื่อซับฟอร์ม.Form.FilterOn = True
     Me.ชื่อซับฟอร์ม.Form.Refresh
End Sub

ได้แล้วนะคะ
แต่อยากให้ master form ค้นห้าข้อมูลเหมือนกันค่ะ เหมือนเรากดค้นหา sub form แสดงทั้งหมด master form จะแสดงรายละเอียดตามรายการที่อยู่ในซับฟอร์ม คล้าย split form อ่ะคะ

11
ดูภาพแล้วข้องใจว่า"แสดงผลการค้นหาในซับฟอร์ม"ใช้หรือไม่ครับ

ใช่ค่ะแสดงผลการค้นหาใน sub form แล้วก็สามารถเลื่อนดูข้อมูลจาก main form ได้เหมือนกันค่ะ

12

โค้ดที่ใช้ค้นหา
Private Sub bt_se_car_Click()
    sql_string = "select * from tb_ccr where id_cr like '*" & [tx_search] & "*'"
    Me.RecordSource = sql_string
End Sub
อยากให้ sub form เปลี่ยนไปตามข้อมูลที่เราค้นหาด้วยค่ะ
ขอบคุณค่ะ

13
ใช้งานได้ปกตินะครับ ไม่พบปัญหาอะไร
ลองดูว่ากำหนด References ไว้อย่างไร



สะดวก Team Viewer ไหมค่ะ

14
ลองแนบไฟล์มาครับ

ขอบคุณล่วงหน้าค่ะ

15
กดแล้วไม่ขึ้นแถบเหลืองว่า error ตรงไหนเลยค่ะ

16
ไม่ได้เลือก Microsoft Office XX.0 Object Library.

XX คือรุ่นของ Office ที่ลงไว้ในเครื่องครับ

ลองแล้วมันขึ้นแบบนี้อ่ะคะ

17
ก่อนหน้าใช้ได้นะคะ
แล้วพอไปแก้ปัญหา function DAO ใช้ไม่ได้ พอเปิดฟอร์มที่มีโค้ดด้านล่างก็ใช้ไม่ได้เลย
ไม่แน่ใจว่าไปปิดฟังก์ชั่นไว้หรือเปล่ารบกวนด้วยค่ะ




หน้า: [1] 2