Visual Basic'te pop-up menü oluşturma

Visual Basic Programlama platformunda pop-up menüler oluşturmak için altaki kodu kullanabilirsiniz.




	Visual Basic Pop-up Kodu:



	 


Option Explicit
Private Sub Form_Load()
mdosya.Visible = False
End Sub

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
X = 0
Y = 0
PopupMenu mdosya, 4, Form1.Left + X, Form1.Top + Y
End If
End Sub

Private Sub mac_Click()
CommonDialog1 = 1
End Sub

Private Sub mcıkıs_Click()
End
End Sub








Private Sub mcopy_Click()
Clipboard.SetText Text1.SelText
End Sub


Private Sub mcut_Click()
Clipboard.SetText Text1.SelText
Text1.SelText = ""
End Sub

Private Sub mnormal_Click()
Form1.WindowState = 0
End Sub

Private Sub mpaste_Click()
Text1.SelText = Clipboard.GetText
End Sub

Private Sub msimge_Click()
Form1.WindowState = 1
End Sub

Private Sub mtam_Click()
Form1.WindowState = 2
End Sub

Private Sub myeni_Click()
CommonDialog1.Action = 2
End Sub


                            





                            

                        

                         
                    

                    

                        

                            

                                Etiketler: Visual Basic 
                            

                                                        
                            

                                İlk yorumu siz yazın !..                            

                            
    
                                
  • 
                                    
                                        
                                    
                                    
    
                                        
    
                                            
                                            
                                            
                                            
    
                                                                                         
                                            Yorumunuz en az 30 karakter olmalıdır. (0)
                                            
    
                                            
    
                                                
    
                                                    
                                                
    
                                                
    
                                                                                                        
                                                    
                                                
    
                                            
    
                                            
    
                                            
                                            
                                        
    
                                    
    
                                
    • 
                            







       






                                                

                    

                    

                

            

                
İlginizi çekebilir...

                    
                                

                                    
                                    
                                    

                                        

                                            Visual Basic İçin OCX | ActiveX | Bileşen Nasıl Yapılır ?
                                        

                                    

                                
            
                                                
        



    

            


    

    
        

    
    

        
Sitede Ara

            

        
                

    
    

                        

    




    
    
    

        

            
  •  
    Merhaba Ben Arda Özeren Yahya Çavuş Ortaokulu Gidiyorum 10 Sınıfım Bende Yarışma Katılmak İstiyorum Sel...
  • Açıköğretim Aöf Dönem Ücretleri 2024 - 2025 Güncel Öğretim Giderleri Tablosu 
    Okumuyorum ve kayıt yenilemiyorum. Nokta....
  • Islets Oyunu Türkçe Yama (Epic ve Steam) 
    Rar şifresi nedir? şifreyi belirymemişsiniz...
  • ECA Kombi Aşırı Isınma Arızası Arıza Kodu 6 Nedir Nasıl Çözülür - Pompa Çalışmıyor Olabilir Mi? 
    bu hata kodu çıkıyordu kombimizde tarif ettiğiniz şekilde pompayı harekete geçirdik ve sorun çözüldü si...
  • Çiklet (Prenses) Balıklarındaki Ürkeklik ve Korkaklık 
    Ben çok uzun süre sp, bp ile frenatus besledim hiç bir sorun yaşamadım. Çok uyumlulardı. Renk katıyor a...
  • Genel İşletme 1. Dönem Vize Soruları  
    soru 3 yanlıs bence"...
  • CS 1.5 ve CS 1.6 İçin Sağlam Bir CFG (cengaver.cfg) 
    bozuk bu cfg kullanmayın derim ...
    •         
    
    
    
    

    



    
    
            
    
    
        
    Alt Sayfalar
    
        
    
           Aöf Geri Sayım
           Online Cetvel
           Online Zikirmatik
           Popüler Konular
           Çok Konuşulan Konular
           Yeni Konular
           Tüm Kategoriler
           aöfMatik