foreach(string s in textBox1.Lines)
{
sTxt = sTxt + s + "\\n"//每行末尾都加一个回车
}
// sTxt insert into database 带回车插入到数据库中,拿出来也是一样的。要注意数据库中字段的格式
1、首先打开vs2015,新建或者打开已有的程序。
2、然后需要文件-打开-项目/解决方案,找到自己的程序。
3、把结果数据显示在textBox6中,先初始化textBox6,输入textBox6.Text += "∆p0 = " + deltap0.ToString() + "\r\n"其他的类似。
4、启动-运行一下程序,可以发现在TextBox中数据显示正确而且自动换行。
5、还有另一个方式是输入: textBox2.Text += "α,R,Ls,TH,LT,X,Y,K_ZH,K_HY,K_YH,K_HZ,Aj1,Aj2" + "\r" + line + "\r\n"。
称设置文本框 的属性 Scrollbars为 vertical为垂直。然后允许多行,并设置Enter回车键的行为(Access设置为文本中新行即可)1,设置文本框Multiline = true
2,设置文本框Wordwarp = true
2,设置文本框Enterkeybehavior= true
读取每行的值
只有在MuiltLine属性为True的前提下TextBox才有多行,由于在这个控件中输入文本时换行是Ctrl+Enter实现的,所以用Split(TestBox.Value,Chr(10))就可以分割文本并保存在数组中:
Private Sub TextBox1_LostFocus()
If Len(TextBox1.Value) >0 Then
arr = Split(TextBox1.Value, Chr(10))
'激活下面的语句可以在A列显示数组arr
'Range("a1").Resize(UBound(arr) + 1) = Application.WorksheetFunction.Transpose(arr)
End If
End Sub
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)