能否将控件名称当作变量传递?或者有什么好方法?关于语法

sprite14 2003-05-16 10:45:28
Private Sub TextBox1_Click()
CheckRow TextBox1, TextBox1.Text, 1
End Sub

Private Sub TextBox2_Click()
CheckRow TextBox2, TextBox2.Text, 2
End Sub

Function CheckRow(TxtB As Object, Txt As String, TxtIndex As Integer)
TxtB.text=""
我就是想将Textbox1或者Textbox2当作变量来传递,同时改变他的属性,可以这么做吗?
End Function
...全文
14 点赞 收藏 7
写回复
7 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
qibo2002 2003-05-16
声明的时候不用 as object 用控件的类型 很方便!
回复
qibo2002 2003-05-16
Function CheckRow(TxtB As TextBox)
TxtB.text="dddd"
End Function
回复
dream901 2003-05-16

不用写其他的东西,就传一个对象就行了

Private Sub Form_Load()
text1.text="this is a test"
Call GetObj(Text1)
End Sub


Private Sub GetObj(objtmp As Object)
objtmp.Text = "Get it!"
End Sub
回复
sprite14 2003-05-16
请告诉我方法啊
我现在这种做法提示错误
是我声明的类型不对吗?
回复
lxcc 2003-05-16
可以!
回复
sprite14 2003-05-16
UPUP
请帮忙啊
很着急
回复
lxcc 2003-05-16
Function CheckRow(TxtB As TextBox, Txt As String, TxtIndex As Integer)
即可
回复
相关推荐
发帖
VB基础类
创建于2007-09-28

7491

社区成员

VB 基础类
申请成为版主
帖子事件
创建了帖子
2003-05-16 10:45
社区公告
暂无公告