VB6怎样在窗体中触发用户控件的事件
我自己用VB6写了个用户控件,里面定义了些事件,现要求在这个控件的项目中的某个窗体中来触发控件类中的事件,如何实现?求教高手...
我自己用VB6写了个用户控件,里面定义了些事件,现要求在这个控件的项目中的某个窗体中来触发控件类中的事件,如何实现?求教高手
展开
1个回答
展开全部
都会写用户控件,不会用吗?
比如你的控件是在类模块Class1中写的,里面有个验证身份证号码对错的自定义函数:
Public Function SfzYZ(SfzH As String) As String
' 验证过程代码...
End Function
而你在窗体中需要验证Text1文本框中输入的身份证号码是否正确,可以这样引用:
Dim SfzPD As New Class1
If SfzPD.SfzYZ(Text1) <> "ok" Then
MsgBox "您输入的身份证号码不正确!请核对后重输...", 64 + 0 + 4096, "提示"
Text1.SetFocus
Exit Sub
End If
比如你的控件是在类模块Class1中写的,里面有个验证身份证号码对错的自定义函数:
Public Function SfzYZ(SfzH As String) As String
' 验证过程代码...
End Function
而你在窗体中需要验证Text1文本框中输入的身份证号码是否正确,可以这样引用:
Dim SfzPD As New Class1
If SfzPD.SfzYZ(Text1) <> "ok" Then
MsgBox "您输入的身份证号码不正确!请核对后重输...", 64 + 0 + 4096, "提示"
Text1.SetFocus
Exit Sub
End If
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询