VB6.0中窗体显示

qqww09633 发布于 2012-11-03 22:37， 1009 次点击

有一问题请教
dim a as long
dim lRet as long
lRet=ActLLT1.GetDevice("D0",a) 'a为从D0取得的数值，比如1,2,3，........
假如我新建了N个窗体，分别命名为P1，P2，P3.....
如果a=1时则显示P1窗体，如果a=2时则显示P2窗体，依次类推，根据a的值显示相应的窗体，我是这样写的
"P" & a.Show
但会报语法错误，请教给位前辈们怎样写啊？？？？

3 回复

Artless2012-11-04 14:52

select

yz10252012-11-05 00:10

Private Enum frm
    Form1 = 1
    Form2
    Form3
    Form4
    Form5
    .....
End Enum

用这个行吗？应该可以研究研究...
把得出的a值转换字符串再赋予窗体属性？

邵帅2012-11-07 16:08

如果每次都是不同的窗体，那就用2楼的选择方法。如果打开的窗体都一样，可以在mdi多窗体程序中制成窗体模板，每次都打开同一个窗体，却出项多个相同的界面。