• 全部
  • VBS
  • .NET技术
  • VBA
  • VB网络编程
  • VB多媒体
  • VB数据库
  • VB控件
  • VB COM/DCOM
  • VB基础类
  • VB API
  • 问答

怎样通过名字访问对象

enmity 2004-04-28 12:16:35
譬如有以下DataGrid:DG1、DG2、DG3.....DG10,想这样:
Dim dgs(9) as DataGrid
Dim i As Integer

For i=1 to 10
dgs(i-1)=xxxx("DG" & i.ToString)
Next

xxxx代表转换,这个转换怎样实现???
...全文
10 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
Ninputer 2004-04-28
DataGrid的Name属性可以用,你从所有的DataGrid中搜索你要的Name吧
回复
minajo21 2004-04-28
建立一个 DataGrid 的数组

http://www.csdn.net/Develop/Read_Article.asp?Id=20241
回复
smoothwood 2004-04-28
窗口上有名为Textbox1~TextBox4的四个输入框,代码如下
——————————————————————————
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim txt(3) As TextBox
Dim obj As Object
For Each obj In Me.Controls
If TypeOf (obj) Is TextBox Then
Dim id As Integer = CType(obj, TextBox).Name.Substring(obj.name.ToString.Length - 1, 1)
txt(id - 1) = obj
End If
Next
For i As Integer = 0 To txt.Length - 1
Console.WriteLine(txt(i).Text)
Next
End Sub
回复
amortal 2004-04-28
dim ctl as control
dim obj as datagrid
for each ctl in me.controls
if ctl.name="view" then
obj = ctype(ctl,datagrid)
end if
next
回复
相关推荐
发帖
VB
创建于2007-09-28

1.6w+

社区成员

VB技术相关讨论,主要为经典vb,即VB6.0
申请成为版主
帖子事件
创建了帖子
2004-04-28 12:16
社区公告
暂无公告