07-11-23, 06:05 PM
07-11-23, 06:26 PM
(07-11-23, 06:05 PM)Raaf كتب : [ -> ]احتاج كود لتوليد الارقام تلقائي في text box
هل الرقم اللذي تم توليده مرتبط بقيمة قبله ام لا
يعني مثلا يوجد رقم بقاعدة بيانات مثلا ويزيد عليه بمقدار +1
PHP كود :
Dim i As Integer = Int(Rnd() * 99)
lbl.Text = (i.ToString("00"))
07-11-23, 07:04 PM
(07-11-23, 06:26 PM)justforit كتب : [ -> ]لا توجد قيمه قبله(07-11-23, 06:05 PM)Raaf كتب : [ -> ]احتاج كود لتوليد الارقام تلقائي في text box
هل الرقم اللذي تم توليده مرتبط بقيمة قبله ام لا
يعني مثلا يوجد رقم بقاعدة بيانات مثلا ويزيد عليه بمقدار +1
PHP كود :
Dim i As Integer = Int(Rnd() * 99)
lbl.Text = (i.ToString("00"))
معي عمود اسمه id في قاعده البيانات وااريده ان يعرض لي في text box من 1الخ بدون تكرار حسب رقم الصف الذي ساضيفه.
07-11-23, 09:46 PM
الطرق كثيرة و حتى لا اكثر عليك من الاسئلة وضعت واحدة من تلك الطرق
المثال مرفق
08-11-23, 01:14 AM
اخي الحبيب استخدم دالة max كا التالي
Public Function Max_lap_nocustomer()
Dim Number As Integer
Try
Dim cmd As New SqlCommand("Select Max(lap_no) From custemar ", con)
If con.State = 1 Then con.Close()
con.Open()
Number = cmd.ExecuteScalar
con.Close()
Catch ex As Exception
Number = 0
con.Close()
End Try
Return Number
End Function
بعدها في السب الخاص بالكلير Max_lap_nocustomer+1
بالتوفيق
Public Function Max_lap_nocustomer()
Dim Number As Integer
Try
Dim cmd As New SqlCommand("Select Max(lap_no) From custemar ", con)
If con.State = 1 Then con.Close()
con.Open()
Number = cmd.ExecuteScalar
con.Close()
Catch ex As Exception
Number = 0
con.Close()
End Try
Return Number
End Function
بعدها في السب الخاص بالكلير Max_lap_nocustomer+1
بالتوفيق
08-11-23, 03:03 AM
(07-11-23, 06:26 PM)justforit كتب : [ -> ](07-11-23, 06:05 PM)Raaf كتب : [ -> ]احتاج كود لتوليد الارقام تلقائي في text box
هل الرقم اللذي تم توليده مرتبط بقيمة قبله ام لا
يعني مثلا يوجد رقم بقاعدة بيانات مثلا ويزيد عليه بمقدار +1
PHP كود :
Dim i As Integer = Int(Rnd() * 99)
lbl.Text = (i.ToString("00"))
(08-11-23, 03:03 AM)VIP_YEMEN كتب : [ -> ](07-11-23, 06:26 PM)justforit كتب : [ -> ](07-11-23, 06:05 PM)Raaf كتب : [ -> ]احتاج كود لتوليد الارقام تلقائي في text box
هل الرقم اللذي تم توليده مرتبط بقيمة قبله ام لا
يعني مثلا يوجد رقم بقاعدة بيانات مثلا ويزيد عليه بمقدار +1
PHP كود :
Dim i As Integer = Int(Rnd() * 99)
lbl.Text = (i.ToString("00"))