vb怎么让一个窗体不关闭重启但可以重新执行load函数
时间: 2024-03-06 20:49:26 浏览: 23
在 VB 中,可以使用窗体的 Unload 事件来实现让窗体不关闭重启但可以重新执行 Load 函数的功能。具体实现方法如下:
1. 在窗体的代码窗口中,找到窗体的 Unload 事件,并添加如下代码:
```
Private Sub Form_Unload(Cancel As Integer)
Cancel = True '取消窗体的关闭操作
Me.Hide '隐藏窗体
Load Me '重新加载窗体
End Sub
```
2. 在窗体的代码窗口中,找到窗体的 Load 事件,并添加需要执行的代码。
这样,在窗体关闭时,将会触发 Unload 事件,该事件将取消窗体的关闭操作,隐藏窗体并重新加载窗体,从而实现让窗体不关闭重启但可以重新执行 Load 函数的功能。
相关问题
vb怎么让一个窗体执行load函数(不能关闭改窗体)
在 VB 中,可以使用窗体的 Show 方法来重新显示窗体并执行 Load 函数。具体实现方法如下:
1. 在窗体的代码窗口中,找到需要执行的代码,并将其封装到一个公共的 Sub 中。例如:
```
Public Sub DoSomething()
'需要执行的代码
End Sub
```
2. 在需要执行 Load 函数的地方,调用窗体的 Show 方法,并在 Show 方法的参数中传递 vbModal 常量,以禁止用户操作其他窗口,例如:
```
MyForm.Show vbModal
```
3. 在窗体的 Load 事件中,调用刚才封装好的公共 Sub,例如:
```
Private Sub Form_Load()
DoSomething '调用公共 Sub
End Sub
```
这样,在调用 Show 方法时,窗体将会重新显示并执行 Load 事件中的代码,从而实现让窗体执行 Load 函数的功能,并且通过传递 vbModal 参数,可以禁止用户操作其他窗口,从而达到“不能关闭该窗体”的效果。
vb怎么让一个窗体执行load函数
在 VB 中,可以使用窗体的 Show 方法来显示窗体并执行 Load 函数。具体实现方法如下:
1. 在窗体的代码窗口中,找到需要执行的代码,并将其封装到一个公共的 Sub 中。例如:
```
Public Sub DoSomething()
'需要执行的代码
End Sub
```
2. 在需要执行 Load 函数的地方,调用窗体的 Show 方法,例如:
```
MyForm.Show
```
3. 在窗体的 Load 事件中,调用刚才封装好的公共 Sub,例如:
```
Private Sub Form_Load()
DoSomething '调用公共 Sub
End Sub
```
这样,在调用 Show 方法时,窗体将会显示并执行 Load 事件中的代码,从而实现让窗体执行 Load 函数的功能。
相关推荐
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![-](https://csdnimg.cn/download_wenku/file_type_column_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)