Dim str As String
str = "veeza.exteen.com"
Response.Write("str = " & str)
Response.Write("str.Length = " & str.Length)
'--- ทำการหาความยาวของตัวแปร str
Response.Write("str.ToUpper = " & str.ToUpper)
'--- ทำตัวแปร str เป็นตัวพิมพ์ใหญ่
Response.Write("str.ToLower = " & str.ToLower)
'--- ทำตัวแปร str เป็นตัวพิมพ์เล็ก
Response.Write("str.IndexOf("exteen", 0) = " & str.IndexOf("exteen", 0))
'--- ทำการค้นหาข้อความ "exteen" โดยตำแหน่งเริ่มคือ 0 ผลลัพธ์จะแสดงออกมาเป็นตำแหน่งแรกที่พบ
Response.Write("str.IndexOf("exteen", 0) = " & str.IndexOf("ex-teen", 0))
'--- ทำการค้นหาข้อความ "ex-teen" เมื่อไม่พบข้อความที่ต้องการค้นหา ผลลัพธ์จะแสดงออกมาเป็น -1 เสมอ
Response.Write("str.Insert(0, "http://") = " & str.Insert(0, "http://"))
'--- ทำการแทรกข้อความ "http://" ไปที่ตำแหน่งเริ่มต้นของข้อความ
Response.Write("str.PadLeft(20, "*") = " & str.PadLeft(20, "*"))
'--- ทำการเพิ่มตัวอักษร "*" ไปที่ตำแหน่งด้านซ้ายของข้อความ (เพิ่มไปให้ครบตามความยาวที่กำหนด คือ 20 ตัวอักษร)
Response.Write("str.PadRight(20, "*") = " & str.PadRight(20, "*"))
'--- ทำการเพิ่มตัวอักษร "*" ไปที่ตำแหน่งด้านขวาของข้อความ (เพิ่มไปให้ครบตามความยาวที่กำหนด คือ 20 ตัวอักษร)
Response.Write("str.Remove(0, 6) = " & str.Remove(0, 6))
'--- ทำการลบตัวอักษรออก 6 ตัวอักษร โดยเริ่มต้นที่ตำแหน่ง 0
Response.Write("str.Replace(".", "-") = " & str.Replace(".", "-"))
'--- ทำการเปลี่ยนตัวอักษรจาก "." เปลี่ยนเป็น "-"
Response.Write("str.Substring(0, 5) = " & str.Substring(0, 5))
'--- ทำการตัดข้อความ ความยาว 5 ตัวอักษร โดยเริ่มต้นที่ตำแหน่ง 0
Response.Write("str.Substring(6) = " & str.Substring(6))
'--- ทำการตัดข้อความออก 6 ตัวอักษรจากด้ายซ้าย
str = "veeza.exteen.com"
Response.Write("str = " & str)
Response.Write("str.Length = " & str.Length)
'--- ทำการหาความยาวของตัวแปร str
Response.Write("str.ToUpper = " & str.ToUpper)
'--- ทำตัวแปร str เป็นตัวพิมพ์ใหญ่
Response.Write("str.ToLower = " & str.ToLower)
'--- ทำตัวแปร str เป็นตัวพิมพ์เล็ก
Response.Write("str.IndexOf("exteen", 0) = " & str.IndexOf("exteen", 0))
'--- ทำการค้นหาข้อความ "exteen" โดยตำแหน่งเริ่มคือ 0 ผลลัพธ์จะแสดงออกมาเป็นตำแหน่งแรกที่พบ
Response.Write("str.IndexOf("exteen", 0) = " & str.IndexOf("ex-teen", 0))
'--- ทำการค้นหาข้อความ "ex-teen" เมื่อไม่พบข้อความที่ต้องการค้นหา ผลลัพธ์จะแสดงออกมาเป็น -1 เสมอ
Response.Write("str.Insert(0, "http://") = " & str.Insert(0, "http://"))
'--- ทำการแทรกข้อความ "http://" ไปที่ตำแหน่งเริ่มต้นของข้อความ
Response.Write("str.PadLeft(20, "*") = " & str.PadLeft(20, "*"))
'--- ทำการเพิ่มตัวอักษร "*" ไปที่ตำแหน่งด้านซ้ายของข้อความ (เพิ่มไปให้ครบตามความยาวที่กำหนด คือ 20 ตัวอักษร)
Response.Write("str.PadRight(20, "*") = " & str.PadRight(20, "*"))
'--- ทำการเพิ่มตัวอักษร "*" ไปที่ตำแหน่งด้านขวาของข้อความ (เพิ่มไปให้ครบตามความยาวที่กำหนด คือ 20 ตัวอักษร)
Response.Write("str.Remove(0, 6) = " & str.Remove(0, 6))
'--- ทำการลบตัวอักษรออก 6 ตัวอักษร โดยเริ่มต้นที่ตำแหน่ง 0
Response.Write("str.Replace(".", "-") = " & str.Replace(".", "-"))
'--- ทำการเปลี่ยนตัวอักษรจาก "." เปลี่ยนเป็น "-"
Response.Write("str.Substring(0, 5) = " & str.Substring(0, 5))
'--- ทำการตัดข้อความ ความยาว 5 ตัวอักษร โดยเริ่มต้นที่ตำแหน่ง 0
Response.Write("str.Substring(6) = " & str.Substring(6))
'--- ทำการตัดข้อความออก 6 ตัวอักษรจากด้ายซ้าย
ผลการ Run Program
str = veeza.exteen.com
str.Length = 16
str.ToUpper = VEEZA.EXTEEN.COM
str.ToLower = veeza.exteen.com
str.IndexOf("exteen", 0) = 6
str.IndexOf("ex-teen", 0) = -1
str.Insert(0, "http://") = http://veeza.exteen.com
str.PadLeft(20, "*") = ****veeza.exteen.com
str.PadRight(20, "*") = veeza.exteen.com****
str.Remove(0, 6) = exteen.com
str.Replace(".", "-") = veeza-exteen-com
str.Substring(0, 5) = veeza
str.Substring(6) = exteen.com
str = veeza.exteen.com
str.Length = 16
str.ToUpper = VEEZA.EXTEEN.COM
str.ToLower = veeza.exteen.com
str.IndexOf("exteen", 0) = 6
str.IndexOf("ex-teen", 0) = -1
str.Insert(0, "http://") = http://veeza.exteen.com
str.PadLeft(20, "*") = ****veeza.exteen.com
str.PadRight(20, "*") = veeza.exteen.com****
str.Remove(0, 6) = exteen.com
str.Replace(".", "-") = veeza-exteen-com
str.Substring(0, 5) = veeza
str.Substring(6) = exteen.com
ขอบคุณเจ้าของกระทู้ ที่มา http://veeza.exteen.com/20090609/vb-net-most-used-string-methods-string
No comments:
Post a Comment