开启辅助访问 切换到宽版
ug»ug视频网 › UG培训 › UG/open 二次开发 › vb 取text行数
返回列表 发新帖

[VB] vb 取text行数

[复制链接]
梅雷工具箱发表于 2015-6-25 13:11:50 | 显示全部楼层 |阅读模式
vb取text行数
'取text行数 空行也算为一行?
Private Sub Command1_Click()
arr = Split(Text1.Text, vbCrLf)
MsgBox (UBound(arr) + 1)
End Sub

'取text行数 空行不算行?
Private Sub Command1_Click()
arr = Split(Text1.Text, vbCrLf)
MsgBox (UBound(arr))
End Sub
就上UG网淘宝直营店
回复

评分 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册UG网 用百度帐号登录

本版积分规则

梅雷工具箱
版主

楼主最新

5，0000+

图文教程35,000个 视频音频1,5000个

1,000+

每日更新精品资源

309671

用户选择了就上UG网

独家原创设计教程

免费学习