Visual Basic ile gelen kurulum programı yarrattığınız uygulamayı sabit diske kopyaladıktan sonra onun için Program Yöneticisinde bir grup yaratabilir.
Kurulum programı VB ile yazıldığına göre biz de bunu basit bir DDE (Dynamic Data Exchange / Dinamik Veri Alışverişi) bağlantısı kurarak kolayca başarabiliriz. Örneğimiz için boş bir form üzerinde bir komut butonu bir de bağlantıya aracı olacak "metin kutusu" yerleştirin ve oluşturduğunuz komut butonuna aşağıdaki kodları girin. Metin kutusunun ise bağlantıyı taşımaktan başka hiç bir işlevi yok.
Sub Command1_Click()
Text1.LinkTopic = "ProgMan|Progman" 'Bağlantı kurulacak program
Text1.LinkMode = 2 'Kullanıcı bağlantısı yarat
Text1.LinkExecute "[CreateGroup(VBasic)]"
'Windows Program Yöneticisinde yeni bir grup yarat
Text1.LinkExecute "[AddItem(c:\vb\vb.exe, Visual Basic)]"
'Burada belirttiğimiz dizini kendinize göre değiştirin.
Text1.LinkExecute "[AddItem(c:\vb\vb.hlp, Visual Basic Yardımı)]"
'Gruba iki yeni öğe ekle
Text1.LinkExecute "[ShowGroup(VBasic, 7)]"
'Grubu simge haline getir ve Visual Basic’e geri dön
On Error Resume Next 'Hata oluşursa işleme devam et. Sebep?
'Windows 3.0 ile VB bu aşamada uyumsuzluk çıkarır!
Text1.LinkMode = 0 ' bağlantıyı kes
End ‘Son...
End Sub
Programı çalıştırdığınızda Program Yöneticinizde “VBasic” adında yeni bir grup oluşacak ve bu grubun içinde iki simge belirecektir. DDE kullanarak programlara bağlanmak onlara komut vermek ve bu sayede veri alışverişi yapmak çok kolaydır. DDE kullanarak Excel hücrelerinden veri kopyalama işlemini bile sadece kopyalanacak hücreleri tayin ederek kolayca gerçekleştirebilirsiniz.
Kurulum programı VB ile yazıldığına göre biz de bunu basit bir DDE (Dynamic Data Exchange / Dinamik Veri Alışverişi) bağlantısı kurarak kolayca başarabiliriz. Örneğimiz için boş bir form üzerinde bir komut butonu bir de bağlantıya aracı olacak "metin kutusu" yerleştirin ve oluşturduğunuz komut butonuna aşağıdaki kodları girin. Metin kutusunun ise bağlantıyı taşımaktan başka hiç bir işlevi yok.
Sub Command1_Click()
Text1.LinkTopic = "ProgMan|Progman" 'Bağlantı kurulacak program
Text1.LinkMode = 2 'Kullanıcı bağlantısı yarat
Text1.LinkExecute "[CreateGroup(VBasic)]"
'Windows Program Yöneticisinde yeni bir grup yarat
Text1.LinkExecute "[AddItem(c:\vb\vb.exe, Visual Basic)]"
'Burada belirttiğimiz dizini kendinize göre değiştirin.
Text1.LinkExecute "[AddItem(c:\vb\vb.hlp, Visual Basic Yardımı)]"
'Gruba iki yeni öğe ekle
Text1.LinkExecute "[ShowGroup(VBasic, 7)]"
'Grubu simge haline getir ve Visual Basic’e geri dön
On Error Resume Next 'Hata oluşursa işleme devam et. Sebep?
'Windows 3.0 ile VB bu aşamada uyumsuzluk çıkarır!
Text1.LinkMode = 0 ' bağlantıyı kes
End ‘Son...
End Sub
Programı çalıştırdığınızda Program Yöneticinizde “VBasic” adında yeni bir grup oluşacak ve bu grubun içinde iki simge belirecektir. DDE kullanarak programlara bağlanmak onlara komut vermek ve bu sayede veri alışverişi yapmak çok kolaydır. DDE kullanarak Excel hücrelerinden veri kopyalama işlemini bile sadece kopyalanacak hücreleri tayin ederek kolayca gerçekleştirebilirsiniz.