แสดงกระทู้

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 - OddyWriter

หน้า: [1] 2 3 4 ... 35
1
ตัวอย่างครับ

2
สั่ง Append เข้าตารางของ Subform แล้วสั่ง Requery ครับ

4
เปลี่ยนมาใช้ IF dcount(...) = 0 then

5
ถ้าเราต้องการให้ cursor อยู่ที่ตำแหน่ง text scanbarcode ตลอด ต้องทำยังไงครับ
-ใช้คำสั่ง text scanbarcode.setfocus

ถ้า barcode ที่เราสแกนลงไป ไม่พบในฐานข้อมูล ให้แสดงเป็นข้อความหรือ error ต้องเขียนยังไงครับ
-ใช้คำสั่ง On Error Goto xxx (ไปค้นวิธีการใช้คำสั่งนี้เองนะครับ)

6
จะยิงกี่ครั้งก็ได้ครับ Text Box ไม่พังแน่นอน

ที่ After Update เมื่อ สั่ง Append Query แล้ว ก็สั่ง Clear ค่าใน Text Box ให้เป็น "" หรือ Null ก็ได้ครับ

7
เปลี่ยนวิธีนะครับ
ไปใส่ Text Box เพิ่มอีกอันนึง แบบตรงสีส้มที่มีข้อความ "Scan Barcode"
ที่ Event: After Update ของ Text Box อันใหม่นี้ก็สั่ง Run: Append Query เพื่อนำข้อมูลที่มี Barcode ตรงกันมาใส่ในตารางของฟอร์มข้างล่าง

แบบนี้จะเร็วกว่าครับ


8
ใช้คำสั่ง SQL ครับ เร็วกว่าเยอะ

SELECT * FROM ชื่อตาราง WHERE ชื่อฟิลด์ในตาราง = text box หรือ combo box บนฟอร์ม;

อย่าลืมปิดท้ายคำสั่งด้วย ; ทุกครั้ง

9
แสดงว่าข้อมูลไม่ได้หาย แต่เงื่อนไขไม่ครอบคลุมเอง ต้องแก้ที่เงื่อนไขของ Subform ครับ

10
สาเหตุเกิดเจ้าฟอนต์ที่มีวงเล็กว่า Detail แหละ แต่จะให้แก้ทุกฟอร์มก็คงเหนื่อยน่าดู

มาดูการแก้ปัญหาด้วยการตั้งค่าตามคลิปนี้นะครับ

https://youtu.be/sQHN_8-bWj4

11
ใช้ Tab Control เถอะครับ

12
แนะนำฝห้อ่านคู่มือการใช้ Font ครับ เพราะเวลานำมาใช้งาน
1. ปกติจะต้องการใส่อะไรครอบหน้าหลัง
2. เครื่องสแกนบางรุ่นไม่สามารถสแกนที่หน้าจอได้ ต้องพิมพ์ออกมาสแกนถึงจะได้

13
จนถึงตอนนี้ อ่านแล้วก็ไม่เข้าใจว่าต้องการอะไร

เดาว่าน่าจะต้องใช้ Validation Rule และ Validation Text มีทั้งใน Text Box และในตาราง เลือกเอาว่าจะใช้ที่ไหน
แต่กำหนดอย่างไร ทำให้ไม่ได้ เพราะไม่รู้ว่าต้องการอย่างไร


14
1. เปิดฟอร์ม frmMainForm
2. เปิดมุมมองออกแบบ
3. ใน Subform เพิ่ม text box ชื่อ txtTotal เข้าไปแล้วใส่สูตร Sum
4. ที่ Main Form ให้ใส่ Text Box แล้วกำหนด control source เป็น txtTotal ใน Subform

15
สรุปแล้วคืออย่างไรครับ ไม่เข้าใจ

tb_Slidenum เนี่ยคือ 1 ฟิลด์เหรอครับ แล้วทำไม ข้อมูลมันเหมือนเอาหลายๆ ฟิลด์มารวมกัน

16
ใช้คำสั่ง

=Right([ชื่อฟิลด์],Len([ชื่อฟิลด์])-InStr([ชื่อฟิลด์],"-"))

17
คำสั่งง่ายๆ ไม่ต้องใช้ Insert Into ให้ยุ่งยาก

กำหนด AfterUpdate ของ Text Box ว่า

if textbox > ค่าที่กำหนด then
   checkbox = true
else
   checkbox = false
end if

18
โปรแกรมแจกฟรี (ส่งท้ายปีเก่า ต้อนรับปีใหม่) นี้ ใช้ชื่อว่า Q2RFree

เหมาะสำหรับผู้ทำอาชีพอิสระที่จำเป็นต้องออกพวกใบเสนอราคา/ใบแจ้งหนี้/ใบเสร็จ

ตัวโปรแกรมใช้ระบบ MS Access มีความสามารถดังนี้
1. เก็บข้อมูลลูกค้าได้
2. เก็บข้อมูลการออกเอกสารทุกรายการได้
3. สำเนารายการจากเอกสารที่มีอยู่ได้ สำหรับกรณีทำงานเดิมอีกครั้ง หรือจะสำเนาจากใบเสนอราคาไปเป็นใบแจ้งหนี้แล้วต่อด้วยใบเสร็จก็ได้
4. สามารถใส่ Logo ได้ (อย่าลืมไปจดทะเบียนเครื่องหมายการค้าก่อนนะครับ)
5. ถ้ายังไม่มี Logo ก็สามารถออกเอกสารแบบที่ไม่มี Logo ได้
6. เปลี่ยนสีหัวเอกสารได้ จะแดง/เขียว/น้ำเงิน/ชมพู/ฟ้า/เหลือง ได้หมด ไม่มีสีดำ เพราะทำแล้วดูไม่ได้
7. ทุกเอกสารมีให้เลือก 2 แบบ ตามความชอบ

ดาวน์โหลดได้เองเลยที่ลิงก์ด้านล่างนี้
https://1drv.ms/u/s!ArcuGeSfhpiQhwGsRn9TPBxFIpp-?e=c1NGeI

สุดท้ายอย่าลืมอ่านคู่มือก่อนนะครับ
ติดปัญหาอะไรอีเมลมาถามได้ ตอบทุกอีเมลแน่นอน ถ้าไม่ตอบก็รอหน่อย เมลอาจตกไปอยู่ใน Jung Mail


หน้า: [1] 2 3 4 ... 35