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



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

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

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 »
:meaw: :grin: :shout:
 
โพสต์นี้ได้รับคำขอบคุณจาก: aek, MAKI

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

MAKI

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

 


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


 

Sitemap 1 2 3 4 5