|
|
|
|
¼ÒÇÇ¾Æ / 2002-02-25 / ¿ÀÈÄ 6:09:51 / 211.237.95.214
Á¶È¸¼ö : 150
|
[Áú¹®] ÀÚ¹®ÀÚ´ä...ÇØ°áÇß½À´Ï´Ù......(^^)6 |
> ±Ý¾×À» Ãâ·ÂÇϴ â¿¡¼ Çü½ÄÀ» ¸ÂÃß¾î ÁÖ°íÀÚ ÇÕ´Ï´Ù.
>
> function MoneyWrite(MValue) '½ÇÀԱݾ×(±â³³ºÎ)
> dim nfor, mTemp
>
> mTemp = ""
>
> for nFor = Len(MValue) to 2 step -1
> if ( nfor mod 3 ) = 0 then
> mTemp = Mid(MValue, nFor - 1, 1) & ","
> & mTemp
> else
> if Len(MValue) = nFor then
> mTemp = mTemp & Mid(MValue, nFor - 1, 1)
>
>
> mTemp = Mid(MValue, nFor - 1, 1) & mTemp
> end if
> next
> MoneyWrite = mtemp & " ¿ø"
>
> end function
>
> ÀÌ·¸°Ô ÇÔ¼ö¸¦ ¼±¾ðÇϱ¸¿ä.
>
> ¾Æ·¡ Ãâ·ÂºÎºÐ¿¡ ÀÌ·¸°Ô Çϸé
> <td height="44" bgcolor="#EEF1E2" width="76">
> <%=MoneyWrite(Rs(2))%></td>
>
> °ªÀÌ 12,676, ¿ø ÀÌ·¸°Ô Ãâ·ÂÀÌ µË´Ï´Ù.
> ·ÎÁ÷ÀÌ Àß ¸ø ¼¹´Â°¡ ?
> ¿ìÀ× ¾î¶»°Ô ÇÏ¸é µÇ³ª¿ä ?
> Á¶¾ð Á» ºÎŹÇÕ´Ï´Ù.
>
>
> îñ) ÇÒÀηá -----> 126766
> úÞ) ÇÒÀηá -----> 12,676, ¿ø
-----------------------------------------------------------
|
|
|