For Each bd As QQBuddy In QQClient.Buddies '显示好友名和在线状态 Output.Show(bd.Name & "(" & IIF(bd.Online,"在线","离线") & ")")Next
这样能显示在线、离线状态,怎么去统计在线的人数呢?