İşlem çok basit aslında autoitx3 kullanmamız yeterli olacaktır.

Dim yolla As New AutoItX3Lib.AutoItX3 'form un en üstüne eklenecek kod. Yani yazı yazdırmamız için gerekli

Private Sub Command1_Click()
Timer1.Enabled = True ' timer yani flood mesajını başlatır
End Sub

Private Sub Command2_Click()
Timer1.Enabled = False ' timer yani flood mesajını durdurur
End Sub

Private Sub Timer1_Timer()
yolla.Send textbox.Text ' facebookda kullanıcıya gönderilecek yazıdır
yolla.Send ("{ENTER}") ' kullanıcıya yazıyı ulaştırması için enter tuşuna baslması gerkir :)
End

Örnek bir resim:

Örnek bir proje: www.kodlabs.org