作者fumizuki (蒙面加菲狮)
看板Visual_Basic
标题Re: [VB6 ] 元件阵列
时间Tue Aug 8 13:06:59 2006
※ 引述《Hotan (昊天)》之铭言：
: 请问元件阵列是否不包含对於 form 的??
: 不能把 form 改成 同样的名称 而自动生成阵列?
: 不然 想用阵列的 button 对应到各个 form 的开启该怎麽做呢??
: 垦请告知，谢谢 ^^
不行，如果你多个 form 的内容相同或相似，可以用 NEW 的方式产生新视窗
然後传参数进去，决定显示的内容。
Public myForms() As Form1, myFromIndex As Integer '全域变数
Private Sub Command1_Click()
myFromIndex = myFromIndex + 1
Redim Preserve myForms(myFromIndex)
Set myForms(myFromIndex) = New Form1
myForms(myFromIndex).ShowMsg("haha")
End Sub
Public Sub ShowMsg(ByVal msg As String)
Me.Caption = "message = " & msg
End Sub
--
▃▅▇▆▄ ▆▂▃ `
逝去感情如何能留住，半点痴情遗留殊不易，██▅▇▄▃ ▇▃▂" .
█████████▃i ▁▄▇
更多凄凄惨惨的遭遇…………██▆▃ █▅▆▃ˍ▄*
◢ ▂█▄▇▅▂▌.
我不知道，王～八～蛋～～！ ▂▆███ █▄▃ 。fumizuki。Check。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 60.248.175.60