<%@ Page Language="VB" %> <script runat="server"> Sub Button1_OnClick(sender As Object, e As EventArgs) Me.lblText1.Text = Replace(Me.TextArea1.Value,vbCrLf,"<br>") End Sub </script> <html> <head> </head> <body> <form runat="server"> <textarea id="TextArea1" cols="40" rows="4" runat="server" /> <input id="Button1" type="button" OnServerClick="Button1_OnClick" value="Button" runat="server" /> <hr> <asp:Label id="lblText1" runat="server"></asp:Label> </form> </body> </html>
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน Source Code 2.0 ของทีมงานไทยครีเอท
VB.NET || 
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน 
Load balance : Server 04
