Private Sub Form_Activate()用在什么地方？

sd2125190 2003-12-11 09:16:33

Private Sub Form_Activate()用在什么地方？

...全文

176 1 打赏收藏转发到动态举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

zsx108 2003-12-11

打赏
举报

回复

Activate可能是在当执行form的show方法时运行，可以在该函数里写一个stop语句，就能知道何时被运行。

VB6 获取当前打开窗口数量，如何获取当前打开窗口数量，本示例打开一个窗口后，在测试时会打开另外一个窗口，然后主窗口中会统计到这个打开的...　Private Sub Form_Activate() 　Text1.Text = DoEvents() 　End Sub

Private Sub Form_Activate() ' 处理代码 End Sub ``` 2. **Click (单击)** 用户单击窗体时触发，处理过程原形如下： ``` Private Sub Form_Click() ' 处理代码 End Sub ``` 3. **DblClick (双击)** ...

Private Sub Form_Activate() Call conDB Set rsmc = New ADODB.Recordset rsmc.CursorLocation = adUseClient rsmc.Open "用户信息表", conn, 0, 1 'need to learn cbUserName.Clear While Not rsmc.EOF ...

　Private Sub Form_Activate() 　Randomize 　For I = 1 To 100 　X1 = Int(Form1.Width * Rnd) 　Y1 = Int(Form1.Height * Rnd) 　pace1 = Int(500 - (Int(Rnd * 499))) 　size1 = 25 * Rnd 　X(I) = X1 　Y(I) = ...

Private Sub Form_Activate() ' 当窗体被激活时，手动刷新Data控件 If Data1.Refresh = False Then Data1.Refresh = True End If End Sub ``` 这种方法可以确保数据只在需要的时候被加载或更新，提高了...

7,786

社区成员

197,586

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

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

+ 用AI写文章