¡ÒÃàÃÕ¡
àÁ¹Ù¾ÔÁ¾ì ¢Í§ MS
Access ´éǤÓÊÑè§ acCmdPrint
â´Â Í.·Í§¨ØÅ ¢Ñ¹¢ÒÇ
¤ÇÒÁÃÙé¾×é¹°Ò¹â»Ãá¡ÃÁAccess ¡ÒÃãªé VBA ¡Ñºâ»Ãá¡ÃÁ Access
â´Â»¡µÔ ¡ÒÃÊÃéÒ§àÁ¹Ùã¹â»Ãá¡ÃÁ AccessãËéÊÑ觾ÔÁ¾ì ÊÒÁÒö·Óä´éÍÂÙèáÅéÇ
à¾ÃÒÐâ»Ãá¡ÃÁ¨ÐÁÕàÁ¹Ù¾ÔÁ¾ì ãËéÊÒÁÒö¹ÓÁÒãªéä´é·Ñ¹·Õ áµèàÁ¹Ù¾ÔÁ¾ì·ÕèàÃÕ¡ÁÒãªé¹Õé
¨ÐÊÑ觾ÔÁ¾ìÍÍ¡·Ò§à¤Ã×èͧ¾ÔÁ¾ì·Ñ¹·Õ äÁè»ÃÒ¡®àÁ¹Ù¾ÔÁ¾ìà¾×èÍãËéµÑ駤èÒã´ æ
·Ñé§ÊÔé¹ ´Ñ§¹Ñé¹ ¶éÒ¼Ùéãªéµéͧ¡ÒáÓ˹´ÇèÒ¨ÐÊÑ觾ÔÁ¾ìà¾Õ§ºÒ§Ë¹éÒ
ËÃ×ÍÊÑ觾ÔÁ¾ìà»ç¹ªèǧ æ ¡çäÁèÊÒÁÒö·Óä´é à¾ÃÒÐäÁèÁÕàÁ¹Ù¾ÔÁ¾ì»ÃÒ¡®
¨Ö§äÁèÊÒÁÒöµÑ駤èÒã´ æ ä´é ´Ñ§¹Ñé¹ ¨Ö§¨Óà»ç¹µéͧãªé¤ÓÊÑè§ ¢Í§ VBA à¢éÒªèÇ ¤ÓÊÑ觷ÕèÇèÒ¹Ñé¹ ¡ç¤×Í acCmdPrint¡ÒÃãªé¤ÓÊÑ觹Õé ¨Óà»ç¹µéͧãËéâ»Ãá¡ÃÁµÃǨÊͺ error ´éÇ à¾ÃÒжéÒ¼Ùéãªé¤ÅÔ¡ Cancel ¨Ðà¡Ô´ error áÅÐ ·ÓãËéâ»Ãá¡ÃÁáÊ´§¼Å¼Ô´»¡µÔä» àªè¹
ÍÒ¨¨ÐáÊ´§àÁ¹Ù¾ÔÁ¾ì 2 ¤ÃÑé§ à»ç¹µé¹
¡ÒÃãªé¤ÓÊÑè§ ·Óä´é´Ñ§¹Õé
- ÊÃéÒ§¿Ñ§ªÑè¹ã¹âÁ´ÙÅ
´Ñ§¹Õé
Function printDialog()
On Error Resume Next
DoCmd.RunCommand acCmdPrint
On Error GoTo 0
End Function
¿Ñ§ªÑè¹¹Õé àÃÕ¡ãªé¤ÓÊÑè§ acCmdPrint áÅеÃǨÊͺ error ·Õèà¡Ô´¢Öé¹
- ÊÃéÒ§àÁ¹ÙãËÁè áÅÐãªéàÁ¹Ù print
- ¤ÅÔ¡¢ÇÒ·ÕèàÁ¹ÙãËÁèà¾×èÍàÃÕ¡ property
- ¤ÅÔ¡·Õè properties à¾×èÍà»Ô´àÁ¹Ù àÃÕ¡ãªé¿Ñ§ªÑè¹·ÕèÊÃéÒ§¢Öé¹ãËÁè¹Õé·Õè On Action ¢Í§àÁ¹Ù â´Â¾ÔÁ¾ì=printDialog() ŧ㹪èͧ µÒÁÀÒ¾
à»ç¹ÍѹàÊÃ稡ÒÃàÃÕ¡àÁ¹Ù¾ÔÁ¾ì à¾×èÍãËé¼ÙéãªéÊÒÁÒöµÑ駤èÒ¡ÒþÔÁ¾ì ä´éµÒÁµéͧ¡ÒÃ