แสดงกระทู้

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 - Eik Q Sang

หน้า: [1]
1
คือผมจะให้บรรทัดที่เป็น New ด้านล่าง ให้มาอยู่บรรทัดข้างบนสุด ต้องเขียนโค้ดยังไงครับ ขอบคุณมากครับผม

โพสต์นี้ได้รับคำขอบคุณจาก: มาลี, naekkhung

2
รบกวนสอบถามคำสั่ง เมื่อกดปุ่ม แล้วให้ TextBox1 มีสีแดง ใน VB ต้องเขียนว่าอะไรครับ ขอบคุณครับ
โพสต์นี้ได้รับคำขอบคุณจาก: apirak

3
File - Option - Current Database - Application Icon ครับ
โพสต์นี้ได้รับคำขอบคุณจาก: Winisa

4
รบกวนสอบถามครับ คือ ในฟอร์มมีโค้ด Maximize เวลาเปิดฟอร์มขึ้นมา พอเอาเม้าส์ไปขยับ Title Bar พบว่า หน้าจอย่อลง
จะทำอย่างไรครับที่จะให้ฟอร์มไม่ย่อขนาดลง ผมอยากให้เต็มหน้าจอ ไม่ว่าเม้าส์จะไปขยับ Title Bar ก็อยากให้ฟอร์มยัง Maximize อยู่ครับ
ขอบคุณมากครับผม
โพสต์นี้ได้รับคำขอบคุณจาก: Jieng2021

5
ห้อง MS Access / รบกวนสอบถาม QR Code ครับ
« เมื่อ: 30 ม.ค. 63 , 10:17:03 »
ใครพอจะมีโปรแกรมสร้าง QR Code บ้างไหมครับผม ขอบคุณมากครับ
โพสต์นี้ได้รับคำขอบคุณจาก: ิboonyarit

6
อยากสร้างปุ่มบันทึกบนฟอร์มหลักครับ ไม่ทราบว่าต้องใส่โค้ดอะไรบ้างครับ แบบว่าถ้ากดปุ่มบันทึกก็ให้ระบบถามว่าต้องการบันทึกข้อมลูหรือไม่ ถ้าตอบ
 Yes ก็ให้เพิ่มข้อมูล ถ้าตอบ No ก็ไม่ต้องเพิ่มข้อมูลเข้าไปน่ะคับ
แล้วถ้าหากต้องการสร้างปุ่มยกเลิก ในกรณีบันทึกไปแล้ว แล้วคีย์ผิดหรือจะยกเลิกรายการโดยไม่ต้องไปเพิ่มข้อมูล ต้องทำอย่างไรบ้างครับ
ขอบพระคุณมากครับผม
โพสต์นี้ได้รับคำขอบคุณจาก: chai

7
การกำหนด Property ให้แก่คอนโทรลในบรรทัดของ Continuous Form จะมีผลกับคอนโทรลนั้นในทุกบรรทัดครับ แต่สำหรับการกำหนดคุณสมบัติในการแสดงบางอย่างเช่น สีพื้น, สีตัวอักษร. อักษรตัวหนา/ขีดเส้นใต้/ตัวเอียง, Enabled/Disabled สามารถใช้ Conditional Formatting ในการกำหนดเฉพาะคอนโทรลในบรรทัดนั้นๆตามเงื่อนไขให้เป็นไปอย่างอัตโนมัติได้ ดังนั้นอย่างแรกที่ต้องทำก็คือต้องหาก่อนว่าเงื่อนไขอะไรที่จะให้ Disabled   จากที่กำหนดมา ถ้าสมมุติว่าเมื่อเงื่อนไข cb_Status = "¨จบงาน" ก็ให้ Disabled ได้ ก็ให้ป้อน Conditional Formatting สำหรับคอนโทรลอื่นที่ต้องการเป็น (เช่น cb_DocEnvelope, txt_OrderID) [cb_Status] = "¨จบงาน" แล้วเลือกลักษณะคอนโทรลเป็น Disabled ครับ 



ส่วนโค้ดที่ให้มา ก็มีแค่นี้เท่านั้น

Private Sub Command27_Click()
    Me.txt_DateClose = Now()
    Me.cb_Status = "¨จบงาน"
End Sub

ขอบคุณมากครับอาจารย์สันติสุขครับ
โพสต์นี้ได้รับคำขอบคุณจาก: mbbrid

8
ใครพอจะมีวิธีอื่นๆอีกไหมครับ โดยใช้คิวรี่ในการสร้างเงื่อนไขครับ ขอบคุณมากครับผม
คำถามคือคุณจะสร้างตารางเพื่อสร้างโปรแกรม หรือต้องการจะสร้าง ID Number หรือ มีข้อมูลอยู่แล้ว ต้องการแยก เป็นหมวดหมู่ใหม่

