msf怎么换行啊

怎样输入后换行啊
msf  也就是点击直线选继续然后跳到直线数据输入，输完后点击完成，数据输到msf第一行，按返回再点击直线按继续按钮，输入数据后点完成 数据输到msf第二行[local]1[/local]怎么达到这种效果啊，向下换行输入。

点击完成 换一行 继续输入
原文  http://zhidao.baidu.com/question/484161962.html?quesup2

Private Sub Command5_Click()
If Val(Text2.Text) > 0 Then
MSFlexGrid1.TextMatrix(1, 0) = "直线"
MSFlexGrid1.TextMatrix(1, 1) = Val(Text2.Text)
MSFlexGrid1.TextMatrix(1, 2) = Val(Text3.Text)
MSFlexGrid1.TextMatrix(1, 3) = Val(Text4.Text)
Frame2.Visible = False
Frame1.Visible = True
Else
MsgBox "请输入直线长度！"
End If
MSFlexGrid1.AddItem (MSFlexGrid1.TextMatrix(1, 3)), 1
End Sub

代码要怎么改啊  哪位高手给看看  跪求啊  因为自己没积分啊 所以抱歉了