sub01

   
  ºñÁÖ¾óº£ÀÌÁ÷ 2010 ¼Ò½º »ùÇà ¾ø³ª¿ä?
  ±Û¾´ÀÌ : Á¤½Â¿ì (183.¢½.5.182)     ³¯Â¥ : 12-02-06 17:11     Á¶È¸ : 4789    
ºñº£6.0À¸·Î Àß »ç¿ë ÇÏ´Ù°¡
ºñº£ 2010À¸·Î ÇÁ·Î±×·¥À» ¾÷±×·¹À̵å ÇÏ·Á´Âµ¥

6.0¿¡¼­ ÀߵǴø ¸Þ°¡¶ô ÇÔ¼öµéÀÌ ¿¡·¯°¡ ³ª³×¿ä
º¯¼ö ¼±¾ðÀÌ ¾ÈµÇÀ־ º¯¼öµéÀ» integer·Î ¼±¾ðÀ» Çϱä Çߴµ¥
ÃʱâÈ­ ºÎºÐ¿¡¼­ ¿¡·¯°¡ ³³´Ï´Ù.


Function lock_init_usb(ByVal op1 As Integer)
        Dim en_val, ad_val, Result As Integer
        en_val = 20 : ad_val = 9
        op1 = (op1 + ad_val) * en_val
        Result = lockinitusb(op1)
        lock_init_usb = Result / en_val - ad_val
 End Function


À§¿¡ ÇÔ¼ö¿¡¼­
Result = lockinitusb(op1)
ÀÌ ºÎºÐ¿¡¼­ ¿À¹öÇ÷ΰ¡ ¹ß»ýÇÕ´Ï´Ù.