ID:
PW:

     0 ºÐ
     30 ºÐ

¿£Áö´Ï¾î µ¹Á¾
  dolljong

Áö½ÄÀº °øÀ¯µÇ¾úÀ» ¶§ ±× ÈûÀ» ¹ßÈÖÇÑ´Ù.


AutoCAD ActiveX ¸Àº¸±â °­ÁÂ(13)

ÇÔ¼ö¸¸µé±â
¿À´ÃÀº ÇÔ¼ö¸¦ ¸¸µé¾îº¸µµ·Ï ÇÏ°Ú½À´Ï´Ù. sub·Î ½ÃÀÛÇÏ´Â °ÍÀº ´Üµ¶À¸·Î ½ÇÇàµÇ´Â ÇÁ·Î±×·¥ÀÔ´Ï´Ù. º¸Åë procedure¶ó°íµµ Çϴµ¥, ½ÇÇà¸í·ÉÀ¸·Î ½ÇÇà½ÃÅ°°Ô µË´Ï´Ù. ÇÏÁö¸¸ ÇÁ·Î±×·¥¿¡¼­ ÀÌ·¸°Ô procedure¸¸ ÀÖ´Â °ÍÀÌ ¾Æ´Õ´Ï´Ù. ¿¹¸¦ µé¾î¼­ ±ÙÀÇ °ø½ÄÀ» ±¸ÇØ¾ß µÇ´Â ÇÁ·Î±×·¥ÀÌ ÀÖ´Ù°í ÇսôÙ. ±×¸®°í ±ÙÀÇ °ø½ÄÀ» ÇÁ·Î±×·¥¿¡¼­ ¼ö½Ê¹ø ¾Æ´Ï ¼ö¹é¹ø ±¸ÇØ¾ß µÈ´Ù°í ÇÏ¸é ¾î¶»°Ô ÇؾßÇÒ±î¿ä? ¸Å¹ø ÄÚµùÀ» ÇÒ ¼ö´Â ¾ø´Â ÀÏÀÌ°í, ±×·¡¼­ ±ÙÀ» ±¸ÇØÁÖ´Â ÇÔ¼ö¸¦ ¸¸µé°í ±×°ÍÀ» ÇÊ¿äÇÒ ¶§¸¶´Ù È£ÃâÀ» ÇÒ ¼ö ÀÖ´Â functionÀ̶õ °ÍÀÌ »ý±â°Ô µÈ °ÍÀÔ´Ï´Ù.

Function functionname(³Ñ¾î¿À´Â º¯¼ö)
 <½ÇÇàºÎºÐ>
 functionname = ³Ñ¾î°¡´Â °ª
End function

ÀÌ·¸°Ô Á¤ÀǸ¦ ÇÏ°Ô µË´Ï´Ù. È£ÃâÇÏ´Â Ãø¿¡¼­ ÇÔ¼ö¿¡°Ô ³Ñ°ÜÁÖ´Â ¼ýÀÚÀÔ´Ï´Ù. ±ÙÀÇ °ø½ÄÀÇ ¿¹¸¦ µéÀÚ¸é ax2+bc+c¿¡¼­ ±ÙÀÇ °ø½Ä¿¡ ´ëÀÔÇϱâ À§ÇØ ÇÊ¿äÇÑ º¯¼ö´Â a,b,cÀÔ´Ï´Ù. ÀÌ a,b,c¸¦ ³Ñ°ÜÁÖ´Â °ÍÀÔ´Ï´Ù. ±×·¯¸é ÇÔ¼ö¿¡¼­ ±ÙÀ» ±¸Çؼ­ ³Ñ°ÜÁÖ´Â °ÍÀÔ´Ï´Ù. °è»ê °á°ú¸¦ ³Ñ°ÜÁÖ±â À§Çؼ­´Â ÇÔ¼ö¸í¿¡´Ù °á°ú°ªÀ» ´ëÀÔÇÏ¸é µË´Ï´Ù. functionname=°ª À̶ó°í ¸»ÀÌÁÒ. 2Â÷¹æÁ¤½ÄÀÇ ±ÙÀ» ±¸ÇØÁÖ´Â ÇÔ¼ö¿¡¼­ ³Ñ¾î¿À´Â °ªÀº a,b,cÀÌ°í °è»ê°á°ú¸¦ ³Ñ°ÜÁÖ±â À§Çؼ­´Â functionname=°ª À̶ó°í ÇÏ°Ô µË´Ï´Ù. ¿¹¸¦ µé¾îº¸¸é

Function sol(a,b,c)
  sol = (-b+(b^2-4*a*c)^2)/(2*a)
end Function

À§¿Í °°ÀÌ ÀÔ·ÂÇÑ´ÙÀ½¿¡ Á÷Á¢½ÇÇàâ¿¡¼­ ? sol(1,5,3)À̶ó°í ÀÔ·ÂÇغ¸¼¼¿ä. 2Â÷¹æÁ¤½ÄÀÇ Ã¹¹ø° ±ÙÀ» º¸¿©ÁÙ °ÍÀÔ´Ï´Ù. ¾Æ·¡±×¸²Ã³·³ ¸»ÀÌÁÒ.



ÀÌÁ¦ ÇÁ·Î±×·¥ ¾îµð¿¡¼­µç sol(a,b,c)´Â ax2+bx+cÀÇ Ã¹¹ø° ±ÙÀ» ÀǹÌÇÕ´Ï´Ù. µû¶ó¼­ a=sol(1,5,3)À̶ó°í ½á¼­ ¾î¶² º¯¼ö¿¡ ´ëÀÔµµ ÇÒ ¼ö ÀÖ°í b = sol(1,5,3)*10 ÇÔ¼öÀÇ °á°ú°ª¿¡´Ù ´Ù¸¥ ¼ýÀÚ¸¦ °öÇϰųª »©°Å³ª ÇÒ ¼ö ÀÖ½À´Ï´Ù.

¿À´ÃÀº ¿©±â¼­ ¸¶Ä¡±â·Î ÇÏ°í ³»ÀÏÀº range¸¦ ÀÎÀÚ·Î ¹Þ´Â fucntionÀ» ¸¸µé¾îº¸µµ·Ï ÇÏ°Ú½À´Ï´Ù.

[ÀÌÀü °­ÁÂ]     [´ÙÀ½ °­ÁÂ]


dolljong@gmail.com