إقتباس : مثلا كيف يمكنني عمل رسائل التنبيه عند وصول قيمة في جدول إلى قيمة معينة؟
ضع أستفسارك في قسم قواعد البيانات مع مثال بسيط ,,,,, واح نجيب عليك أن شاء الله
لكن الحل مبدئيا : يعتمد على تايمر يقوم بالتشييك على الجدول والاستعلام عن القيم ويعود لك بالنتيجة المباشرة ..
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Location = New Point(1, J)
Timer1.Enabled = True
Timer1.Interval = 30
ProgressBar1.Minimum = 0
ProgressBar1.Maximum = 20
ProgressBar1.Visible = False
End Sub
الى
كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim workingRectangle As System.Drawing.Rectangle = Screen.PrimaryScreen.WorkingArea
J = workingRectangle.Height
Me.Location = New Point(1, J)
Timer1.Enabled = True
Timer1.Interval = 30
ProgressBar1.Minimum = 0
ProgressBar1.Maximum = 20
ProgressBar1.Visible = False
End Sub