01.
Dim
_array(4)
As
String
02.
_String
=
Nothing
03.
_array(0) =
"ปปป"
04.
_array(1) =
"ปปปป"
05.
_array(2) =
06.
_array(3) =
"ปปปปป"
07.
_array(4) =
08.
_array = _array.Distinct.ToArray
09.
For
i = 0
To
_array.Length - 1
10.
_String &= _array(i) & Space(1)
11.
Next
12.
Me
.Text = _String
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง
(ไม่ใช่หรอก จริงๆ อยากให้ศึกษาด้วยตัวเองก่อน)
