Public Sub Save_Picture() SFD.InitialDirectory = (Application.StartupPath + "\ImgProduct\") SFD.Filter = "JPEG (*.jpg)|*.jpg" SFD.FilterIndex = 1 SFD.FileName = txtNamePD.Text & ".jpg" PicturePD.BackgroundImage.Save(Application.StartupPath & "\ImgProduct\" & txtNamePD.Text & ".jpg") End Sub
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง