subform ครบหนดให้แจ้งเตือน


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

21 เม.ย. 66 , 17:51:58
อ่าน 414 ครั้ง

naekkhung

subform ครบหนดให้แจ้งเตือน
« เมื่อ: 21 เม.ย. 66 , 17:51:58 »


มี Form หลักชื่อ Mainform มี subform ชื่อ frequency แสดงข้อมูลการติดต่อลูกค้าภายในวัน
คำถามคือเมื่อ subform แสดงจำนวนครบ 3 ครั้งแล้วให้แจ้ง Popup ข้อความว่ามีการติดต่อครบ 3 ครั้งแล้ว ต้องเขียนแบบไหนครับ

 

18 พ.ค. 66 , 21:58:49
ตอบกลับ #1

nonc31

: subform ครบหนดให้แจ้งเตือน
« ตอบกลับ #1 เมื่อ: 18 พ.ค. 66 , 21:58:49 »
Private Sub Command0_Click()
    If Len([TEL TU(P)]) > 0 Then t1 = 1
    If Len([TEL TU(O)]) > 0 Then t2 = 1
    If Len([TEL TU(R)]) > 0 Then t3 = 1
    If Len([TEL TM]) > 0 Then t4 = 1
    If Len([TEL TO]) > 0 Then t5 = 1
    If Len([TEL TOI]) > 0 Then t6 = 1
   
    If t1 + t2 + t3 + t4 + t5 + t6 >= 3 Then
        MsgBox "มีการติดต่อ " & t1 + t2 + t3 + t4 + t5 + t6 & " แล้ว", vbExclamation, "แจ้ง"
    End If
End Sub

 


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


 

Sitemap 1 2 3 4 5