专家坐堂-动态名称的问题Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  动态名称的问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=57847)

--  作者：qianqian1530
--  发布时间：2014/10/5 22:21:00
--  动态名称的问题

Dim 项目1 As String
Dim 项目2 As String
Dim 项目3 As String
Dim 项目4 As String
Dim 项目5 As String
Dim 项目6 As String
Dim 项目7 As String
Dim 项目8 As String
Dim 项目9 As String
Dim 项目10 As String

Dim i As Integer
For i = 1 To 10
If i = 10 Then
Exit For
End If
If e.Form.ExistControl("項目" & i)= True
项目 & i = i
End If
Next

项目 & i = i 这么些不行么..

--  作者：有点甜
--  发布时间：2014/10/5 22:22:00
--
不能，必须用数组。

--  作者：菲舍尔
--  发布时间：2014/10/6 0:41:00
--
呵呵，好久没见到 & 这么用了，这是foxpro中的东东，VB.net是不支持的