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)
ÀÌ ºÎºÐ¿¡¼ ¿À¹öÇ÷ΰ¡ ¹ß»ýÇÕ´Ï´Ù.