I need help on scrollers for a windows messenger addon
VB Code:
Dim WithEvents MSN As MsgrObject Dim User As IMsgrUser Private MSNAPI As New MessengerAPI.Messenger Private Sub Command1_Click() On Error Resume Next If Option1.Value = True Then For i = Index To Messenger.IMWindows.Count Messenger.IMWindows.Item(i).SendText Text1.Text End If Next End Sub




Reply With Quote