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

      

      <nobr id="hz9zz"></nobr>
      <form id="hz9zz"></form>
      3.   
          
      明輝手游網中心：是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺！
                   
        
                           
        
                        		  
        
                 
              
                
      切割一個Container中的圖片
                
                  發表時間：2023-08-07             來源：明輝站整理相關軟件相關文章人氣：          
              
      [摘要]前幾天在網路上閑逛時，看到有人問了這樣的問題：想要寫拼圖程式，又不想用已經切割好的圖片，不知要如何把一個完整的圖片利用程式來切割。以下的程式只是示范切割圖片的方法，而不是教你如何寫拼圖程式。 需求物...
      前幾天在網路上閑逛時，看到有人問了這樣的問題：想要寫拼圖程式，又不想用已經切割好的圖片，不知要如何把一個完整的圖片利用程式來切割。以下的程式只是示范切割圖片的方法，而不是教你如何寫拼圖程式。 

      需求物件： 

      Form, PictureBox

      請建立一個新專案，并在表單中放入上述物件，再把以下程式碼復制到表單的程式碼視窗，最後按下F5來執行。(注意圖片路徑可能要修改) 

      Private Sub Form_Activate() 

      '詳細閱讀PaintPicture的說明就可了解,在來源圖和目的圖中, 

      '可以指定某個特定區域來繪圖,亦即可以將圖片切割或放大,縮小 

      Picture1.PaintPicture Picture, 10, 10, 1000, 1000, 0, 0, 500, 500 

      End Sub

      Private Sub Form_Load() 

      AutoRedraw = True 

      '以下路徑可能要修改 

      Picture = LoadPicture("e:\win95\bubbles.bmp") 

      With Picture1 

      .Left = 1000 

      .Top = 1000 

      .Width = 2000 

      .Height = 2000 

      .AutoRedraw = True 

      End With 

      End Sub 


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