VB中如何统计空的文本框个数

回楼主,第一楼的朋友,用的是我说的第二种方法,这方法只能对付少数控件 第一方法与第三方法,更实用.第三方法最好(它会让你学到怎么管理窗体,, VB高手%100会用,如果你不会,那么你一定不是VB高手,当然,会这方法,也不一定是VB高手,呵呵)

方法有很多种,
1、建立文本框数组,
2、每个文本框判断,
3、遍历窗体一遍（前提为文本框的Name 前缀为txt。）
4、其它
下面代码为方法3

'需要控件:text若干人,,名字前缀为Txt
'需要控件:command1

Private Sub Command1_Click()
Dim Obj As Object
Dim IntSum As Integer
For Each Obj In Me
If LCase(Left(Obj.Name, 3)) = "txt" Then IntSum = IntSum + 1
Next Obj

MsgBox "为空的文本框有" & IntSum & "个"
End Sub

假设text1 text2 text3 text4 四个文本框

dim i
i=0
if text1.text="" then i=i+1
if text2.text="" then i=i+1
if text3.text="" then i=i+1
if text4.text="" then i=i+1
msgbox("为空的"&i)

N年没摸VB了 orz 不知道对否

可以用len命令来检查.
要是空的话,意思就是:
Dim x As Integer
x=0
if len(text1.text)=0 then