Teknoloji Haberleri
Aşağı Git
Tüm Forumlar
Web Tasarım - Programlama
Yazılım Geliştirme
Delphi / C++ /Vb
Vİsual Basic 6 Birleşelim soruunları tartışalım
Bu konudaki kullanıcılar: 1 misafir
5
Cevap 274
Tıklama 0
Öne Çıkarma
Cevap 274
Tıklama 0
Öne Çıkarma
1. sayfa
-
Vİsual Basic 6 Birleşelim soruunları tartışalım
1. sayfa
DH Mobil uygulaması ile devam edin.
Mobil tarayıcınız ile mümkün olanların yanı sıra, birçok yeni ve faydalı özelliğe erişin.
Gizle ve güncelleme çıkana kadar tekrar gösterme.
Private Sub Form_Load()
RichTextBox1.LoadFile App.Path & "\" & "text.txt"
End Sub
bu kodlar ile Metin dosyalarını RichTextBoxa taşırsınız
Bu mesaja 1 cevap geldi. Cevapları Gizle
" Menu Editor VB de tasarım zamanında menü yaratmanın en ideal yoludur. Ama olurda çalışma zamanında menü öğeleri eklememiz gerekirse bunu yapmak VB ile çok oklaydır. Sonuçta diğer kontrollerden bir farkı yoktur. "
Menu Editor VB de tasarım zamanında menü yaratmanın en ideal yoludur. Ama olurda çalışma zamanında menü öğeleri eklememiz gerekirse bunu yapmak VB ile çok oklaydır. Sonuçta diğer kontrollerden bir farkı yoktur.
Eğer bir örnekle bunu açıklayacak olursak önce Menu Editor den mnuShortCut isimli bir menü ekleyelim forma. Daha sonra ona mnuSubItem isimli bir submenu ekleyelim. Caption ı "Menu Item 1" ve index i 0 yapalım.
Ve aşağıdaki kodları ekleyelim
Private Sub Form_Load()
Dim x As Integer
For x = 1 To 4
Load mnuSubItem(x)
mnuSubItem(x).Caption = "Menu Item " & x + 1
mnuSubItem(x).Visible = True
Next x
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, x As Single, Y As Single)
If Button = vbRightButton Then
Me.PopupMenu mnuShortCut
End If
End Sub
Private Sub mnuSubItem_Click(Index As Integer)
MsgBox Index
End Sub
Bu mesaja 1 cevap geldi. Cevapları Gizle
Bu mesaja 1 cevap geldi. Cevapları Gizle
Bu mesaja 1 cevap geldi. Cevapları Gizle