展开全部
dim i as long,h1 as long,h() as long
h1=0
redim h(0)
do while true
i = FindWindowEx(窗口句柄老粗, h1, "EDIT", vbNullString)
if i <> 0 then
redim preserve h(ubound(h)+1)
h(ubound(h))=i
h1=i
else
exit do
end if
loop
''ubound(h) 就是文侍销镇本框的总数斗行
h1=0
redim h(0)
do while true
i = FindWindowEx(窗口句柄老粗, h1, "EDIT", vbNullString)
if i <> 0 then
redim preserve h(ubound(h)+1)
h(ubound(h))=i
h1=i
else
exit do
end if
loop
''ubound(h) 就是文侍销镇本框的总数斗行
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
