在form1中定义的数组,在form2中不能用怎么办

zgx2001 2002-05-06 02:26:00
在form1中定义的数组,在form2中不能用怎么办
...全文
84 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
doyd 2002-05-06
  • 打赏
  • 举报
回复
不要在一个窗体中定义变量到另一个窗体中使用,这样编写出来的程序容易出bug
最好是定义在类中,窗体实际是一个对话框,用来与用户交流的(叫做用户界面),程序实际上指的是代码,程序员看的是代码,不是窗体
如:有一个类
class1
public lngAAA as long
public sub CallSub()
lngAAA = lngAAA + 1
end sub

有一个窗体
form1:

private clsAAA as Class1

form_Load()
set clsAAA = new Class1
end sub

Command1_Click()
clsAAA.CallSub
MsgBox( str(clsAAA.lngAAA) )
end sub

有一个模块mod1
sub main()
dim frmFirst as new form1
form1.show
end sub


修改工程属性中starup object 为sub main
这样的程序才符合规范
cy_nwau 2002-05-06
  • 打赏
  • 举报
回复
来晚了!
wxm322000 2002-05-06
  • 打赏
  • 举报
回复
好象用public不行的
用模块定义全局变量可以
ferrytang 2002-05-06
  • 打赏
  • 举报
回复
www.myvc.net是一个编程技术论坛,为广大编程爱好者提供一个交流技术的空间!
现在,www.myvc.net将为大家提供一个资源下载的空间!第一批将提供<三层结构源代码>
<开发文档模版>两项。
需要者可去以下网址留下email
http://www.myvc.net/dispbbs.asp?boardID=16&RootID=658&ID=658&page=1
我们也提供资源上传的空间,如果你愿意和大家分享你的资源,你可以和www.myvc.net联系
gump2000 2002-05-06
  • 打赏
  • 举报
回复
您可以这样
Public aa As Variant

Private Sub Form_Load()
ReDim aa(2)
aa(0) = 0
aa(1) = 1
aa(2) = 2
End Sub

或者用模块定义全局变量
Chice_wxg 2002-05-06
  • 打赏
  • 举报
回复
Form1:
public a(10) as long

Fomr2:
for i=0 to 10
form1.a(i)=i
next
footballboy 2002-05-06
  • 打赏
  • 举报
回复
将数组声明为全局变量数组
用Public 关键字
Jameszht 2002-05-06
  • 打赏
  • 举报
回复
引用時,數組名前加上form1.

7,789

社区成员

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

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