如何判断控件的事件是否存在

使用示例

var isBind = IsBindEvent(comboBox.GetType(), comboBox, "comboBox_TextChanged");

if (!isBind)

{

comboBox.TextChanged += comboBox_TextChanged;

}

//是否已经绑定了事件
private bool IsBindEvent(Type type, Control con, string eventName)
{
    bool isBind = false;

    PropertyInfo pi = type.GetProperty("Events", BindingFlags.Instance | BindingFlags.NonPublic);   //获取type类定义的所有事件的信息
    EventHandlerList ehl = (EventHandlerList)pi.GetValue(con, null);    //获取con对象的事件处理程序列表
    FieldInfo fieldInfo = (typeof(Control)).GetField("EventText", BindingFlags.Static | BindingFlags.NonPublic); //获取Control类Click事件的字段信息
    Delegate d = ehl[fieldInfo.GetValue(null)];
    if (d == null)
    {
        return isBind;
    }
    foreach (Delegate del in d.GetInvocationList())
    { 
        if (del.Method.Name == eventName)
        {
            isBind = true;
            break;
        }
    }
    return isBind;
}
  • 1
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
### 回答1: 在 VB.NET 中,可以使用 File.Exists 方法来判断文件是否存在。 例子: ``` If File.Exists("C:\example.txt") Then Console.WriteLine("文件存在") Else Console.WriteLine("文件不存在") End If ``` ### 回答2: 在VB.NET中,我们可以使用File类的Exists方法来判断文件是否存在。File类位于System.IO命名空间中,它提供了用于操作文件的各种方法和属性。 要判断文件是否存在,我们需要提供文件的完整路径作为Exists方法的参数。例如,下面的代码演示了如何判断名为"test.txt"的文件是否存在: ```vb Imports System.IO Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim filePath As String = "C:\path\to\test.txt" If File.Exists(filePath) Then MessageBox.Show("文件存在") Else MessageBox.Show("文件不存在") End If End Sub End Class ``` 在上面的代码中,我们首先声明了一个名为filePath的字符串变量,用来存储要检查的文件路径。然后,我们通过调用File.Exists方法并传入filePath作为参数来判断文件是否存在。 如果文件存在,Exists方法将返回True,我们将显示一个消息框提示文件存在;否则,Exists方法将返回False,我们将显示一个消息框提示文件不存在。 请确保替换代码中的"C:\path\to\test.txt"为实际的文件路径,以确保正确判断文件是否存在。 ### 回答3: 在VB.NET中,可以使用File类的Exists方法来判断文件是否存在。 首先,需要引入命名空间System.IO,该命名空间包含了文件和文件夹操作的类和方法。 示例代码如下: ``` Imports System.IO Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim filePath As String = "C:\path\to\file.txt" ' 替换为实际文件路径 If File.Exists(filePath) Then MessageBox.Show("文件存在") Else MessageBox.Show("文件不存在") End If End Sub End Class ``` 在示例中,我们创建了一个按钮(Button)控件,当按钮被点击时,会执行Button1_Click事件处理程序。 在事件处理程序中,我们定义了一个字符串变量filePath,表示要判断的文件路径。你需要将其替换为你实际的文件路径。 然后,我们使用File.Exists方法判断文件是否存在,如果存在,弹出消息框显示"文件存在",否则显示"文件不存在"。 以上就是使用VB.NET判断文件是否存在的方法。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值