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
代码要怎么改啊 哪位高手给看看 跪求啊 因为自己没积分啊 所以抱歉了