Dim A As Integer Dim B As Integer Dim Z As String = "" For A = 1 To 5 For B = 1 To A Z &= " " Z &= "*" Next Z &= vbCrLf Next MessageBox.Show(Z) End Sub
<!DOCTYPE html> <html> <head> <title></title> </head> <body> <?php $input = isset($_POST["txt_val"]) ? $_POST["txt_val"] : ''; ?> <form action="pyramid.php" method="post" autocomplete="off"> <label for="txt_val">Please input :</label> <input type="text" name="txt_val" id="txt_val" value="<?php echo $input;?>" /> <input type="submit" name="submit" value="Sub query" /> </form> <br /> <br /> </body> </html> <?php if($input == '') {exit();} //make star //Head for($a=0; $a<=$input; $a++) { //ลองคิดดูไม่ยาก จริงๆ :) echo "<br />"; }
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง
Load balance : Server 05
