关于过程的定义

lndlwwh830 2003-08-22 07:11:18
请问如何在过程中定义引用数组

如下:

Sub text(t As TextBox)


t.text = "ddfd"



End Sub

上面是正常定义方法:


可是如果t 是一个数组(text1(i).text)


那该如何定义呢??
...全文
55 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
bbgbianbaogui 2003-08-31
  • 打赏
  • 举报
回复
将其改成
Sub text(t() As TextBox)
......
End Sub
lndlwwh830 2003-08-31
  • 打赏
  • 举报
回复
谢谢二位的回答
Mister 2003-08-22
  • 打赏
  • 举报
回复
可以直接传对象名啊...
在窗体上画一个 TextBox 控件 Name 是 Text1 ,Index 是 0 代码如下:

Private Sub Form_Load()

Call Demo_ObjText(Text1)

End Sub

Sub Demo_ObjText(ObjText As Object)

ObjText(0).Text = "Hi"

Load ObjText(1)

ObjText(1).Top = ObjText(0).Top + 500 '避免 Text(1) 和 Text(0) 重叠。
ObjText(1).Text = "Hello"
ObjText(1).Visible = True

End Sub

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