读书人

新手请问OCX组件,多谢

发布时间: 2012-01-15 22:57:49 作者: rapoo

新手请教OCX组件,在线等!谢谢!
我想做一个OCX组件,比如说我在里面添加了text1,text2,text3 等文本框,然后在普通窗体调用这个组件想取得这几个text文本的值,请问怎么调用这个组件的值?那个组件应添加什么事件吗?能给例子看吗?谢谢!

[解决办法]
'用户控件代码
Option Explicit

Public Property Get txt1() As String
txt1 = Text1.Text
End Property

Public Property Get txt2() As String
txt2 = Text2.Text
End Property

'其他工程部件中添加以上编译的OCX
Private Sub Command5_Click()
MsgBox UserControl11.txt1 & vbCrLf & UserControl11.txt2
End Sub

参考下

读书人网 >VB

热点推荐