 |
|
ผมสนใจเกี่ยวกับ Code ตัดคำหลายได้เห็นมีตัวอย่าง ที่น่าสนใจ |
|
 |
|
|
 |
 |
|
ผมสนใจเกี่ยวกับ Code ตัดคำหยาบได้เห็นมีตัวอย่าง ที่น่าสนใจ ผมเข้าใจว่ามันเขียนด้วย asp
แต่ที่ผมต้องการคือให้มันเป็น asp.net vb code behide
Code (VB.NET)
desc = "ไอ้ห่าไอ้ส้นตีนทำไมมึงถึงเป็นคนแบบนี้กูชักจะเอมึงเต็มทีแร้วนะ ไอ้ควาย ไอ้โง่ สันดานหมา มึงนะแย่งหมามาเกิด"
temp = Array("ตีน", "ห่า", "กู", "มึง", "ควย", "โง่", "ควาย")
For i = 0 To UBound(temp)
desc = Replace(desc, temp(i), "<font color=red>...</font>")
Next
Response.Write(desc)
ไม่ทราบว่ามันต้องเขียนยังไงครับ เพราะหากเอาไปใช้งานแบบนี้มันขึ้นตัวแดง error เพียบ

Tag : .NET, Web (ASP.NET), VB.NET
|
|
 |
 |
 |
 |
Date :
2015-06-10 10:36:38 |
By :
anomater |
View :
1176 |
Reply :
8 |
|
 |
 |
 |
 |
|
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
Code (VB.NET)
Dim desc As String = "ไอ้ห่าไอ้ส้นตีนทำไมมึงถึงเป็นคนแบบนี้กูชักจะเอมึงเต็มทีแร้วนะ ไอ้ควาย ไอ้โง่ สันดานหมา มึงนะแย่งหมามาเกิด"
Dim temp() As String = {"ตีน", "ห่า", "กู", "มึง", "ควย", "โง่", "ควาย"}
For i = 0 To UBound(temp)
desc = Replace(desc, temp(i), "<font color=red>...</font>")
Next
Response.Write(desc)
|
ประวัติการแก้ไข 2015-06-10 11:30:14
 |
 |
 |
 |
Date :
2015-06-10 11:29:45 |
By :
ipstarone |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
แจ่มครับ ผลงานดีไม่มี error ใช้งานได้ครับ ขอบคุณมากๆๆๆที่ช่วยเหลือ
|
 |
 |
 |
 |
Date :
2015-06-10 11:55:32 |
By :
anomater |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|

|
 |
 |
 |
 |
Date :
2015-06-10 12:04:47 |
By :
mr.win |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
Code (VB.NET)
Response.Write(New Regex(String.Join("", {"ตีน", "ห่า", "กู", "มึง", "ควย", "โง่", "ควาย"}), RegexOptions.IgnoreCase).Replace("ไอ้ห่าไอ้ส้นตีนทำไมมึงถึงเป็นคนแบบนี้กูชักจะเอมึงเต็มทีแร้วนะ ไอ้ควาย ไอ้โง่ สันดานหมา มึงนะแย่งหมามาเกิด", New MatchEvaluator(Function(หอยหอม) "<font color='red'>" & หอยหอม.Value & "</font>")))
|
 |
 |
 |
 |
Date :
2015-06-10 12:21:42 |
By :
หน้าฮี |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
Code (VB.NET)
Response.Write(New Regex("ตีน ห่า กู มึง ควย โง่ ควาย จวย เล็ก ชิบหาย แต่ หอยหอม".Replace(" ", "|".Trim()), RegexOptions.IgnoreCase).Replace("ไอ้ห่าไอ้ส้นตีนทำไมมึงถึงเป็นคนแบบนี้กูชักจะเอมึงเต็มทีแร้วนะ ไอ้ควาย ไอ้โง่ สันดานหมา มึงนะแย่งหมามาเกิด", New MatchEvaluator(Function(หอยหอม) "<font color='red'>" & หอยหอม.Value & "</font>")))
|
 |
 |
 |
 |
Date :
2015-06-10 12:32:33 |
By :
หน้าฮี |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
Code (VB.NET)
Response.Write(New Regex("ตีน|ห่า|กู|มึง|ควย|โง่|ควาย|จวย|เล็ก|ชิบหาย|แต่|หอยหอม").Replace("ไอ้ห่าไอ้ส้นตีนทำไมมึงถึงเป็นคนแบบนี้กูชักจะเอมึงเต็มทีแร้วนะ ไอ้ควาย ไอ้โง่ สันดานหมา มึงนะแย่งหมามาเกิด", New MatchEvaluator(Function(หอยหอม) "<font color='red'>" & หอยหอม.Value & "</font>")))
|
 |
 |
 |
 |
Date :
2015-06-10 12:36:05 |
By :
หน้าฮี |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
@Progamon +55?
ปล. เผื่่อโปรแกรมเมอร์เด็กฯเขาจะมีปัญญา คิดต่อไปได้
|
 |
 |
 |
 |
Date :
2015-06-10 12:45:57 |
By :
หน้าฮี |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
วัดพลังสมองเล่นฯ ด้วยความต้องการสมมุติ ดังนี้
จาก #NO 6
"ตีน|ห่า|กู|มึง|ควย|โง่|ควาย|จวย|เล็ก|ชิบหาย|แต่|หอยหอม"
คำว่า "ตีน" ต้องการให้เป็นตัวอักษรสีแดง และระบายสีพื้นเป็นสีเหลือง (highlight)
คำว่า "ควย" ต้องการให้เป็นตัวอักษรสีทอง และระบายสีพื้นเป็นสีแหบ (highlight)
...
...
จนถึงคำสุดท้ายนั่นคือ "หอยหอม" (UBound("ตีน|ห่า|กู|มึง|ควย|โง่|ควาย|จวย|เล็ก|ชิบหาย|แต่|หอยหอม"))
... ให้มีสีไม่ซ้ำกัน
...
...
ปล. คำแนะนำ จริงฯควรจะใช้ CSS ดังนี้
1.
Code (JavaScript)
<font style='color:red; font-size:12px;>" & หอยหอม.Value & "</font>
2. คำสั่ง Response.Write(text) แสดงตำแหน่งบนหน้าจอ ตามที่ต้องการได้อย่างไร (Point(x, y))
|
 |
 |
 |
 |
Date :
2015-06-10 18:01:51 |
By :
หน้าฮี |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
|
|