杭州交通信息网绝强修真高手笔趣阁:会VB.NET的朋友帮帮忙
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/28 00:16:31
Option Strict Off
Public Class Form1
Inherits System.Windows.Forms.Form
#Region " Windows 窗体设计器生成的代码 "
#End Region
Public Event MyEvent()
Public WithEvents f As Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
RaiseEvent MyEvent()'为什么这里没有反应?
End Sub
Public Sub shijian() Handles f.MyEvent
MsgBox("事件被引发")
End Sub
End Class
为什么我用Raiseevent引发事件时，没有出现想要的结果？哪里出了问题？
Public Class Form1
Inherits System.Windows.Forms.Form
#Region " Windows 窗体设计器生成的代码 "
#End Region
Public Event MyEvent()
Public WithEvents f As Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
RaiseEvent MyEvent()'为什么这里没有反应?
End Sub
Public Sub shijian() Handles f.MyEvent
MsgBox("事件被引发")
End Sub
End Class
为什么我用Raiseevent引发事件时，没有出现想要的结果？哪里出了问题？
不怎么懂VB.NET
我觉得你只需在按钮1里写 shijian() 就行了，不需要Raiseevent来启用事件