Cette petite source vous permettra de réaliser votre bot d'AFK en Visual Basic. Tout d'abord prenez votre module de ChatSend (si la fonction se nomme différemment changez le nom biensur) Faites 1 Timer, 1 TextBox, 2 CommandButtons et 1 Label
Source / Exemple :
Private Sub Command1_Click()
Timer1.Enabled = True 'Démarre le Timer
End Sub
Private Sub Command2_Click()
Timer1.enabled=false 'Pour couper le timer
End Sub
Private Sub Timer1_Timer()
Label1.Caption = Val(Label1) + 1 ' Ajoute 1 à Label1
ChatSend "Je suis absent depuis " + Label1.Caption + " Mins : "+Text1.text+""
End Sub
Conclusion :
Le Timer doit avoir 60000 comme interval (1 Min)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.