VB 如何清除多个text的内容?

当一个VB程序中出现多个textbox,如何清除填写在里面的内容?有人说建控件数组text1(index)PrivateSubCommand1_Click()Fori=0... 当一个VB程序中出现多个textbox,如何清除填写在里面的内容?
有人说 建控件数组text1(index)
Private Sub Command1_Click()
For i = 0 To n 'n是你文本框的个数
Text1(i).Text = ""
Next
End Sub
可以 我想问下 这个可以吗?可以的话如何建控件数组text1(index)??
菜鸟 大家多多包涵~~~
展开
 我来答
yiivon
2008-08-24 · TA获得超过156个赞
知道小有建树答主
回答量:348
采纳率:0%
帮助的人:327万
展开全部
可以。
但上面的说明可以改一下:
For i = 0 To n 'n是你文本框的个数 (文本框的个数不是N,而是N + 1个)。

创建text1数组控件可以这样:
先创建一个text1控件,然后复制text1,粘贴...直到够您所要的数目即可.

记住,第一个text1的index为0,而不是1
ARTERIOSCLEROS
2008-08-24 · TA获得超过4184个赞
知道大有可为答主
回答量:1672
采纳率:0%
帮助的人:2441万
展开全部
这个是可以的。建控件数组的方法有二:一是选取你的Text1,Ctrl+C,CTRL+V,出来一个对话框问你,你就确定,就生成了控件数组。二是在右边的属性中,把Index设置为0,然后在代码中调用。方法是Load Text1(Index)其中Index是序列号。
你那个程序可以这样写。
=============
Private Sub Command1_Click()
For i = text1(lbound(text1)) To text1(ubound(text1))
Text1(i).Text = ""
Next
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友b66829de0
2008-08-24 · TA获得超过114个赞
知道小有建树答主
回答量:259
采纳率:65%
帮助的人:71.6万
展开全部
首先创建一个command按钮command1
然后选择command1,再在操作界面右边的属性栏找到Index项,把这一项改成0.
之后你再创建的command按钮就会以command1(index)的形式出现。
如command1(0)、command1(1)……
剩下的就可以用你的代码完成啦
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
棉花糖QQonedcae4
2015-06-02 · 知道合伙人互联网行家
棉花糖QQonedcae4
知道合伙人互联网行家
采纳数:20232 获赞数:39191
山东师范大学计算机科学与技术专业,本科学士学位,培训过软件开发,及法律。

向TA提问 私信TA
展开全部
建控件数组text1(index)
Private Sub Command1_Click()
For i = 0 To n 'n是你文本框的个数
Text1(i).Text = ""
Next
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
385762
2008-08-24 · TA获得超过463个赞
知道小有建树答主
回答量:1098
采纳率:0%
帮助的人:649万
展开全部
'添加窗体Form1,按钮Command1,再随便加几个文本框,然后添加如下代码:
Private Sub Command1_Click()
    On Error Resume Next
    Dim txttemp As Control
    For Each txttemp In Me
        txttemp.Text = ""
    Next
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(6)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式