تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] total number listbox +8
#1
السلام عليكم
بعد صلاة على الحبيب محمد صلى الله عليه وسلم
لي طلب بسيط
عند اضافة اي عنصر لـlistbox1
 ListBox1.Items.Add(textbox1.text)
اريد ان اضيف لحساب عدد مرات بالاضافة الي زيادة رقم 8
جربت هذا الكود لكن اول مرة ضاف 8 وبعدين صار بضيف رقم واحد
كود :
 Label2.Text = ListBox1.Items.Count.ToString + 8
وشكراً Heart
الرد }}}
تم الشكر بواسطة:
#2
السلام عليكم

وضح، ماذا تقصد ب حساب عدد مرات!

والأفضل تضع مشروعك.
الرد }}}
تم الشكر بواسطة:
#3
(31-01-17, 07:34 PM)مساعدة كتب : السلام عليكم

وضح، ماذا تقصد ب حساب عدد مرات!

والأفضل تضع مشروعك.

تفضل مشروع في المرفقات

اخي ولي طلب اخر لم يكتمل كنت قد افدتني فيه وهو كيف ادخل غرفة الدردشة  بواسطة كود الي اعطتني اياه وهوا كتالي
كود :
Private WithEvents emad As New agsXMPP.XmppClientConnection


Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
   routine("username@password@Resource")
End Sub


Private Sub routine(args As String)
   Dim s() As String = args.Split("@")
   emad.Server = "nimbuzz.com"
   emad.ConnectServer = "o.nimbuzz.com"
   emad.Open(s(0), s(1))
   emad.Resource = s(2)
   emad.Port = "5222"
End Sub
Private Sub emad_OnClose(sender As Object) Handles emad.OnClose
   ' OnClose Event
End Sub
Private Sub emad_OnReadXml(sender As Object, xml As String) Handles emad.OnReadXml
   ' OnReadXml Event
End Sub
Private Sub emad_OnLogin(sender As Object) Handles emad.OnLogin
   ' OnLogin Event
End Sub
Private Sub emad_OnAuthError(sender As Object, e As agsXMPP.Xml.Dom.Element) Handles emad.OnAuthError
   ' OnAuthError Event
End Sub
بعد ضغط ع زر يوتين لدخول الغرفة 
حدث خطأ كود دخول الايميل الغرفة هوا
كود :
emad.Send("<presence to='" + room.Text + "@conference.nimbuzz.com/" + (s(0).ToString) + "'><x xmlns='http://jabber.org/protocol/muc'></x></presence>")
       emad.Send("<message to='" + room.Text + "@conference.nimbuzz.com' type='groupchat'><body>Bot auto gift join room ✔ </body></message>")
وشكرا احلا مبدع Heart


الملفات المرفقة
.rar   WindowsApplication6.rar (الحجم : 71 ك ب / التحميلات : 33)
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم