VB清空窗体内所有⽂本框(其他控件同理)
<=""
<=""
...........
.........
上⾯那种⽅法太费事了
Dim ctrl As Control
For Each ctrl In Me.Controls
If TypeOf ctrl Is TextBox Then'是否为⽂本框TextBox
ctrl.Text = ""
vb所有代码End If
Next
代码很简单很好理解但着实给我们带来了很⼤的⽅便如果清空其他控件只要少做变化就⾏
例如清空lable的内容只需将第三⾏中的 textbox 改成 lable 第四⾏的 改成 ctrl.caption 就⾏了
这段代码不仅可以⽤来“清空” 也可⽤来执⾏那些需要多次执⾏的很相似的东西对于不同的功能只需做⼀些相应的变形就⾏了具体的例⼦我就不举了⼤家根据⾃⼰不同的需要去⾃⼰改造吧
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论