สอบถามการเขียนครับ


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

08 มี.ค. 64 , 13:30:42
อ่าน 630 ครั้ง

pattan0013

สอบถามการเขียนครับ
« เมื่อ: 08 มี.ค. 64 , 13:30:42 »
ตอนนี้ผมมีปัญหาตรงในหน้า form ผมมีปุ่มไว้ Gen เลข Job ปัญหาที่เกิดคือ พนักงานมักเผลอไปกดทำให้เลข Job ไม่เป็นจริง เลยอยากสอบถามว่ามีวิธีเช็กใหมครับ

ผมอยากให้พอกดปุ่มนี้แล้ว ถ้าช่อง Job No. ว่างเปล่าให้ใส่ค่าได้เลย แต่ถ้าช่อง Job No. มีค่าอยู่ให้ reject และ แจ้งเตือนครับ



อันนี้ส่วนหน้า code ครับ ที่เป็นคำสั่งในการ Gen เลข Job



ขอบคุณครับ

 

08 มี.ค. 64 , 15:28:44
ตอบกลับ #1

PNR

: สอบถามการเขียนครับ
« ตอบกลับ #1 เมื่อ: 08 มี.ค. 64 , 15:28:44 »
โค๊ด: [Select]
IF IsNull(CmbG) Then
Me.CmbG.SetFocus
Msgbox "CMBG ว่าง!!!"
Else
IF Not IsNull(Me.JobNo) Then
Msgbox "มีการกำหนด JobNo ไว้แล้ว"
Exit Sub
else
Me.JobNo = AutotxtID
End if
End if

แก้เฉพาะปุ่ม CommandBotton นะครับ
Time to stop for me  :dizzy:
 
โพสต์นี้ได้รับคำขอบคุณจาก: pattan0013

08 มี.ค. 64 , 16:15:35
ตอบกลับ #2

pattan0013

: สอบถามการเขียนครับ
« ตอบกลับ #2 เมื่อ: 08 มี.ค. 64 , 16:15:35 »
โค๊ด: [Select]
IF IsNull(CmbG) Then
Me.CmbG.SetFocus
Msgbox "CMBG ว่าง!!!"
Else
IF Not IsNull(Me.JobNo) Then
Msgbox "มีการกำหนด JobNo ไว้แล้ว"
Exit Sub
else
Me.JobNo = AutotxtID
End if
End if

แก้เฉพาะปุ่ม CommandBotton นะครับ

ขอบคุณมากครับ เดี๋ยวผมลองดูครับ

 

09 มี.ค. 64 , 09:17:27
ตอบกลับ #3

pattan0013

: สอบถามการเขียนครับ
« ตอบกลับ #3 เมื่อ: 09 มี.ค. 64 , 09:17:27 »
ใช้งานได้ดีเลยครับ ขอบคุณครับ

 


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


 

Sitemap 1 2 3 4 5