แสดงกระทู้

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 - Wonder B

หน้า: [1]
1
Column นั้นเราอ้างอิงมาจากการกำหนด RowSource ของ Combobox ครับ

RowSouce ชื่อตรงนี้นะครับ


Column มาจากนี้ครับ


ให้สังเกตุว่า คอลัมน์ มี 2 อัน โดยกำหนด ID ไว้เป็นคอลัมน์แรก และ รายการเป็นคอลัมน์ที่สอง
โดย การนับคอลัมน์นั้นจะเริ่มนับจาก 0 ไป 1 , 2 , 3 , 4 , 5 , 6 ไปเรื่อยๆ
เราต้องการให้ textbox แสดง รายการหรือList เราเลยกำหนดให้ textbox = Combobox.Column(1) นั้นเอง
โพสต์นี้ได้รับคำขอบคุณจาก: Wonder B

2
ถ้า U เป็นชื่อตัวแปรที่เก็บ ID ของผู้ใช้ ก็เพียงใส่โค้ดนี้ไว้ที่ OnClick event procedure ของปุ่มกลับหน้า Home

If U = "ID ของ Admin" Then
   DoCmd.OpenForm "ชื่อฟอร์ม Home ของ Admin"
Else
   DoCmd.OpenForm "ชื่อฟอร์ม Home ของผู้ใช้ทั่วๆไป"
End If
โพสต์นี้ได้รับคำขอบคุณจาก: Wonder B

3
แนะนำให้ดูคลิปนี้ครับ
https://youtu.be/0xMPyi4fQFI
โพสต์นี้ได้รับคำขอบคุณจาก: Wonder B

4
ผมสมมุติ Combobox ค้นหาชื่อ Cb_UserAge นะครับ
ใส่โค้ด Event AfterUpdate ดังนี้

Private Sub Cb_UserAge_AfterUpdate()
    Me.Filter = "[Age]=" & Me.Cb_UserAge
    Me.FilterOn = True
End Sub

หมายเหตุ Age คือ ชื่อฟิลล์ที่เราต้องการกรอง ครับ
โพสต์นี้ได้รับคำขอบคุณจาก: Wonder B

5
สมมุติผมมีฟิลล์ ID / Close / Field1 / Field2 / Field3
มีตารางชื่อ Table1
ที่ปุ่มสีเขียวผมก็ใส่โค้ดไปว่า

โค๊ด: [Select]
Me.RecordSource = "SELECT Table1.ID, Table1.Close, Table1.Field1, Table1.Field2, Table1.Field3  FROM Table1 WHERE (((Table1.Close)=False));"

พอเรากด ติ๊กที่ Checkbox Close แล้วข้อมูลจะหายไปครับ
โพสต์นี้ได้รับคำขอบคุณจาก: Wonder B

6
ขอโทษนะคะ รบกวนอีกซักรอบนะคะ คือ ลองเเก้ดูเเล้ว มันไม่ได้อ่ะค่ะ สงสัยจะเขียนอะไรผิด เเหะๆ >..<

ของคุณน่าจะกำลังหาวิธีเลือกข้อมูลจาก Combobox แล้วให้แสดงใน Textbox ใช่ไหมครับ
ลองดูตัวอย่างนี้ครับ
โพสต์นี้ได้รับคำขอบคุณจาก: Wonder B

7
จาก Combobox แสดง ID / รายการ

ถ้าต้องการให้ textbox แสดงรายการให้กำหนด สถานะ AfterUpdate เป็นแบบนี้ครับ

Private Sub ComboboxName_AfterUpdate()
Me.TextboxName = Me.ComboboxName.Column(1)
End Sub


รายการก็จะแสดงที่ Textbox แทนที่ ID แล้วครับ
โพสต์นี้ได้รับคำขอบคุณจาก: Wonder B

หน้า: [1]