<form id="hz9zz"></form>
    • <form id="hz9zz"></form>
    

      

      <nobr id="hz9zz"></nobr>
      <form id="hz9zz"></form>
      3.   
          
      明輝手游網中心：是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺！
                   
        
                           
        
                        		  
        
                 
              
                
      怎么在VB中把窗體刪除干凈
                
                  發表時間：2023-08-21             來源：明輝站整理相關軟件相關文章人氣：          
              
      [摘要]VB的End語句并不總是將在程序中打開的東西卸載得一干二凈。例如你在程序中打開了一個文件，而沒有用Close語句關閉這個文件，這時你通過程序中的End語句結束了程序，Windows就會認為你打開的文...
      VB的End語句并不總是將在程序中打開的東西卸載得一干二凈。例如你在程序中打

      開了一個文件，而沒有用Close語句關閉這個文件，這時你通過程序中的End語句結

      束了程序，Windows就會認為你打開的文件正在被一個程序所使用，導致你在資源

      管理器中無法刪除該文件。在有些情況下，如果你只用End語句來結束程序，會導

      致一些非常嚴重的后果，例如Windows會發出錯誤的信息，告訴你C盤損壞等等。


      因此最好是自己編寫一個關閉子程序： 

      Public Sub Shutdown(Optional ByVal Force As Boolean = False)

      Dim I As Long


      On Error Resume Next


      For I = Forms.Count - 1 to 0 Step -1

      Unload Forms(I) ' Triggers QueryUnload and Form_Unload


      ' If we aren't in Force mode and the

      ' unload failed, stop the shutdown.

      If Not Force Then

      If Forms.Count > I then

      Exit Sub

      End If

      End If

      Next I


      ' If we are in Force mode OR all

      ' forms unloaded, close all files.

      If Force Or (Forms.Count = 0) Then Close


      ' If we are in Force mode AND all

      ' forms not unloaded, end.

      If Force Or (Forms.Count > 0) Then End

      End Sub



              
              
                 
              
                                    
                                        
              
                              		       
                          
                           		  
        
                            
      
日韩精品一区二区三区高清