VB
一行代码不解,高手指教!
墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年，写一次发全网
我也要 关注 + 加入社区Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim count, i As Integer
For i = 0 To TextBox1.Text.Length() - 1
If TextBox1.Text.Substring(i, 1) = vbCr Then
count += 1
i += 1 <-----------该句代码有必要吗? '解释说是跳过换行符
End If
Next i
MsgBox(count) 代码功能实现计算一个文本框中文本的行数~
End Sub
Dim count, i As Integer
For i = 0 To TextBox1.Text.Length() - 1
If TextBox1.Text.Substring(i, 1) = vbCr Then
count += 1
i += 1 <-----------该句代码有必要吗? '解释说是跳过换行符
End If
Next i
MsgBox(count) 代码功能实现计算一个文本框中文本的行数~
End Sub
...全文
相关推荐
对HANOI问题的详细程序描述！如果你有觉得有问题的地方请指教！希望能帮助你！
对百鸡问题的详细程序描述！如果你有觉得有问题的地方请指教！希望能帮助你，你也知道这门课很难学吧！
关于字符的一些不解.rtf
关于字符的一些不解关于字符的一些不解关于字符的一些不解关于字符的一些不解关于字符的一些不解关于字符的一些不解关于字符的一些不解关于字符的一些不解关于字符的一些不解关于字符的一些不解关于字符的一些不解.rtf
一行代码比较时间大小
仅用1行代码就能比较时间大小，彻底改变繁琐的比较方法！
皇后问题的程序描述对百鸡问题的详细程序描述！如果你有觉得有问题的地方请指教！希望能帮助你
对皇后问题的详细程序描述！如果你有觉得有问题的地方请指教！希望能帮助你，你也知道这门课很难学吧！
Android 不解压直接读取zip包的方法
下面小编就为大家分享一篇Android 不解压直接读取zip包的方法，具有很好的参考价值，希望对大家有所帮助。一起跟随小编过来看看吧
