05-08-16, 05:34 PM
السلام عليكم..
ازاى اخلى التايمر يتوقف بعد دقيقة ومن ثم يبدا يكمل ؟
يعنى لو توقف عند رقم 8 مثلا يكمل من رقم 9 ثم يتوقف
عند رقم 10 ثم يكمل من رقم 11 وهكذا يعنى لا يكمل من الاول
وشكرا لكم
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Text = min
Timer1.Interval = 60000
Timer1.Start()
End Sub
Dim min As Byte = 0
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
min += 1
Me.Text = min
End Sub(05-08-16, 08:26 PM)tariq2812 كتب : [ -> ]وعليكم السلام
التايمر مايحتج توقفة لان فهمت من فكرتك تبغى عداد لدقائق
يعني بعد كل 60 ثنية بيقع الحدث
جرب االكود
كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Text = min
Timer1.Interval = 60000
Timer1.Start()
End Sub
Dim min As Byte = 0
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
min += 1
Me.Text = min
End Sub
private void timer1_Tick(object sender, EventArgs e)
{
var spamGroups = new List<FacebookGroupItem>();
for (int i = 0; i < GroupCheckedListBox.Items.Count; i++)
{
if (GroupCheckedListBox.GetItemChecked(i))
spamGroups.Add((FacebookGroupItem)GroupCheckedListBox.Items[i]);
}
if (spamGroups.Count == 0)
{
MessageBox.Show(
"Dude! Select at least one Group, por favor!",
"No Groups",
MessageBoxButtons.OK,
MessageBoxIcon.Warning
);
return;
}
ThreadPool.QueueUserWorkItem(delegate
{
f_NFacebookClient.PostToGroup(spamGroups, MessageTextBox.Text, LinkTextBox.Text);
});
}
// Event Handling
void f_NFacebookClient_OnGroupPostDone(string groupID)
{
StatusRichTextBox.AddText(Color.Blue, String.Format("[تم النشر] Successfully posted to: http://www.facebook.com/groups/{0}/", groupID));
}
void f_NFacebookClient_OnError(string errorMessage)
{
StatusRichTextBox.AddText(Color.Red, String.Format("[خطأ] Error: ", errorMessage));
}