AutoCAD’de ilk VBA programım
![]() |
Yazar | Özgür Özkurt |
| Mesleği | Mak. Müh. Öğrencisi | |
| web | ||
![]() |
AutoCAD 12 ve üzeri
AutoCAD’in diğer CAD yazılımlarından en büyük farkı hiç kuşkusuz geniş özelleştirme ve otomatikleştirme araçlarına sahip olmasıdır. AutoCAD için, tıpkı bir ofis dosyasında olduğu gibi rutin işleri kolaylaştıracak makrolar yazıp yönetebiliriz.
VBA (Vusial Basic Application), BASIC dilinin içerdiği tüm kontrol yapıları,döngüler vs. sahip olmasına rağmen diğer Vusial Basic sürümlerinden bazı eksikleri vardır. BASIC dilini biraz tanıyanlar ve Vusial Basic IDE’lerinden birini biraz kullanmış olanlar VBA for AutoCAD’e çok kolay adapte olabilirler.
“ Tools/Macro/Vusial Basic Editor “ komutu başlatılarak, AutoCAD içine dahil edilmiş olan VBA.IDE (Bütünleşik Geliştirme Ortamı) açılır.
ToolBox açık değilse View menüsünde ToolBox ‘ı seçin.

Fig.1
ToolBox, hazırlayacağınız makroların arayüzlerinde kullanılacak kontrolleri içerir.

Fig.2
Resimdeki işlemleri uygulayarak Projeye, Form eklenir.
ToolBox’tan İstenilen kontrol tıklanarak seçilir daha sonra Form üzerine gelerek uygun yere tıklanarak yerleştirilir.
Şimdi Fig.1 de anlatılan metot yardımıyla formunuza
1 adet CommandButton, 2 adet TexBox ve 1 adet Label ekleyin.
“Properties” penceresi nesnelerin bir takım özelliklerinin düzenlenmesini sağlar.
Forma eklediğiniz CommandButton’u seçerek. “Properties” penceresinden “Caption” kutucuğunun karşısını Topla olarak değiştirin.
![]()
Fig.3
Forma eklediğiniz Label seçerek “Properties” penceresinden “Caption” kutucuğunun karşısını Toplam olarak değiştirin.
Aynı penceredeki “TextAlign” özelliğini aşağıdaki gibi ayarlayın.
![]()
Fig.4

Fig.5
Artık kullanılacak Form’u oluşturduk. Şimdi sıra Buton kontrolüne bir olay atamaya geldi.
Form üzerinde Butona çift tıklayın. Kod sayfası ve aşağıdaki satırlar açılır.
Private Sub CommandButton1_Click()End Sub
Yukarıdaki satırlar arasına
Label1.Caption = Val(TextBox1.Text) + Val(TextBox2.Text)
kodunu ekleyin. Şimdi sıra Makroyu çalıştırmaya geldi.
Run menüsünden “Run Sub/UserForm” seçilerek Makro çalıştırılır.

Fig 6
İki Text kutusuna sayılar girin ve Butona tıklayın. Sayıların toplamı Label kontrolüne otamatik olarak yazdırılır. Kodda;
Label1.Caption
İfadesi biraz önce Properties pencerisinden değiştirdiğimiz, Label kontrolünün Caption özelliği anlamına gelir.
TextBox1.Text ise TextBox1 in Text özelliği anlamına gelir. Val() fonksiyonu yardımıyla da içerik sayısal hale çevrilir.
TexBox2 içinde aynı işlem yapılır. İkisi toplanarak + Label kontrolünün Caption özelliğine aktarılır.
VBA Matematiksel Operatörler ve İşlem Öncelikleri
^ Üs alma operatörü
* Çarpma operatörü
/ Gerçel bölme operatörü (Örn:5/2=2.5)
\ Tamsayı bölme operatörü (Örn=5\2=2)
Mod Mod alma operatörü (Örn:5 Mod 2)
+ Toplama operatörü
- Çıkarma operatörü
Bir VBA makrosunun nasıl çalıştırıldığını ve AutoCAD içinde VBA kullanımı ile ilgili genel bilgiler verdik. Ayrıca Vusial Basic dilinin en temel birkaç özelliğini de bu derste inceledik. Ancak AutoCAD için VBA bunun yanında OLE(ActiveX,COM) kullanımı bunlarla sınırlı değildir. İlerleyen derslerde konuyu daha da açacağız. Görüşmek üzere…
Bu yazı, Cad Bankası sitesinin izni ile yayınlanmıştır.
Technorati Etikets: AutoCAD, programlama, VBA, Visual Basic
İlgili Yazılar
Benzer Yazılar




(5 oy, ortalama: 4.8)
26 February 2007, Monday 13:04
Bildiklerini paylaşmayı seven bir arkadaşımız daha aramıza katıldı.
Yazın için tebrik eder,devamlı olması dilerim.
26 February 2007, Monday 14:03
Sevgili Özgür, aramıza hoş geldin. Kısa zamanda AutoCAD günlüğü ailesinin en sıkı üyelerinden biri olacağına eminiz.
5 March 2007, Monday 9:25
Yazınızın devamını sabırsızlıkla bekliyorum. Bildiklerinizi bizimle paylaştıgınız için teşekkürler.
5 March 2007, Monday 13:47
bir excell tablosundan veri okuması vba ile nasıl yapılabilir, anlatırsanız sevinirim. teşekkürler
5 March 2007, Monday 18:52
En kısa zamanda yazının devamını hazırlayacağım.
İlginiz için teşekkürler
17 March 2007, Saturday 10:31
slm adaş sadec ismimi yazip kimdir dedim benim adimda birisinin oldugunu görmüş oldum