ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

¶}±Òªí³æ¦p¬dµL¸ê®Æ¡A¦p¦ó¦Û°ÊÃö³¬?

¶}±Òªí³æ¦p¬dµL¸ê®Æ¡A¦p¦ó¦Û°ÊÃö³¬?

§Ú¦³¤@¥X³fºÞ²z¡A¦b¥X³fÁ`ªí¤º¡A¥iÂùÀ»¼t°Ó¸ê®Æ®É¥i¶}±Ò¼t°Ó¸ê®Æ©ú²Ó¡A¦ý¦]¦³¨Ç¤½¥q¸ê®Æ¥¼«Ø¥ß¡A·|¬dµL¸ê®Æ¡A§Ú§Æ±æ¯à¨Ï¨ä¦Û°ÊÃö³¬¦^¨ì¥X³fÁ`ªí¡C§Ú¦b¼t°Ó¸ê®Æªí³æ¤º¦³«Ø¥ß:

Private Sub Form_Load()

If IsNull(Me![¤½¥q¦WºÙ]) = True Then
    MsgBox "¬dµL¸ê®Æ¡A±Nª½±µÃö³¬ªí³æ"
    DoCmd.Close 'Ãö³¬ªí³æ
  Else
    DoCmd.GoToControl "Â÷¶}"
End If

End Sub

¦ý¤£ª¾¬°¦ó¤´µLªkÃö³¬¸Óªí³æ¡C
§Æ±æ¥ý¶iÀ°¦£«ü¾É¤@¤U¡C

¦n¹³¨S¤H¥i¥H¨ó§U?­n¦Û¤v¦A¦hºN¯Á¤F!

TOP

        ÀR«ä¦Û¦b : ·R¤£¬O­n¨D¹ï¤è¡A¦Ó¬O­n¥Ñ¦Û¨­ªº¥I¥X¡C
ªð¦^¦Cªí ¤W¤@¥DÃD