Dim e As RequestEventArgs = args(0)
Dim wb As New WeUI
If e.PostValues.ContainsKey("tear") Then
messagebox.show(e.PostValues("tear"))
End If
wb.AddForm("","form1","")
wb.InsertHTML("form1","<div style='text-align:center;'>")
wb.InsertHTML("form1","<textarea name='tear' id='tear' class='weui_textarea' rows='28' style='white-space:nowrap;color:blue;'>" & "" & "</textarea>")
wb.InsertHTML("form1","</div>")
With wb.AddButtonGroup("form1","ctngrp1",False)
.Add("cbtn1", "确定", "submit")
End With
e.WriteString(wb.Build)
以上代码是textarea框的页面，在textarea框内输入内容，然后保存的时候，messagebox.show中显示的内容总是会少了一个空行
比如我输入以下内容：
123
123
那么，messagebox.show中显示的是：
123
123
又比如我输入以下内容：
123
123
123
那么，messagebox.show中显示的是：
123
123
123
到底哪里出问题了，为什么会这样，怎么解决？
加好友 
发短信
Post By：2020/9/4 14:03:00 [只看该作者]
