Question

统计VB窗体里特定文本框的个数

VB窗体里有1个文本框组,从Text1(0)到Text1(99) 共100个文本框
其中有3个文本框的文本都是"完成"这两个汉字 不包括双引号
这3 个文本框分散在上面的100个文本框中,其它97个文本框里都是数字
请问:如何统计100个文本框中内容是 "完成" 的文本框的个数 例如上边举例中的3
求代码 多谢!

Answer 1

Visual Basic 6.0具有丰富的数据类型和众多的内部函数。其采用模块化和结构化程序设计语言，结构清晰，语法简单，容易学习。其中统计VB窗体里特定文本框的个数的方法为：

1、首先，我们绘制一个命令按钮，并双击进入。

2、然后我们输入要显示的窗体。

3、然后输入【.show】方法。

4、接下来我们就可以运行测试。

5、点击后，我们便可以看到第二个窗体。

注意事项：

Visual Basic 6.0利用数据控件可以访问Access、FoxPro等多种数据库系统，也可以访问Excel、Lotus等多种电子表格。

Answer 2

dim num as integer
num=0
for i=0 to 99
    if text1(i).text="完成" then
        num=num+1
    end if
next

最终num中就是“完成”的个数

Answer 3

Dim oText As TextBox
dim icount as Integer
‘遍历文本框
For Each oText In Me.text1
if otext.text="完成" then
icount=icount+1
Next

追问

您好!谢谢您的回答!

我把代码放在命令按钮下  提示错误

Private Sub Command1_Click()

End Sub

请问如何处理