ฟังก์ชัน เติม 0 ข้างหน้า

ฟังก์ชัน เติม 0 ข้างหน้า





<%
Function UpZero(val,n)
     If Len(val) < n then
         Zero = ""
         For jLoop = 1 To n-Len(val)
             Zero = Zero & "0"
         Next
         UpZero = Zero & val
     Else
         UpZero = val
     End if
End function  
%>


เอาไว้เติม 0 ข้างหน้าครับ
 
โดย Val คือ ข้อมูลที่เข้ามาครับ อาจเป็น Interger หรือ Charactor ก็ได้
ส่วน n คือความยาวที่ต้องการครับ
 
ลองนำไปประยุกต์ใช้ดูนะครับ ..
 

ฝากติดตามผลงานด้านล่างด้วยครับ
--------------------------
► Website : http://www.siamfocus.com/
► LINE@ : http://line.me/ti/p/@siamfocus.com
► Facebook : https://www.facebook.com/fanpage.siamfocus
► Twitter : https://twitter.com/siamfocus
► Google+ : https://plus.google.com/+TAAMSiAMFOCUS
► Instagram : https://www.instagram.com/iamtaam
--------------------------



บทความ แนะนำ




หมวดหมู่บทความ