Déclenchant un événement dans les .net exemple

Je suis en train de créer un exemple de base de l'éducation d'un événement dans vb.net et j'espère que, en étudiant à fond je peux mettre à jour la façon dont mon système reçoit des données à partir du port série.

Droit maintenant, j'ai un système qui reçoit les données en provenance du port série via des chronomètres, le problème est qu'il y a certains événements dans un système que les conflits dans mon timer. De ce fait j'ai l'intention de changer la façon dont j'ai reçu les données à partir des ports série, au lieu de la minuterie que je veux utiliser vb.net raiseevent.

Malheureusement, je ne peux pas trouver un exemple simple sur la façon d'utiliser cet événement, par la recherche approfondie, j'ai vu le MSDN est post sur ce sujet et c'est ici. Alors, comment puis-je utiliser cet exemple? J'ai essayé de l'utiliser en dessous comme ça

Public Event TimeExpired(ByVal Status As String)
Public Sub RaiseTimeExpiredEvent()
    RaiseEvent TimeExpired("Your time has run out")
    MessageBox.Show(TimeExpired())
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    RaiseTimeExpiredEvent()
End Sub

Il ne fonctionne pas de travail, l'erreur est

Erreur de 1 'Événement Public TimeExpired(Statut String)' est un événement, et ne peut pas être appelée directement. L'utilisation d'un RaiseEvent' instruction pour déclencher un événement. C:\Users\Cary\Desktop\Projects\Testing\Testing\Testing\Form1.vb 5 25 Tests

À cause de cette erreur, j'ai essayé de faire comme ceci

Class Form1
Public Event TimeExpired(ByVal Status As String)
Public Sub RaiseTimeExpiredEvent()
    RaiseEvent TimeExpired("Your time has run out")
    MessageBox.Show(TimeExpired())

End Sub


Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    RaiseEvent TimeExpired()
End Sub

Fin De La Classe

Mais les états d'erreur

Erreur 2 Argument n'est pas spécifié pour le paramètre "Status" de 'Événement Public TimeExpired(Statut String)'. C:\Users\Cary\Desktop\Projects\Testing\Testing\Testing\Form1.vb 11 9 Test

InformationsquelleAutor Cary Bondoc | 2015-08-06

1

Êtes-vous à l'aide de Visual Studio ? Si oui, vous pouvez essayer d'afficher la Liste des Erreurs. Pour cela, cliquez sur Affichage, et la Liste d'Erreurs.
```
Class Form1

    Public Event TimeExpired(Status As String)

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        RaiseEvent TimeExpired("Your time has run out")
    End Sub

End Class
```
Pour gérer l'événement, vous pouvez ajouter ceci :
```
Private Sub HandleTimeExpired(Status As String) Handles Me.TimeExpired
    MsgBox(Status)
End Sub
```
Voici le code complet :
```
Class Form1

    Public Event TimeExpired(Status As String)

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        RaiseEvent TimeExpired("Your time has run out")
    End Sub

    Public Sub OnTimeExpired(Status As String) Handles Me.TimeExpired
        MsgBox(Status)
    End Sub

End Class
```
Edit :

Si vous voulez déplacer la sensibilisation de l'événement dans un module, vous ne pouvez pas. Vous devez l'ajouter dans une classe. Voir ce lien.

Exemple de Class1 (vous devez le renommer...) :
```
Public Class Class1

    Private Event TimeExpired(Status As String)

    Public Sub OnTimeExpired(Status As String)
        RaiseEvent TimeExpired(Status)
    End Sub

    Private Sub HandleTimeExpired(Status As String) Handles Me.TimeExpired
       MsgBox(Status)
    End Sub

End Class
```
Et pour l'utiliser, vous devez le déclarer WithEvents dans votre Form1 :
```
Public Class Form1

    Dim WithEvents Class1 As New Class1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Class1.OnTimeExpired("Your time has run out")
    End Sub

End Class
```
- Oui, je suis l'aide de VS 2013. Eh bien, je suis en train d'apprendre vb.net. Il ne se passe rien quand je clique sur le bouton, j'ai même essayé de remplacer msgbox avec console.writeline
- Je pense que votre réponse est trop dur pour lui, il apprend... 😉
- Votre réponse semble être si facile à comprendre pour moi. C'est grand et mieux!
- Je pense juste que le OneFineDay de la classe Foo est inutile... Selon moi, ma réponse est mieux, mais à choisir ce que vous préférez! 😉
- Vous êtes à l'aide de la On* convention à tort. Des méthodes comme OnTimeExpired devrait augmenter l'événement et non pas poignée l'événement. Le gestionnaire doit sans doute aussi être Private et pas Public.
- tu veux dire que la déclaration de OnTimeExpired? En le rendant HandleTimeExpired il deviendra valide?
- une chose de plus si c'est bon. J'essaie de faire de l'élevage de l'événement dans un module, malheureusement, il états handles in modules must specify a 'withevents' variable, j'ai essayé de le faire mais d'un autre error se produit. 🙁
- Oui. Le On* méthodes sont généralement protected méthodes pour activer descendant de classes afin d'être en mesure de déclencher l'événement.
- J'ai édité la réponse...
- excellente réponse et l'exemple. Merci!
InformationsquelleAutor Drarig29

Vous devez vous connecter pour publier un commentaire.