เทคนิคการใช้งาน Visual Baic6.0
popmce07 (Member) |
ขอเริ่มประเดิม กระทู้แรกก่อนนะครับ http://wichai.dru.ac.th/Course/VB/VB_6/Lesson_1.htm อีกเว็บที่แนะนำครับ http://wara.com/modules.php?name=News&file=listart1&ttid=13 เจ้าของเว็บไซต์ แก้ไขเมื่อ 22/09/2010 - 09:37 |
popmce07 (Member) |
Example Code สำหรับการ Random ค่าตัวเลขครับ แสดงผลเป็นทศนิยม สี่ตำแหน่ง Randomize Timer ' นำค่าที่อ่านได้จาก เวลา Timer ของคอมพิวเตอร์มาช่วยในการ Random ของคำสั่ง Rad ถ้าไม่ใส่คำสั่งบรรทัดนี้ ค่า Rad จะซ้ำค่าเหมือนเดิมทุกครั้งที่ปิดโปรแกรมแล้วเปิดใหม่ Label1.Caption = Format((Rnd * 10 + 1), "#0.0000") ถ้าต้องการให้แสดงเป็นจำนวนเต็ม Label1.Caption = int(Rnd * 10 + 1)) ' Rondom ค่าให้เป็นจำนวนเต็ม เจ้าของเว็บไซต์ แก้ไขเมื่อ 22/09/2010 - 09:39 |