เราสามารถขยาย ช่อง checkbox ได้ไหมคะ



0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

15 ต.ค. 62 , 09:23:04
อ่าน 311 ครั้ง

MAKI

อยากจะทราบวิธี ขยาย Check Boxบนฟรอม คะ

 

15 ต.ค. 62 , 10:00:18
ตอบกลับ #1

PNR

: เราสามารถขยาย ช่อง checkbox ได้ไหมคะ
« ตอบกลับ #1 เมื่อ: 15 ต.ค. 62 , 10:00:18 »
อยากจะทราบวิธี ขยาย Check Boxบนฟรอม คะ



ถ้าอยากให้ใหญ่ตามที่เราอยากได้ ใช้ Label มาสร้าง Checkbox ก็ได้ครับ
วิธีทำ
1 สร้าง Label ขึ้นมา ช่องใส่ข้อความ เคาะ space bar 1 ที ไม่ต้องใส่ข้อความ
2.ตั้งชื่อว่า lblCheck
3.จัดแนวข้อความกึ่งกลาง กำหนดขนาดตามต้องการ
4.ใส่ลักษณะพิเศษ แบบยุบตัว

กำหนดสถานะเมื่อ Click เราจะใช้ ChrW(&H2713) หรือ ChrW(&H2714) คือเครื่องหมายกาถูก
โดยเมื่อติ๊กถูกให้ checkbox ที่ชื่อ check1 = true ไปด้วย

Private Sub lblCheck_Click()
Call CheckboxDIY
End Sub

Sub CheckboxDIY()
  If Me.lblCheck.Caption = ChrW(&H2713) Then
    Me.lblCheck.Caption = vbNullString
    Me.Check1 = False
  Else
    Me.lblCheck.Caption = ChrW(&H2713)
    Me.Check1 = True
  End If
End Sub

« แก้ไขครั้งสุดท้าย: 15 ต.ค. 62 , 14:37:36 โดย PNR »
เรียนเพื่อนสมาชิกและอาจารย์ทุกท่าน
ผมไม่ใช่อาจารย์และไม่ใช่ผู้ที่แตกฉานใน Access นะครับ
แค่ผู้หนึ่งที่แชร์ความรู้เท่าที่มี ถ้าหากอาจารย์ทุกท่านเห็นว่ายังไม่ถูกต้อง
กรุณาโพสตอบกระทู้ส่วนเนื้อหาที่น่าจะถูกต้องกว่าให้ด้วยเพื่อเป็นวิทยาทาน
 
โพสต์นี้ได้รับคำขอบคุณจาก: aek, MAKI

15 ต.ค. 62 , 14:27:47
ตอบกลับ #2

MAKI

: เราสามารถขยาย ช่อง checkbox ได้ไหมคะ
« ตอบกลับ #2 เมื่อ: 15 ต.ค. 62 , 14:27:47 »
ขอบคุณมากๆเรยคะ

 


บอร์ดเรียนรู้ Access สำหรับคนไทย