[العواد الصغير]

كود :

السلام عليكم اين الخطا بهذا الكود
Imports System
Imports System.ComponentModel
Imports System.Drawing
Imports System.Globalization
Imports System.Runtime.CompilerServices
Imports System.Windows.Forms



<DefaultEvent("ValueChanged")> _
Public Class DateControl1
   Inherits TextBox

   ' Events
   Public Custom Event ValueChanged As EventHandler
  Public Sub New()


       Me.ValueChanged = DirectCast([Delegate].Combine(Me.ValueChanged, New EventHandler(AddressOf Me.HjDataHijriDate_ValueChanged)), EventHandler)

       Me.Text = Now.Date
   End Sub
   Private Sub HjDataHijriDate_ValueChanged(ByVal sender As Object, ByVal e As EventArgs)
   End Sub
End Class

[عبدالله الدوسري]

لأنها تكتب هكذا :

كود :

   Public Custom Event ValueChanged As EventHandler
       AddHandler(value As EventHandler)
           ' قم بعمل إظافة
       End AddHandler
       RemoveHandler(value As EventHandler)
           ' قم بعمل إزالة
       End RemoveHandler
       RaiseEvent(sender As Object, e As EventArgs)
           ' الحدث
       End RaiseEvent
   End Event

قم بعمل مثال لما تريد أن تصل إلية حتى نفهم الهدف, لربما هناك طرق أخرى ولا تحتاج لحدث معدل

[العواد الصغير]

(20-09-18, 07:43 PM)عبدالله الدوسري كتب : لأنها تكتب هكذا :

كود :

   Public Custom Event ValueChanged As EventHandler
       AddHandler(value As EventHandler)
           ' قم بعمل إظافة
       End AddHandler
       RemoveHandler(value As EventHandler)
           ' قم بعمل إزالة
       End RemoveHandler
       RaiseEvent(sender As Object, e As EventArgs)
           ' الحدث
       End RaiseEvent
   End Event

قم بعمل مثال لما تريد أن تصل إلية حتى نفهم الهدف, لربما هناك طرق أخرى ولا تحتاج لحدث معدل

شكرا اخ عبد الله انا حولت كلاس من سي شارب الى في بي وظهرت لي هذه المشكلة ساضع الكلاس وهي عبارة عن اداة تعبر عن التاريخ وايضا تقوم بنحويل التاريخ الى هجري اذا اراد المبرمج

---

وهذا المرفق

[العواد الصغير]

السلام عليكم 
الحجث الافتراضي هل يمكن ان يصبح خاصية

[عبدالله الدوسري]

اعذرني لم أفهم :

لو تطرح سؤالك بالإنجليزي , يكون أسهل في الفهم.

[العواد الصغير]

(22-09-18, 01:32 AM)عبدالله الدوسري كتب : اعذرني لم أفهم :

لو تطرح سؤالك بالإنجليزي , يكون أسهل في الفهم.

لو افترضنا ان ValueChanged  حدث من الاحداث للاداة فكيف يقبل هذه العبارة البرمجية 
   Me.ValueChanged = DirectCast([Delegate].Combine(a,b)

[r49]

(20-09-18, 08:50 PM)العواد الصغير كتب : انا حولت كلاس من سي شارب الى في بي وظهرت لي هذه المشكلة ساضع الكلاس وهي عبارة عن اداة تعبر عن التاريخ وايضا تقوم بنحويل التاريخ الى هجري اذا اراد المبرمج

 
أين الكلاس كاملا بالسي شارب كما هو