ถ้าสองข้อหลัง ลองส่งไฟล์มาดูครับ
ถ้าข้อแรก ผมยกตัวอย่างการสร้างตาราง
การสร้างความสัมพันธ์ ของประเทศ จะต้องเริ่มจาก จังหวัด อำเภอ ตำบล หมู่บ้าน ลงไปเรื่อยๆ
ผมยังงงคำถามอยู่คับ

ลักษณะคล้ายๆที่ผมแนบไฟล์น่ะครับ แต่มันมีเงื่อนไข จะมีวิธีไหนที่เร็ว ง่าย ใช้เวลาน้อย ถ้าจะทำให้ตรงตามเงื่อนไขที่บอกไปน่ะครับ ขอบคุณมากครับผม
โพสต์นี้ได้รับคำขอบคุณจาก: kitisak

9
รบกวนสอบถามครับว่าจะสร้างตู้เก็บเอกสาร ว่าเราจะสร้างอย่างไร โดยใช้แค่เทเบิ้ลและคิวรี่เท่านั้น โดยมีรายละเอียด ดังนี้
Zone - พื้นที่
Cabinet - ตู้
Shelf - ชั้น
Sequence - ลำดับ
Size - ขนาดแฟ้มหน่วยเป็นนิ้ว
โดยมีเงื่อนไขดังนี้

Zone
- A มี 11 Cabinet
- B มี 12 Cabinet
- C มี 7 Cabinet
- D มี 9 Cabinet
- E มี 8 Cabinet
- F มี 12 Cabinet
- G มี 9 Cabinet
- H มี 7 Cabinet
- K มี 13 Cabinet

Shelf
- ถ้าเป็น Zone - A ถึง E มี 7 Shelf
- ถ้าเป็น Zone - F ถึง K มี 9 Shelf
Sequence
- ถ้าเป็น Zone - A ถึง D มี 12 Sequence
- ถ้าเป็น Zone - E มี 26 Sequence
- ถ้าเป็น Zone - F ถึง K มี 18 Sequence
ยกเว้น Zone - E8 มี 26 Sequence
 
Size (ขนาดแฟ้ม หน่วยเป็นนิ้ว)
- ถ้าเป็น Zone - A ถึง E ใช้แฟ้ม 3 นิ้ว
- ถ้าเป็น Zone - F ถึง K ใช้แฟ้ม 2 นิ้ว
ยกเว้น Zone - E8 ใช้แฟ้ม 1 นิ้ว

ขอบพระคุณมากๆครับผม
โพสต์นี้ได้รับคำขอบคุณจาก: pirin

10
ผมได้สร้างตารางการยืมสมุด ซึ่งในตาราง Table1 ประกอบด้วย NameBorrow,DateDeadline ซึ่งผมได้สร้างคิวรี่การยืมเกินกำหนด ชื่อ qryOverdue โดยนำตาราง Table1 มาแสดงในคิวรี่และได้เพิ่มฟิลด์ Overdue: [DateDeadline]-Date()
คำถาม คือ ผมต้องการจะสร้าง Report โดยมี Combo Box ซึ่งมีลิสต์ให้เลือก ระหว่าง ไม่ถึงกำหนดคืน กับ เกินกำหนดคืน จะมีวิธีการอย่างไรบ้างครับ เพื่อให้รีพอตออกมาแบบนี้ครับ ขอบคุณมากครับ

ผมว่าตรง [DateDeadline]-Date()  เปลี่ยนเปนหาว่า เกินกำหนดคืน หรือยังดีกว่านะครับ
ซึ่งเราอาจจะใช้ฟังชั่น IIF เช่น
โค๊ด: [Select]
CheckOverdue: IIf([Datedeadline]>Date(),"ไม่เกินกำหนดคืน","เกินกำหนดคืน")ที่ช่อง Criteria ของ CheckOverdue ดังนี้
โค๊ด: [Select]
[Forms]![Form1]![CheckOverdue]แล้วสร้างฟอร์ม มา 1 form ผมตั้งชื่อว่า Form1 กับ ComboBox ชื่อ CheckOverdue โดย มี List ไม่เกินกำหนดคืน กับ เกินกำหนดคืน
แล้วกด ปุ่ม เพิ่มเปิดรายงานขึ้นมา

ขอบคุณมากครับผม
โพสต์นี้ได้รับคำขอบคุณจาก: สุภาพร

หน้า: [1]