如何生成动态的控件数组 在线等待,解决加分 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用controls.add就可以,不过事件的处理就麻烦了 首先在窗体中建一控件command1,命名为cmd,index为0。 下面是动态加载cmd(1)的程序,不知可否有帮助! Load Cmd(1) Cmd(1).TabIndex = 1 Cmd(1).Top = Cmd(0).Top + Cmd(0).Height Cmd(1).Left = Cmd(0).Left Cmd(1).Caption = "名" Cmd(1).Visible = True 先在窗体上+1个这个控件的数组然后dim a as new 控件名(如textbox)load(a)move a 动态的挺麻烦,因为不但要处理添加,还要处理删除(用load和unload)。而这些都只能根据Index来操作。但是删除后的Index并不会自动重新排序,而且Index在运行时是不可改变的,所以你需要自己处理这里面的逻辑。 使用 yijiangmingyue(一江明月) 的方法就可以,这样所有的控件使用一个事件,可以根据触发事件的index来分别处理。 怎样找到MSHFlexGrid的当前行在屏幕上的位置?谁知道? 如何实现第三个文本框计算前两个文本框的积 很菜的问题,但是给高分!!! 问:用installshield6.30打包vb6程序,注册控件的那段代码写到哪一个Function里? 求VB 发送自定义数据的例子 哎!女友说不来了. 用VB程序写直流电机调速正反转 停止 使用下拉菜单调速 winsock 为什么不能连接internet上的两台机子? 如何将生成的xls文件显示在OLE中 如何在TextBox编辑框中捕获键盘↑↓→←的按键输入 有什么方法可以在98下登录到2000。 简单问题
下面是动态加载cmd(1)的程序,不知可否有帮助!
Load Cmd(1)
Cmd(1).TabIndex = 1 Cmd(1).Top = Cmd(0).Top + Cmd(0).Height
Cmd(1).Left = Cmd(0).Left
Cmd(1).Caption = "名"
Cmd(1).Visible = True
然后
dim a as new 控件名(如textbox)
load(a)
move a
而这些都只能根据Index来操作。但是删除后的Index并不会自动重新排序,而且Index在运行时是不可改变的,
所以你需要自己处理这里面的逻辑。