如何加入变量取所有的qq群成员 [已解决]

万能群发器售

$LeiBiaoLeiMingZi="ATL:30A4FE481"
$LieBiaoBiaoTi="群设置 — ACN Kernel"
$fi=ControlListView ($LieBiaoBiaoTi,"",$LeiBiaoLeiMingZi,"GetText",0,1)
$fi1=ControlListView ($LieBiaoBiaoTi,"",$LeiBiaoLeiMingZi,"GetText",0,2)
$fi2=ControlListView ($LieBiaoBiaoTi,"",$LeiBiaoLeiMingZi,"GetText",0,3)

$fi3=ControlListView ($LieBiaoBiaoTi,"",$LeiBiaoLeiMingZi,"GetText",1,1)
$fi4=ControlListView ($LieBiaoBiaoTi,"",$LeiBiaoLeiMingZi,"GetText",1,2)
$fi5=ControlListView ($LieBiaoBiaoTi,"",$LeiBiaoLeiMingZi,"GetText",1,3)

MsgBox(0,"QQ",$fi) 
MsgBox(0,"昵称",$fi1) 
MsgBox(0,"性别",$fi2) 

MsgBox(0,"QQ",$fi3) 
MsgBox(0,"昵称",$fi4) 
MsgBox(0,"性别",$fi5) 

;如上所示，求高人指教如何做变量，直接从第一行到第500行！！！！！！！！！！！！！！！！！！

发错地方了....请管理 移动到【问题区...........

已经解决了.............

For $count = 0 To 500
        
$LeiBiaoLeiMingZi="ATL:30A4FE481"
$LieBiaoBiaoTi="群设置 — ACN Kernel"
$fi=ControlListView ($LieBiaoBiaoTi,"",$LeiBiaoLeiMingZi,"GetText",$count,1)
$fi1=ControlListView ($LieBiaoBiaoTi,"",$LeiBiaoLeiMingZi,"GetText",$count,2)
$fi2=ControlListView ($LieBiaoBiaoTi,"",$LeiBiaoLeiMingZi,"GetText",$count,3)

MsgBox(0,"qq群成员获取","    QQ     "&$fi&"    昵称     "&$fi1&"    性别     "&$fi2) 

 Next

以下是 闪屏的 源码  强悍的 源码啊

$Whd=WinGetHandle('群设置')
;_MouseClick($Whd,'left',60, 172)
Global $count=0,$NameList='帐号                昵称'
        $CtrlCalssList=WinGetClassList($Whd)
        $CtrlCalss=StringRegExp($CtrlCalssList,'(ATL:.+)',3)
        $CtrlList=$CtrlCalss[UBound($CtrlCalss)-1]&'1'
While 1
$number=ControlListView ($Whd,"",$CtrlList,"GetText",$count,1)
If $number='' Then ExitLoop
$nickname=ControlListView ($Whd,"",$CtrlList,"GetText",$count,2)
$NameList=$NameList&@CRLF&$number&'                '&$nickname
$count+=1
WEnd
FileWrite(StringReplace(WinGetTitle($Whd),'群设置 — ','')&'.txt',$NameList)
WinClose($Whd)

kadingxiaodi

测试一下QQ，看看好不好用

javarike

貌似不行呢。。。。

styore

好像真不行