以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 求教 textbox 中,如何换行 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=185924) |
-- 作者:yuchunlnog -- 发布时间:2023/3/25 19:03:00 -- 求教 textbox 中,如何换行 数据库查询到的结果是3行: 质控部 于 同意 20230326 护理部 张三 同意 20230235 医务科 王五 同意 20233323 Do While i < count1 MessageBox.show(text1.Text) text1.value = text1.value + dt1.DataRows(i)("actualname") & " " & dt1.DataRows(i)("username") & " " & dt1.DataRows(i)("comment") & " " & dt1.DataRows(i)("enddate") +"</BR>" i = i + 1 Loop 通过textbox控件 最后返回的结果是一行 。求问怎么样能让数据在文本框中按条显示之后加一个换行。 |
-- 作者:hongsejiyi -- 发布时间:2023/3/25 19:12:00 -- text1.Text = "abcd" & vbCrLf & "CDEF" & vbCrLf & "XYZJ" |
-- 作者:有点蓝 -- 发布时间:2023/3/26 20:05:00 -- Do While i < count1 MessageBox.show(text1.Text) text1.Text= text1.Text & vbCrLf & dt1.DataRows(i)("actualname") & " " & .......
|
-- 作者:yuchunlnog -- 发布时间:2023/3/28 1:56:00 -- 感谢老师解答 |