Tags-Etiketler

Bu kısımda sitemizde etiketlenmiş makaleleri toplu olarak bulabilirsiniz...

[ a ] / Makaleler-Article(s)

a ile ilgili toplam 706 makale bulundu !
(A total of 706 article(s) about a was(were) found in all of articles!)

Article
Delphi de DrawColumnCell Örneği Merhaba arkadaşlar bu makalemizde Delphide drawcolumncell örneği yapacağız. Bu örneğimizde DBGrid nesnesinin OnDrawColumnCell olayına yazacağımız aşağıdaki kodla, Price sütunundaki değerlerden 15 den küçük olan değerleri kırmızı renkte gösterimini sağlayacağız.
Formda Mesaj Gösterimi Merhaba arkadaşlar bu makalemizde formda mesaj göstereceğiz.
Label ve TextBox Nesnelerinde TrackBar Kullanımı Merhaba arkadaşlar bu makalemizde label ve textbox gibi nesnelerin trackbar kullanarak nasıl font boyutunu değiştireceğimizi göreceğiz. Formumuza 1 adet Label...
Xml Dosyasından ListBox a Veri Ekleme Merhaba arkadaşlar, bu makalemizde staff xml dosyamızdaki verileri listbox ta göstereceğiz. İlk önce using System.Xml yi ekleyelim. Xml dosyamızı aşağıdaki gibi hazırlıyoruz.
SqLite Database Bağlanmak ve Verileri TreeView da Göstermek Merhaba arkadaşlar bu makalemizde sqlite veritabanına python dilinde nasıl bağlantı yapılacağını göreceğiz. Sonrasında sqlite tablomuzdaki verilerimizi treeview nessnemizde göstereceğiz.
dataGridView da List Metodu Kullanımı Örneği Merhaba arkadaşlar bu makalemizde datagridview da list metodu ile verilerin gösterimini sağlayacağız.
UniTable da My Sql Veritabanındaki Tablodaki Verilerin Gösterimi Merhaba arkadaşlar bu makalemizde Unitable a örnek vereceğiz. İlk önce Palette kısmından formumuza DBGrid ekleyelim. Yine Palette kısmından formumuza UniTable, UniConnrction ve DataSource ekleyelim.
Repeater da Hashtable Kullanımı Merhaba arkadaşlar bu makalemizde Repeater nesnesinde hashtable kullanımına örnek vereceğiz.
MS Access Veritabanına Bağlanmak ve TreeView da Verileri Göstermek Merhaba arkadaşlar bu makalemizde MS Access veritabanına bağlanacağız. Tablodaki verileri TreeView da göstereceğiz.Access veritabanına bağlanabilmek için pyodbc sınıfını aşağıdaki gibi ekleyin.
Asp.Net te Çalışma Anında Sayfadaki Nesnelerin Ekrandaki Gösteriminin Gizlenmesi Merhaba arkadaşlar bu makalemizde çalışma anında web sayfamızdaki Label ve Button nesnesini sırasıyla ekrandan otomatik kaldıracağız. Bunun için javascript kodundan yararlanacağız.
Pythonda Grafik Gösterimi Merhaba arkadaşlar bu makalemizde basit bir grafik örneği yapıyoruz. Bu örnekte Mysql veritabanını tablosundaki verileri grafikte gösterimini sağlıyorum.
C++ maskedTextBox İle Formatlı Yazmak Merhaba arkadaşlar bu makalemizde C++ da maskedTextBox a girilen sayıları formatlı gösterimini sağlayacağız.
Excel de Kayıt Aramak Merhaba arkadaşlar bu makalemizde TextBox a girilen stringi Excel sayfasında ki kayıtlar arasında arayacağız. Bulunan sonucu çalışma anında oluşturduğumuz tabloda göstereceğiz.
CSV Dosyasındaki Verileri SQL Veritabanı Tablosuna Kaydetmek Merhaba arkadaşlar bu makalemizde CSV dosyasındaki veriler sql veritabanındaki tabloya nasıl kaydedilir? Pyton da bununla ilgili bir örnek yapalım.
StringGrid Sütun Genişliğini Otomatik Ayarlamak Merhaba arkadaşlar bu makalemizde StringGrid de sütun genişliğini otomatik ayarlayacağız. Staff.txt dosyasındaki verileri StringGrid nesnemize yüklüyoruz. Aşağıda procedure yazılan kodlarla sütunların otomatik genişliğini belirliyoruz.
DropDownList te ArrayList Kullanımı Merhaba arkadaşlar bu makalemizde DropDownList nesnesinde arraylist kullanımına örnek vereceğiz. DropDownList datasource kısmını arraylist olarak ayarlıyoruz.
DataGridView da CheckBox Sütunda Seçili Olan Satırları Başka Bir DataGridView da Gösterimini Sağlamak Merhaba arkadaşlar bu makalemizde ilk önce DataGridView nesnesine CheckBox sütun ekliyoruz. Sonra MySql veritabanımızdaki tablomuzdaki verileri DataGridView da gösteriyoruz. Son olarak...
My Sql Veritabanında Arama Yapmak ve Arama Sonucunu DBGrid de Göstermek Merhaba arkadaşlar bu makalemizde MS Sql e UniConnection ile bağlanacağız. UniConnection ile bağlantı nasıl yapılır konusunu daha önceki makalemizde detaylı anlatmıştım. Önceki makaleyi okumak için...
C++ ListViewda Arama Yapmak ve Aranan Kayıt Bilgilerini TextBoxta Göstermek Merhaba arkadaşlar bu makalemizde C++ da ListView nesnesinde My Sql veritabanındaki verilerin gösterimini sağlayacağız. TextBox a girileni ListView da arayacağız. Bulunan kayıt satırının arka plan ve yazı rengini değiştireceğiz. Bulunan kayıt bilgilerini TextBox ta göstereceğiz.
İki Tablo İle İlişkili Bir DataSet Oluşturmak Merhaba arkadaşlar, bu makalemizde kullanacağımız dataset ile iki tablomuzu ilişkilendireceğiz. Tablolarımız arasında ilişkilendirmeyi CustomerId sütunu üzerinden yapacağız.
Python da MessageBox Merhaba arkadaşlar bu makalemizde MessageBox a örnek vereceğim. Bu örnekte formdaki buttona tıklandığında ekranda mesaj verilir.
MySql Veritabanında Arama Yapmak ve Arama Sonucunu GridView da Göstermek Merhaba arkadaşlar bu makalemizde Mysql veritabanında arama işlemi yapacağız. Arama sonuçlarını GridView nesnesinde göstereceğiz.
FireDAC Kismindan MS Sql Veritabanina Baglanmak Merhaba arkadaşlar bu makalemizde Data Explorer penceresinde bulunan FireDAC altindaki Microsoft SQL Server dan baglanti nasil yapiliri anlatacagim. Data Explorer penceresinde ilk once Microsoft SQL Server klasorune sag tiklayip...
ListBoxta Mysql Veritabanına Bağlanmak Merhaba arkadaşlar bu makalemizde MySql Veritabanımızdaki worldclassics tablosundaki verileri listbox ta göstereceğim.
GridView da Seçili Satırdaki Karakterleri Küçük Yazdırmak Merhaba arkadaşlar bu makalemizde DataTable i kullanarak Name sütunundaki seçili satırlardaki karakterlerin küçük karakter olarak yazılmasını sağlayacağız.Bu örneğimizde Personel Id değeri 5 den küçük olanlar...
ListBox ta Arama Yapmak ve Seçili Itemin Yazı ve Arka Plan Rengini Değiştirmek Merhaba arkadaşlar, bu makalemizde Listboxta arama yapacağız. Bulunan kayıtların yazı ve arka plan rengini değiştireceğiz.ListBox ın SelectionMode özelliğini MultiSimple yapın. ListBox ın yazı ve arka plan rengini...
Asp.Net te Javascript Kullanarak GridView daki Satır Rengini Değiştirmek Merhaba arkadaşlar bu makalemizde asp.net te javascript kullanarak gridview daki satır rengini değiştireceğiz. Çalışma anında mouse ın üzerine geldiği satırın rengi değişecektir.
MySql Veritabanındaki Verileri ComboBox ta Göstermek Merhaba arkadaşlar bu makalemizde Mysql veritabanındaki worldclassics tablosundaki verileri combobox ta göstereceğim. Combobox ta seçili indeks bilgisini butona tıklayarak label de göstereceğim.
ADOQuery da InsertRecord Metoduyla Kayıt Girişi Merhaba arkadaşlar bu makalemizde ADOQuery nesnesinde Insert Record özelliğini kullanarak Access veritabanımızdaki tablomuza kayıt gireceğiz. Formumuza 1 adet DBGrid ve 1 Button ekliyoruz.
Pytonda Forma Resim Ekleme Merhaba arkadaşlar bu makalemizde python da forma resim ekleyeceğim. Bunun için canvas metodunu kullanacağız.
Metin İçinde Arama Yapmak Merhaba arkadaşlar bu makalemizde txt dosyasından okuma yapıyoruz ve okunan içeriği Entry e aktarıyoruz. Diğer Entry e girilen stringi butona tıklayarak metin içerisinde arama yapıyoruz.
Server Metodunu Çağırarak Sayfada Mesaj Vermek Merhaba arkadaşlar bu makalemizde sayfamızda fonksiyon kullanacağız. Bu fonksiyon ile server metodunu çağırarak sayfamızda mesaj vereceğiz. Sayfamıza 1 adet TextBox, Button ve ScriptManager ekleyelim.
Host Adı ve Ip Adresini Almak ve Console da Göstermek Merhaba arkadaşlar bu makalemizde console uygulaması yapacağız. Bilgisayarın Host adını ve ip adresini console da yazacağız.
ADOTable Ile Filtreleme İşlemi Merhaba arkadaşlar bu makalemizde ADOTablein filtre özelliğini kullanarak Access veritabanında filtreleme yapacağız. Edit e girilen stringi veritabanında arayıp DBGrid de gösterimini sağlayacağız. Formumuza 1 adet DBGrid, 1 adet Edit, 1 adet Button ekleyelim. Daha sonra Palette kısmından ADOTable ve DataSource ekleyelim.
Python da Ekran Görüntüsü Almak Merhaba arkadaşlar bu makalemizde formdaki butona tıklayarak ekran görüntüsü alınır. Aşağıdaki kütüphane sınıflarını form içine ekleyin.
GridView a Scroll Ekleme ve Seçili Satır Bilgilerini Label de Göstermek Merhaba arkadaşlar bu makalemizde GridView a script ile scroll ekleyeceğiz. Dikey eklediğimiz Scroll ile GridView da aşağı yukarı satırlar arasında hızlı gidebileceğiz. Ayrıca GridView da Select linkine tıklayıp satırı seçeceğiz.
Case Kullanımı Merhaba arkadaşlar bu makalemizde Delphi’de Case of kullanımını göreceğiz. Yapıyı şu şekilde kullanıyoruz...
Text Dosyasındaki Metini Güncelleştirmek Merhaba arkadaşlar bu makalemizde formumuza 2 adet TextBox ve 1 adet Button ekliyoruz. TextBox ların ismini txtChange, txtNew diye değiştirelim. txtChange de değişmesini istediğimiz metini, txtNew e yeni metini gireceğiz.
DataGridView da BindingNavigator Kullanimi ve Kayitlar Arasinda Dolasmak Merhaba arkadaslar bu makalemizde DataGridView da BindingNavigator kullanarak MySql veritabanindaki kayitlar arasinda dolasacagiz. Formumuza...
Text Dosyasindaki Bilgileri ListBox’da Gostermek Merhaba arkadaslar bu makalemizde text dosyasindaki satirlari Listbox’ta gosterimini saglayacagiz.
C++ Xml Dosyasindaki Verileri ListView Nesnesinde Gosterimini Saglamak Merhaba arkadaslar bu makalemizde C++ da Xml dosyasindaki verileri okuyup ListView nesnesinde gosterimini saglayacagiz.
Entry e Girilen Icerigi Text Dosyasina Kaydetmek Merhaba arkadaslar bu makalemizde Entry e girilen metini text dosyasina kaydediyoruz.
Xml Dosyasina Kayit Ekleme, Kayit Duzenleme ve Kayit Silme Islemleri Merhaba arkadaslar bu makalemizde Xml dosyasina yeni bir kayit ekleyecegiz. Ayrica mevcut kayitlarda duzenleme yapacagiz. Secili kayitta silme islemini gerceklestirecegiz.
GridView da Java Kullanarak Arama Yapmak ve GridView HighLight Gosterimi Merhaba arkadaslar bu makalemizde GridView nesnesinde ajax kullanarak kayit arayacagiz. Bulunan kaydi highlight olarak gosterimini sagliyacagiz. Sayfamiza 1 adet GridView, Javascript ve UpdatePanel ekleyecegiz.
Text Dosyadan Okumak Merhaba arkadaslar bu makalemizde text dosyasinin icindeki metini okuyarak ekrana yazdiracagiz.
ADOTable Insert, Update ve Delete Islemleri Merhaba arkadaslar bu makalemizde Delphi de ADOTable kullanarak DBGrid nesnesine kayit girisi yapacagiz. Mevcut kayitlari guncelleyecegiz veya mevcut kayiti silecegiz. Formumuza 1 adet DBGrid ve 3 Button ekliyoruz. Ayrica Palette kismindan 1 adet ADOTable ve DataSource ekliyoruz.
MySql Veritabanina Kayit Ekleme ve GridView de Kayitlari Gostermek Merhaba arkadaslar bu makalemizde MySql veritabanimiza yeni kayit nasil eklenir. Onu gorecegiz.Sayfamiza 1 adet Panel ekliyoruz. Panelimizin icinde olusturacagimiz tablonun icerisini...
DataTable da List Kullanimi ve DataGridView da Gosterimi Merhaba arkadaslar bu makalemizde DataTable da olusturdugumuz listeyi tanimlayacagiz ve bu tanimladigimiz listeyi dataGridView nesnesinde gosterecegiz.
C++ My Sql Veritabanina Baglanmak ve dataGridView Nesnesinde Seçili Satir Bilgilerini MessageBoxta Gösterimini Saglamak Merhaba arkadaslar bu makalemizde C++ da dataGridView nesnesinde My Sql veritabanindaki verilerin gösterimini saglayacagiz. dataGridView nesnesine checkbox ekliyoruz. Seçili checkboxtaki satir bilgilerini messagebox ta gösteriyoruz. C++ da Windows Form nasil ekleriz? Konusunu daha önceki makalede anlatmistim.
Faktoriyel Hesaplama Merhaba arkadaşlar bu makalemizde delphide faktöriyel hesaplamayı göreceğiz. Bunun için formumuza 1 adet ListBox,2 adet Edit ve 1 adet Button ekliyoruz. Editlere girdiğimiz sayı aralığındaki sayıların faktoriyel toplamını ListBox ta gösteriyoruz.
Image’larda BallonHint Kullanımı Merhaba arkadaşlar bu makalemizde mouse imleci resim üzerine gelindiğinde mesajın görülmesini sağlayacağız. Resim üzerinden mouse imlecimizi aldığımızda mesaj yazısı otomatik gidecek.
MessageBox Merhaba arkadaşlar bu makalemizde Python’da messagebox kullanımına örnek vereceğiz. Entry e girilen isimi messagebox ta mesaj metini olarak yazacağız. Messagebox için ,
GridView da Satır Üzerindeyken Satır Detaylarını Tooltip Olarak Göstermek Merhaba arkadaşlar bu makalemizde GridView da satır üzerindeyken OnMouseOver olayında javascript kullanarak satır detaylarını tooltip te göstereceğiz.
Verileri CSV Dosyasına Aktarmak Merhaba arkadaşlar bu makalemizde verilerimizi bir csv dosyasına aktarım işlemini gerçekleştireceğiz. Bunun için Pandas'ı yüklememiz gerekiyor ve Pandas'ı yüklemek için komut satırına aşağıdaki kodu yazın. py -3.9 -m pip pandaları kurunuz.
DBCtrlGrid de MySql Veritabanındaki Verileri Sıralı Göstermek Merhaba arkadaşlar bu makalemizde MySql veritabanına bağlanacağız. Formumuza 1 adet DBCtrlGrid ekleyelim. DBCtrlGrid içerisine 5 adet Label ve 5 adet DBEdit nesnesi ekleyelim.
C# da Trim Kullanımı Merhaba arkadaşlar bu makalemizde Trim metodu ile ilgili örnek yapacağız. Trim metoduyla string değerin başındaki ve sonundaki boşlukları silinir.
dropDownList Nesnesinde Seçili Itemi Label de Göstermek Merhaba arkadaşlar bu makalemizde dropDownList nesnesinde seçili item değerini label nesnesinde göstereceğiz. DropDownList nesnesinin Properties kısmından Items e tıklıyoruz.
C++ da Konsol Ekranında MSSql Veritabanına Bağlanarak Kayıtları Göstermek Merhaba arkadaşlar bu makalemizde C++ da konsol ekranında MySql veritabanına bağlanacağız. Bu örneğimizde MSSql de master database inde person tablosuna bağlanacağız.
Delphide Txt Dosyasındaki Kayıtlar Arasında Gezinmek Merhaba arkadaşlar bu makalemizde Read Me txt dosyasındaki satırdaki verileri Edit nesnesinde gösterimini sağlıyoruz. BindingNavigator de olduğu gibi txt dosyasındaki kayıtlar arasında gezinmeyi sağlayacağız.
CSV Dosyasından Okuma Merhaba arkadaşlar bu makalemizde CSV dosyasındaki bilgileri okuyacağız ve ekrana yazdıracağız. Komut satırına aşağıdaki kodu yazın. Pandas ın kurulumunu yapın.
Console Uygulaması Merhaba arkadaşlar bu makalemizde console uygulaması yapacağız. Public record Person kişi bilgilerini tanımlayacağız. Sonrasında girilen kişi bilgilerini ekrana yazdıracağız.
FileUpload Ile Sadece Image Dosyası Yüklemek Merhaba arkadaşlar bu makalemizde FileUpload kullanarak yalnızca image olan dosyaların yüklemesini yapacağız.
Delphide DBGrid Nesnesindeki Verileri Excel Dosyasına Aktarmak Merhaba arkadaşlar bu makalemizde DBGrid nesnesindeki verileri excel dosyasına aktaracağız. Formumuza 1 adet DBGrid, 1 adet Button ekleyelim.
Python da RadioButton Kullanımı Merhaba arkadaşlar bu makalemizde Python’da radiobutton ile ilgili bir basit örnek uygulama yapacağım. Bu örneğimizde radiobutton kullanarak entry i disable yapacağım.
dataGridView da CheckBox İle Satır Seçmek, Seçili Satırın Yazı ve Arka Plan Rengini Değiştirmek Merhaba arkadaşlar bu makalemizde Mysql veritabanına bağlanacağız. Mysql veritabanındaki verileri dataGridView da göstereceğiz. dataGridView nesnesine CheckBox sütunu ekleyeceğiz. Daha sonra seçili checkbox satırlarının yazı ve arka plan rengini değiştireceğiz.
Delphide Progressbar Kullanımı Merhaba arkadaşlar bu makalemizde delphide progressbar örneği yapacağız. Formumuza 1 adet Progressbar, 1 adet Label ve Timer ekleyelim.
C++ da dataGridView Nesnesine TextBox, Button, CheckBox, ComboBox ve Image Alanları Eklemek Merhaba arkadaşlar bu makalemizde C++ da dataGridView nesnesine TextBox, Button, Combobox ve Image sutunları ekliyeceğiz. Sonrasında Checkbox ta seçtiğimiz satır bilgilerini mesaj olarak ekranda göstereceğiz.
CSV Dosyasında Arama Yapmak Merhaba arkadaşlar bu makalemizde CSV Dosyasında arama yapacağız. Arama sonucunu GridView da göstereceğiz.
dataGridView da XML Dosyasindaki Country ve City Verilerini Gostermek Merhaba arkadaşlar bu makalemizde Xml dosyasındaki Country ve City bilgilerini dataGridView da göstereceğiz. Burada countryId ve cityId ye göre sıralama yapacağız.
Local (İç) ve External (Dış) Ip Adresini Öğrenmek Merhaba arkadaşlar bu makalemizde bu makalemizde local ve external ip adreslerimizin ne olduğunu bir örnekle göreceğiz.
Python’da Label Kullanımı Merhaba arkadaşlar bu makalemizde Python’da label kullanımı anlatacağım. Formumuza tkinter ekliyoruz. Title ile formumuza başlık giriyoruz. Label’in text kısmına label de görünecek metini yazıyoruz.
Cookie Oluşturmak ve Cookie Değerlerini Almak Merhaba arkadaşlar bu makalemizde cookie nasıl oluşturulur? ve oluşturduğumuz cookie değerlerini nasıl görebiliriz? Sorularına yanıt bulacağız.
Delphi de MediaPlayer Uygulaması Merhaba arkadaşlar bu makalemizde delphi de basit bir media player uygulaması yapacağız. Formumuza Palette kısmından 1 adet Media Player, ProgressBar, Timer, OpenFileDialog, Button ve 4 adet Label ekleyelim.
Web Sayfasında Javascript İle Birlikte Session Kullanımı Merhaba arkadaşlar bu makalemizde javascript ile birlikte session kullanımını göreceğiz.
Delphi İle MySQL Veritabanına Bağlanmak ve MySql Veritabanındaki Verileri DBGrid de Göstermek Merhaba arkadaşlar bu makalemizde MySql database e bağlanacağız. MySql tablomuzdaki dataları DbGrid nesnesinde gösterimini sağlayacağız. Delphi formumuzda Sağ üst kısımdaki Project’ten Data Explorer tab ını seçelim.
dataGridView da Boş Satır Olup Olmadığının Kontrolünü Yapmak Merhaba arkadaşlar bu makalemizde dataGridView nesnesinde boş satır var mı kontrolünü yapacağız. Bulunan boş satırları mesaj olarak ekranda gösterimini sağlayacağız.
C++ da Text Dosyasını Okumak ve Ekrana Yazdırmak Merhaba arkadaşlar bu makalemizde C++ da text dosyasındaki satırları okuyup ekrana yazdıracağız.
MySql Veritabanındaki Tabloları Kullanarak TreeView da Parent, Child TreeNode lar Oluşturmak Merhaba arkadaşlar bu makalemizde TreeView da açılabilen parent, child node lar oluşturacağız. Oluşturacağımız parent ve child Treenode ların bilgilerini Mysql veritabanımızdaki tablolardan alacağız.
Delphide Tarih Sütunundaki Seçili Tarihlerin Silinmesi Merhaba arkadaşlar bu makalemizde access veritabanına bağlanacağız.Formumuza 1 adet DBGrid, 1 adet Button ekleyelim. Ayrıca formumuza 1 er adet DataSource ve ADOTable ekleyelim. Daha önceki makalelerde anlatmıştım...
dropDownList Nesnesinde Tooltip Uygulaması Merhaba arkadaşlar bu makalemizde dropDownList nesnesinde tooltip nasıl kullanılır? Bunu göreceğiz. Bu örnekte dropDownList de seçili item ile ilgili açıklama bilgisini tooltip te göstereceğiz.
GridView da Seçili CheckBox taki Satırların Arka Plan Rengini Değiştirmek Merhaba arkadaşlar bu makalemizde GridView daki seçili checkbox’lardaki satırların arka plan rengini değiştireceğiz. İlk önce GridView nesnesinin AutoGenerateColumns="False" özelliğini False yapın. Item templateye ekleyeceğimiz...
C++ Array Metoduyla ListView da Verileri Göstermek Merhaba arkadaşlar bu makalemizde C++ da array metodunu kullanarak listview da verilerin gösterimini sağlayacağız. ListView da seçili satırı label de göstereceğiz.
Delphi de Veritabanı İşlemleri-2 ( First, Prior, Next, Last ) Merhaba arkadaşlar bu makalemizde DBGrid nesnesine girilen kayıtlar arasında gezinti yapacağız. Bir önceki kayıt, bir sonraki kayıt, ilk ve son kayıtlara butona tıklayarak ulaşacağız. DBEdit nesnelerinde de kayıtlarımızın gösterimini sağlayacağız.
C++ da ListBox a Array Metoduyla Items Ekleme Merhaba arkadaşlar bu makalemizde C++ da array metodunu kullanarak listbox nesnesine itemslerinin nasıl eklendiğini göreceğiz.
dataGridView daki Verileri Word, Excel ve PDF Formatında Kaydetmek Merhaba arkadaşlar bu makalemizde Sql veritabanındaki verileri dataGridView nesnesinde göstereceğiz. Sonraki adımda dataGridView nesnesindeki verileri word, excel ve pdf formatında kaydedeceğiz.
C++ My Sql Veritabanındaki Verileri listView Nesnesinde Gösterimini Sağlamak ve MySQL Veritabanında Arama Yapmak Merhaba arkadaşlar bu makalemizde C++ da listView nesnesinde My Sql veritabanındaki verilerin gösterimini sağlayacağız. Ayrıca yazar sütununa göre listView nesnesinde arama yapacağız. C++ da Windows Form nasıl ekleriz? Konusunu daha önceki makalede anlatmıştım...
SQLite Databasedeki Dataları Memo Nesnesinde Göstermek Merhaba arkadaşlar bu makalemizde SQLite veritabanına bağlanacağız. Employees.s3db veritabanındaki Employee tablosunu Memo nesnesinde göstereceğiz. Şimdi Data Explorer FireDAC kısmında SQLite database e sağ tıklayalım. Add New Connection a tıklayalım.
C++ MS Sql Database’de DataBinding Olayı Merhaba arkadaşlar bu makalemizde BindingNavigator ile Sql veritabanına bağlanacağız. BindingNavigator ile ileri, geri butonlara tıklayarak kayıtlar arasında gezineceğiz. Son olarak kayıtları TextBox’ta göstereceğiz. Formumuza 1 adet Binding Navigator, 4 adet Label ve TextBox ekleyelim.
QR Kodu Oluşturmak Merhaba arkadaşlar bu makalemizde QR kodunu nasıl oluşturacağımızı göreceğiz. Bu örneğimizde dinamik olarak oluşturacağımız ve sonrasında okuma yapacağımız QR kodu için ZXing.Net Library dosyasını kullanacağız. ZXing.Net ile kolay bir şekilde QR kodu oluşturacağız.
Delphi’de Form’da ToolBar Kullanımı Merhaba arkadaşlar bu makalemizde Delphi’de Toolbar uygulamasını göreceğiz. İlk önce formumuza ToolBar ve ImageList ekleyelim.
ComboBox’ta Seçili Item Indeksine Göre PictureBox’ta Resim Gösterimi Merhaba arkadaşlar bu makalemizde ComboBox’ta seçilen itemin indeksine göre PictureBox’ta resim göstereceğiz. Formumuza 1 adet Combobox ve PictureBox ekleyeceğiz. Bu örnekte images klasöründeki resimleri göstereceğiz.
C++ My Sql Veritabanındaki Verileri dataGridView Nesnesinde Gösterimini Sağlamak Merhaba arkadaşlar bu makalemizde C++ da dataGridView nesnesinde My Sql veritabanındaki verilerin gösterimini sağlayacağız. C++ da Windows Form nasıl ekleriz? Konusunu daha önceki makalede anlatmıştım. Önceki makaleye ulaşmak için...
C++ Çalışma Anında Access Database’de Tablo Oluşturmak Merhaba arkadaşlar bu makalemizde C++ çalışma anında formumuzdaki butona tıklayarak Access veritabanında Employess adlı tablo oluşturacağız. Access veritabanına bağlanabilmeniz için Access DataBase Engine bileşeni gerekebilir.
OuickReport Kurulumu Resimli Anlatımı Merhaba arkadaşlar bu makalemizde Delphi’ye QuickReport bileşeninin nasıl kurulacağını resimli anlatımını yapacağım. İlk önce kullandığınız delphi sürümüne ait quickreport bileşenini buradan indirebilirsiniz.QuickReport bileşenini indirdikten sonra, Delphi’yi açalım. Tools kısmından Options’a tıklayalım.
GridView Nesnesine Çalışma Anında Satır Eklemek Merhaba arkadaşlar bu makalemizde javascript kullanarak çalışma anında GridView nesnesine satır ekleyeceğiz.
Console’da DataTable Gösterimi Merhaba arkadaşlar bu makalemizde console uygulamasında datatable uygulaması nasıl yapılır onu göreceğiz.
GridView da Yuklenen Resimleri Güncellemek Merhaba arkadaslar bu makalemizde FileUpload ile GridView nesnesine resim ekliyoruz. Sonrasinda GridView da düzenleme yapmak istedigimiz satirdaki Edit linkine tikliyoruz.
MSSql Veritabına UniConnection Ile Bağlanmak Merhaba arkadaşlar bu makalemizde MS Sql e UniConnection ile bağlanacağız. UniConnection ile bağlantı yapabilmek için UniDAC ın Trial versiyonunu sitesinden indirip setup’ını Delphi’ye ayrıca kurmamız gerekecektir. Unidac bileşenini buradan indirebilirsiniz. Şimdi formumuza Palette kısmından DBGrid ekleyelim. Daha sonra yine palette kısmından UniConnection, SQLServerUniProvider, UniQuery ve dataSource nesnesi ekleyelim.
C++ da Basit Hesap Makinesi (Calculator) Merhaba arkadaşlar bu makalemizde C++ da toplama,çıkarma, çarpma ve bölme gibi dört işlemin nasıl gerçekleştirildiğini bu örneğimizde göreceğiz..
Ftp Upload Merhaba arkadaşlar bu makalemizde ftp olarak dosya yüklemeyi göreceğiz. Formumuza 1 adet Button ve 1 adet OpenFileDialog ekliyoruz. OpenFileDialog ile ftp ile yüklenecek dosyayı seçiyoruz.
Delphi de Veritabanı İşlemleri ( Insert, Save, Edit, Delete, Search ) Merhaba arkadaşlar bu makalemizde DBGrid nesnesine kayıt girişi, kayıt düzenlemesi, seçili kayıtın silinmesi ve DBGrid de kayıt arama işlemlerini yapacağız. Formumuza 3 adet DBEdit, 5 adet Button, 3 adet Label, 1 adet DBGrid nesnesi ve sonrasında 1 adet DataSource ve ADOTable ekliyoruz.
C++ Windows Formuna Resim Ekleme Merhaba arkadaşlar bu makalemizde C++ Windows formuna resim ekleyeceğiz. Bunun için formumuzun load kısmına picturebox ı formumuza ekleyeceğimiz kodu yazacağız.
GridView da Satırların Yerini Butona Tıklayarak Aşağı Yukarı Kaydırmak Merhaba arkadaşlar bu makalemizde GridView daki satırların bulunduğu sıradaki pozisyonlarını yine GridView a ekleyeceğimiz Yukarı, Aşağı butonlarıyla istenilen pozisyona hareket ettireceğiz. İlk önce...
Delphide Access Veritabanına Bağlanmak Merhaba arkadaşlar bu makalemizde access veritabanına bağlanacağız. Formumuza 2 adet DBEdit, 1 adet Button ekleyelim. Ayrıca formumuza 1 er adet DataSource, ADOConnection ve ADOTable ekleyelim.
C++ Windows Formda MySql Veritabanına Bağlantı Merhaba arkadaşlar bu makalemizde C++ Windows Formumuzdan MySql veritabanına bağlanacağız. Formumuza 2 adet Label, TextBox ve 1 adet Button ekleyelim. Bu örneğimizde kullanıcı adı ve şifremizle Mysql veritabanına bağlantı gerçekleştireceğiz. C++ da Windows Form nasıl ekleriz? Konusunu daha önceki makalede anlatmıştım. Önceki makaleye ulaşmak için
StringGrid’de Text Dosyasındaki Verileri Göstermek Merhaba arkadaşlar bu makalemizde Delphi’de StringGrid Nesnesinde text dosyamızdaki verileri göstereceğiz.
GridView Nesnesindeki Sütunlarda UpperCase Olayı Merhaba arkadaşlar bu makalemizde GridView nesnesinde seçili column daki verileri büyük harf ile yazılmasını sağlayacağız.
Combobox’ta Sql Veritabanı Sütun Değerlerinin Gösterimini Sağlamak ve Combobox’ta Seçili Item Değerinin Detaylarını MessageBox’ta Göstermek Merhaba arkadaşlar bu makalemizde Combobox’ta Sql Veritabanı Sütun Değerlerinin Gösterimini Sağlayacağız ve Combobox’ta Seçili Item Değerinin Detaylarını MessageBox’ta Göstereceğiz. Formumuza 1 adet ComboBox ve Button ekleyelim.
C++ Random Sayı Oluşturma Merhaba arkadaşlar bu makalemizde C++ ile random sayı oluşturacağız. Bu örneğimizde textbox ta 7 random sayının gösterimini sağlayacağız. Formumuza 1 er adet TextBox ve Button ekleyelim.
Delphi İle MS SQL Veritabanına Bağlanmak ve Sql Veritabanındaki Verileri StringGrid de Göstermek Merhaba arkadaşlar bu makalemizde MS Sql database e bağlanacağız. Sql tablomuzdaki dataları StringGrid nesnesinde gösterimini sağlayacağız. Delphi formumuza ADOConnection ekleyelim. ADOConnection nesnesine sağ tıklayıp açılan pencerede EditConnectionStringe tıklayalım.
TextBox ta Otomatik Tamamlama Merhaba arkadaşlar bu makalemizde TextBox a girilen metinin nasıl otomatik tamamlanacağını göreceğiz. Bunun için oluşturacağımız country list koleksiyonunu TextBox ın AutoCompleteCustomSource kısmına ilişkilendireceğiz.
dataGridView Nesnesine Image Sutun Ekleme Merhaba arkadaşlar bu makalemizde dataGridView nesnesine dinamik olarak image column ekleyeceğiz. Formumuza 1 adet dataGridView ve Button ekleyelim.
Text Dosyaya Yazmak ve Text Dosyadan Okumak Merhaba arkadaşlar bu makalemizde oluşturduğumuz text dosyasına yazma işlemi gerçekleştireceğiz. Ayrıca text dosyadan okuma işlemini de gerçekleştireceğiz. Formumuza 1 adet TextBox, 2 adet Button ekliyoruz. TextBox ımızın Multiline özelliğini true yapıyoruz.
Sql Database deki Dataları Pdf Dosya Olarak Kaydetmek Merhaba arkadaşlar bu makalemizde Sql veritabanımızda ki verileri pdf dosyaya kaydedeceğiz. Bunun için ilk olarak Solution Explorer kısmında projemize sağ tıklayalım. Add kısmından Reference kısmına tıklayalım.
Delphide DBGrid Nesnesini Access Veritabanına Bağlamak Merhaba arkadaşlar bu makalemizde access veritabanına bağlanacağız.Formumuza Data Controls kısmından 1 adet DBGrid, DBNavigator ekleyin.Formumuza Data Access kısmından 1 adet DataSource ve dbGo kısmından AdoTable ekleyin.DataSource1 i seçin ve Object Inspector de DataSet kısmında AdoTable1 i seçin.
GridView da Sorgulamaya Göre Satir Arka Plan ve Yazi Rengini Degistirmek Merhaba arkadaslar bu makalemizde GridView nesnesinin OnRowDataBound özelligine yazilan kodla; Fiyat sütunumuzunda ki fiyat deger araligina göre sorgulama yapacagiz. Sonrasinda sorgulama kriterine göre Yazar sütunundaki satirlarin arka plan rengini ve yazi rengini degistirecegiz.
Form Basliginda Tarih ve Saat Gösterimi Merhaba arkadaslar bu makalemizde Delphi formumuzun basliginda tarih ve saat gösterecegiz. Formumuza 1 adet Timer ekleyecegiz. Ekledigimiz Timer1 in Timer kismina kodumuzu yazacagiz.
GridView Nesnesinde Satır ve Arka Plan Rengini Değiştirmek Merhaba arkadaşlar bu makalemizde GridView nesnesinde satırdaki yazı rengini ve arka plan rengini değiştireceğiz. Bu örnekte GridView Rowdatabound a yazdığımız kodla yazar ismine göre satır ve arka plan rengini değiştirmiş olacağız.
GridView Nesnesinde Sütunların Sırasını Değiştirmek Merhaba arkadaşlar bu makalemizde DataTable SetOrdinal özelliğini kullanarak GridView nesnesinde sütunların yerini değiştirebileceğiz. Bu örneğimizde dt.Columns[1].SetOrdinal(2); ile 1. sütunu 2. sütun ile yerini değiştiriyoruz.
DropDownList de Seçili Itemi FormView da Göstermek Merhaba arkadaşlar bu makalemizde DropDownList nesnesinin SelectedIndexChanged e yazacağımız kodla seçili indeks verisini FormView da göstereceğiz.
GridView Nesnesinde Satırdaki Verileri HyperLinke Tıklayarak DetailsView Nesnesinde Göstermek Merhaba arkadaşlar bu makalemizde Sql veritabanımıza verileri GridView da göstereceğiz. GridView nesnesinin AutoGenerateColumns="False" yapıyoruz ve < Columns >< / Column > kısmına Hyperlink ekliyoruz. İlgili satırdaki bilgilerin detaylarını görmek istediğimizde o satırdaki Hyperlinke tıklayarak Detais.aspx sayfasındaki DetailsView da gösteriyoruz.
ListView da Satir Seçmek Merhaba arkadaslar bu makalemizde listview nesnesinin LayoutTemplate kismina tablo ekliyoruz. Ekledigimiz tablonun style görüntüsünü asagidaki css kodlarini kullanarak olusturuyoruz. ItemTemplate kisimina sql veritabanimizin sutunundaki verilerini bagliyoruz.
ListBox daki Satırların Arka Planının Renkli Gösterimi Merhaba arkadaşlar bu makalemizde Listbox nesnesinin satırların arka planını renkli göstereceğiz. İlk önce Sql veritabanımızdaki Kitap sütunundaki verileri Listbox ta göstereceğiz. Sonrasında aşağıdaki kod ile Listbox taki satırların arka planını renklendiriyoruz.
PlaceHolder Kullanımı Merhaba arkadaşlar bu makalemizde PlaceHolder kontrolüne resim ekleyeceğiz ve eklediğimiz resimin gösterimini sağlayacağız.
Repeater da HyperLink Kullanımı Merhaba arkadaşlar bu makalemizde Repeater da hyperlink nasıl kullanılacağını göstereceğiz. Hyperlinke tıkladığımızda DetailsView.aspx sayfasında seçili satırın detay bilgilerini göstereceğiz.
GridView da Button Gizleme Merhaba arkadaşlar bu makalemizde GridView nesnesinde Durum sütununun aktif veya pasif durumuna göre Button un gösterimini sağlayacağız. Durum sütununda buttonun pasif olduğu durumlarda button u gizleyeceğiz.
DataGridView da Filtreleme Merhaba arkadaşlar bu makalemizde dataGridView nesnesinde dataView metodunu kullanarak fiyata göre filtreleme işlemini gerçekleştireceğiz.
Asp.Net te MultiView Kullanımı Merhaba arkadaşlar bu makalemizde Asp.Net’te MultiView nesnesinin nasıl kullanılacağına bakacağız. Bu örnekte MultiView e eklediğimiz View’larda image, textbox, hyperlink gibi nesnelerini göstereceğiz. Bunun için ilk önce MultiView in ekranda görünecek aktif indeksini 0 belirliyoruz. Böylece View1 deki image i göstermiş oluyoruz. İleri butonuna basarak aktif indeksi 1’er artırarak, sonraki View daki nesneyi ekranda göstereceğiz.
GridView da Compute Islemleri Merhaba arkadaslar bu makalemizde seçtigimiz iki Id no arasindaki satirlarin degerini hesaplayacagiz. Ayrica bu araliktaki satirlarin arka plan rengini degistirecegiz. Bu islemin yapilmasini GridView in OnRowDataBound = "OnRowDataBound" kismina yazilacak bir kod ile saglayacagiz. Ayrica GridView nesnesinin AutoGenerateColumns="False" yapiniz.
StringBuilder Merhaba arkadaslar bu makalemizde stringbuilder metodunu kullanarak dinamik olarak bir html tablo olusturacagiz. Ilk olarak; using System.Text; sayfamiza ekleyelim.
QueryString Metodu Ile DetailsView da Gösterim Merhaba arkadaslar bu makalemizde QueryString metodunu kullanarak DetailsView nesnesinde id no ya göre verilerimiz gösterecegiz. Default.aspx sayfamizda ki hyperlink nesnesinin NavigateUrl sini asagidaki gibi yapiyoruz.HyperLink1.NavigateUrl = "~/Details.aspx?Id=2"; Bu sekilde hyperlink e tiklanildiginda Details.aspx sayfasina gidiyoruz ve Id degerini 2 olarak tasiyoruz.
Visual Studio 2022 Preview 2.1 ve Gelen Yenilikler Visual Studio 2022 sürümü ile birçok yeniliğin birlikte geldiğini görüyoruz. Bunlardan birkaçına bakarsak, bundan önceki Visual Studio sürümlerinin 32 bit olarak çalışıyor olmasıydı. Bu da çalışma anında donma ve kilitlenmelere neden olabiliyordu. Visual Studio 2022 ile 64 bit desteği gelmiş olacak.
ListView da Edit, Insert, Update, Delete ve Sayfalama İşlemleri Merhaba arkadaşlar bu makalemizde ListView nesnesinde düzenleme işlemlerini yapacağız. ListView a yeni kayıt girişi yapacağız. Mevcut kayıtların güncellenmesini göreceğiz. İstenilmeyen kayıtları sileceğiz.
GridView da Seçili Satırı Güncellemek Merhaba arkadaşlar bu makalemizde GridView nesnesinde seçtiğimiz satırı güncelleyeceğiz.GridView1_SelectedIndexChanged kısmında seçili satırdaki verileri Textbox ta göstereceğiz. OnRowDataBound a yazacağımız küçük bir kod parçasıyla; seçili satırın arka plan rengini değiştireceğiz.
GridView da DropDownList Kullanımı Merhaba arkadaşlar bu makalemizde GridView nesnesinin içerisinde DropDownList nesnesinin kullanımını göstereceğim. GridView nesnesinin AutoGenerateColumns özelliğini False yapın. Sonra GridView in EditItemTemplate kısmında DropDownList nesnesini göstereceğiz.
GridView da Mouse İmleci Üzerindeki Satırın Stilini Değiştirmek Merhaba arkadaşlar bu makalemizde GridView nesnesinde Mouse imlecinin üzerine geldiği satırın font özelliklerini, satırın arka plan rengini değiştireceğiz. Bun un için javascript kullanacağız. jquery.min.js javascript dosyasını projenizin bulunduğu klasöre ekleyin.
Combobox Databinding Olayı Merhaba arkadaşlar bu makalemizde combobox’ımızı veritabanına bağlayacağız. Combobox’ta seçili satır indeksini ve seçili value değerini label’de göstereceğiz.
Programlama E-Kitap-3 Merhaba arkadaşlar.Blog ve Web Sitemde yayınladığım C#,VisualBasic.NET,Asp.NET,Ado.NET,Sql,Ajax makalelerin daha önce 1. ve 2. kısımlarını e-kitap halinde yayınlamıştım. Şimdi de sitede yayınlanan e makalelerin derlemesi 3. kısım olarak e-kitap olarak yayınlıyorum.
FormView da Güncelleme İşlemi Merhaba arkadaşlar bu makalemizde FormView da verileri göstereceğiz. FormView ItemUpdating e yazacağımız kodla verilerin güncellemesini yapacağız.
Console’da Array Kullanımı Merhaba arkadaşlar bu makalemizde Console da Array e örnek vereceğiz. Bu örnekte diziye eklediğimiz yazar isimlerine göre konsolda arama yapacağız.
Sql Veritabanına Binary Image Eklemek ve Eklenen Image’i GridView’da Göstermek Merhaba arkadaşlar bu makalemizde Sql veritabanımıza binary olarak image ekleyeceğiz ve veritabanımıza eklediğimiz binary image ları GridView’da göstereceğiz. Sayfamıza FileUpload, GridView ve buton ekliyoruz. FileUpload da seçilen image ları veritabanına kaydediyoruz.
Report Wizard İle Raporlama İşlemi Merhaba arkadaşlar bu makalemizde Report Wizard kullanarak veritabanımızda ki tablonun, aspx sayfamızda raporlaması nasıl yapılır? adım adım onu anlatacağım. İlk adım olarak, Solution Explorer da projenize sağ tıklayın. Add -- > Add New Item -- > Report Wizard ı Şekil 1 deki gibi seçip Add butonuna tıklayarak projenize ekleyin.
ListBox’ta Seçili Verileri Veritabanına Kaydetmek Merhaba arkadaşlar bu makalemizde ListBox’ta seçeceğimiz itemleri Sql veritabanımıza kaydedeceğiz. Listbox’ta çoklu seçim yapabilmemiz için Listbox’ın Selection Mode özelliğini MultiSimple olarak ayarlayın. Formumuza 1 adet ListBox ve Button ekliyoruz.
Excel Sayfasında Oluşturulan Tabloda ki Sütunun DataBar lı Gösterimi Merhaba arkadaşlar bu makalemizde Sql veritabanındaki verileri alıp excel sayfasında tablo oluşturacağız. Bu örnekte Fiyat sütununu; excel sayfasında oluşturacağımız tabloda databar lı bir şekilde gösterimini sağlayacağız.
StatusBar da Tarih Gösterimi Merhaba arkadaşlar bu makalemizde Statusbar da tarih gösterimi nasıl yapılır? Basit bir örnekle göreceğiz.Toolbox tan önce formumuza StatusStrip ekleyelim. Eklediğimiz StatusStrip te StatusLabel i seçelim. Sonra formumuza timer ekleyelim.
TextBox a Girilen Metini GridView da Aramak Merhaba arkadaşlar bu makalemizde TextBox a girilen metini GridView kayıtlarında arayacağız. Textbox a metni girdikten sonra Enter tuşuna basarak arama işlemini yapabiliriz.
GridView da RowDataBound Olayı Merhaba arkadaşlar bu makalemizde OnRowDataBound a yazacağımız küçük bir kod parçasıyla; Fiyat sütunumuzunda ki fiyat değer aralığına göre arka plan rengini değiştireceğiz.
GridView da Otomatik Numara Vermek Merhaba arkadaşlar bu makalemizde GridView da veri göstereceğimiz satırlara otomatik olarak sıra numarası vereceğiz. Önce GridView ın AutoGenerateColumns="false" yapınız. GridView ın ItemTemplate içersine ;
Repeater da Sayfalama Merhaba arkadaslar bu makalemizde Repeater da Sayfalama nasil oluyor ona bir örnek yapacagiz. Sayfamiza 2 adet Repeater ve 1 adet link button ekliyoruz.
CSV Dosyasından Okuma Yapmak Merhaba arkadaşlar bu makalemizde CSV formatındaki dosyamızdan kriterimize göre aradığımız verileri ListBox ta listelenmesini sağlayacağız. Bu örneğimizde yazarların kitaplarının fiyatına göre arama yapacağız.
DataGridView Kullanımı Merhaba arkadaşlar bu makalemizde DataGridView kullanımı ile ilgili bir örnek uygulama yapacağız ve ve nesnenin özelliklerine bakacağız.
ListView Kullanımı ve CheckBox İle Seçili Satır Bilgisini MesajBox ta Göstermek Merhaba arkadaşlar bu örnekte ListView nesnesinde gösterdiğimiz CheckBox sütunundaki checkbox seçildiğinde seçili satırın bilgilerini Mesajbox ta gösterimini sağlayacağız.
GridView da Alt Toplam ve Genel Toplamı Göstermek İyi Günler bu makalemizde tablomuzdaki stokId numaraları aynı olan ürünlerin alt toplam tutarlarını hemen bir sonraki alt satırda ve toplam tutarıda tablomuzun en alt kısmında yani Gridview nesnesinin footer kısmında göstereceğiz.
Kayıt Ekleme ve DetailsView da Gösterim Merhaba arkadaşlar bu makalemizde sql veritabanımıza yeni kayıt ekleyeceğiz ve eklenen kayıtın DetailsView da gösterimini sağlayacağız.
DataGridView da Seçili Satırların Silinmesi Merhaba arkadaşlar bu makalemizde dataGridView nesnesinde seçeceğimiz çoklu satırların silme işlemini gerçekleştireceğiz. Çoklu seçim yapabilmeniz için Ctrl + sol tuşa tıklayın.
GridView’daki Verileri Word’e Aktarmak Merhaba arkadaşlar bu makalemizde GridView’daki verileri Word belgesine aktaracağız. Sayfanıza GridView ve button ekleyin. Button’un içerisine Word’e aktarımı sağlayacak olan aşağıdaki kodları yazın.
Chart Kullanımı Merhaba arkadaşlar bu makalemizde DataGridView satırlarındaki bilgileri Chart kullanarak grafiksel olarak göstereceğiz. Formunuza datagridview ve chart nesnesi ekleyin. Chart Series teki ismi personel olarak değiştirin.
dataGridView da İki Tarih Arasında Filtreleme İşlemi Merhaba arkadaşlar, bu makalemizde dataTimePicker da seçilen tarihler arasında dataGridView da filtreleme işlemi yapacağız.
Asp.net te Profil Kullanımı Merhaba arkadaşlar bu makalemizde asp.net te profil kullanımı örneği yapacağız. web.config dosyasına...
DataGridView a Satır Ekleme ve Seçili Satırı Silme Merhaba arkadaşlar bu makalemizde textbox a girilen verileri dataGridView nesnesine satır olarak ekleyeceğiz. Ayrıca dataGridView nesnesinde seçili olan satırı silme işlemini gerçekleştireceğiz.
GridView da Seçili Satır Bilgisini DetailsView da Göstermek Merhaba arkadaşlar bu makalemizde GridView seçili satırdaki bilgileri DetailsView da göstereceğiz. İlk önce projemize GridView ve DetailsView ekleyin ve AutoGenerateRows="False" özelliklerini false yapın.
DataGridView da Formatlı Gösterim Yapılması Merhaba arkadaşlar bu makalemizde dataGridView nesnesindeki satırları formatlı bir şekilde gösterimini sağlayacağız. Seçili satırın arka plan rengi ve yazı rengini değiştireciz.
GridView da Dosya İndirme İşlemi Merhaba arkadaşlar bu makalemizde GridView nesnesine ekleyeceğimiz hyperlink linkine tıkladığımızda files klasöründe bulunan dosyaları indirme işlemini gerçekleştireceğiz. Projemize GridView ve SqlDataSource ekleyelim.
Repeater da Image Gösterimi Merhaba arkadaşlar bu makalemizde images klasöründeki bulunan tüm resimlerin Repeater nesnesinde gösterimini sağlayacağız.
GridView da Bir DataTable İle Sütunlardaki Değerleri Toplama Merhaba arkadaşlar bu makalemizde GridView sütunlarındaki satırların toplamını, Toplam Tutar sütununda gösterilmesini sağlayacağım. Ayrıca GridView Footer kısmında da her bir sütunun toplamını göstereceğim.
Asp.Net te SiteMap Kullanımı Merhaba arkadaşlar bu makalemizde SiteMap kullanımına değineceğim. Sitemap kullanarak sayfamızda örnek bir image göstereceğiz.
Repeater Kullanımı ve Sütundaki Satırların Fontunun ve Renginin Değiştirilmesi Merhaba arkadaşlar bu makalemizde Repeater kullanımına örnek vereceğiz. Repeater nesnesindeki her bir sütundaki satırların fontunu ve rengini değiştireceğiz.
RadioButton Kullanarak GridView da Satır Seçilmesi Merhaba arkadaşlar bu makalemizde RadioButton’a tıkladığımızda GridView’daki satırı seçip, seçili satırın arka plan rengini değiştireceğiz. Bu işlemi yapabilmek için javascript kodundan yararlanacağız.
GridView da Seçili Satırı DetailsView da Göstermek Merhaba arkadaşlar bu makalemizde GridView nesnesi ile birlikte DetailsView nesanesini birlikte kullanacağız. GridView da seçili satırın detay bilgilerini DetailsView da göstereceğiz.
GridView da ImageField Kullanımı Merhaba arkadaşlar bu makalemizde ImageField kullanarak GridView nesnesinde resim göstereceğiz. GridView nesnesinin AutoGenerateColumns özelliğini AutoGenerateColumns="False" yapın.
GridView da Satırı Formatlı Yazdırmak Merhaba arkadaşlar bu makalemizde tablomuzdaki fiyat sütunundaki değerlere göre, GridView daki satırın arka plan rengini ve yazı rengini farklı yapacağız.
PictureBox’ta Random Resim Gösterimi Merhaba arkadaşlar, bu makalemizde images klasöründe bulunan resimleri random olarak PictureBox nesnesinde göstereceğiz. Formumuza PictureBox ve Timer ekleyeceğiz.
Cümle İçerisindeki Kelimeleri Saymak Merhaba arkadaşlar bu makalemizde InputBox a girilmiş olan cümlenin içerisinde kaç adet kelime olduğunu öğreneceğiz.
ListView a Satır Ekleme ve Satır Silme Merhaba arkadaşlar bu örnekte veritabanını kullanmadan ListView nesnesine nasıl satır ekleyeceğimizi ve seçili satırı nasıl sileceğimizi göreceğiz.
Ajax Kontrolü Kullanılarak Çoklu Dosya Yükleme Merhaba arkadaşlar bu makalemizde Ajax kontrolü kullanarak çoklu dosya yükleme işlemi gerçekleştireceğiz. Ajax Control Toolkit’i Toolbox’a nasıl ekleyeceğimizi daha önceki makalemizde göstermiştik. Sayfamıza ScriptManager ve Ajax Toolkit kısmından AjaxFileUpload ekleyeceğiz.
GridView da Karakter Sınırlama Merhaba arkadaşlar bu makalemizde GridView sütunlarındaki karakterleri sınırlayacağız. Bu örnekte 10 karakterden sonrası karakterler “…” şeklinde gösterilecek. Bunu GridView nesnesinin RowDataBound olayına yazılacak kod ile sağlayacağız.
DataList’te Mouse Nesne Üzerindeyken Highligt Gösterimi Nasıl Sağlanır? Merhaba arkadaşlar bu makalemizde CSS yardımıyla DataList nesnemizin farklı bir şekilde görünmesini sağlayacağız.
Ajax Control Toolkit Kurulumu Merhaba arkadaşlar bu makalemizde Ajax Control Toolkit araçlarını Toolbox a ekleyeceğiz.İlk önce aşağıdaki linkten Ajax Control Toolkit .NET 4.5 i indirin.
Chart Kullanımı Merhaba arkadaşlar bu makalemizde Chart kullanımı ile ilgili bir örnek yapacağız. Veritabanında bulunan kayıtlarımızı Chart nesnesini kullanarak grafiksel olarak gösterimini sağlayacağız.
GridView Resim Ekleme,Günceleme ve Silme İşlemleri Merhaba arkadaşlar bu makalemizde GridView nesnemize resim ekleyeceğiz. FileUpload ile seçtiğimiz resimleri, Uploaded klasörüne kopyalayacağız. GridView de eklediğimiz resim ve açıklamasını Edit kısmından güncelleyebileceğiz veya eklemiş olduğumuz resimi silebileceğiz.
dataGridView a Resim Eklemek Merhaba arkadaşlar, bu makalemizde veritabanında resim adresi kayıtlı olan resimlerin dataGridView nesnesinde gösterimini sağlayacağız.
Combobax ta Seçili Tablonun Bilgilerini DataGridView Göstermek Merhaba arkadaşlar bu makalemizde veritabanında bulunan tabloların isimlerini Combobox ta göstereceğiz. Combobox ta seçmiş olduğumuz tabloya ait verileri dataGridView nesnesinde göstereceğiz.
GridView a Image Sütunu Eklemek ve Javascript Kodu Kullanarak Resmin Üzerine Gelindiğinde Büyük Boyut Resim Gösterimini Sağlamak Merhaba arkadaşlar bu makalemizde GridView nesnesinde image sütunu ekleyeceğiz. Gridview a eklediğimiz image sütunu üzerine mouse ile geldiğimizde resmi büyüteceğiz.
ListView da Veri Seçimi Merhaba arkadaşlar bu makalemizde ListView nesnesine LinkButton ekleyeceğiz ve bu butona basıldığında listview nesnesinde satırı seçeceğiz. Seçili satır no’yu projeye ekleyeceğimiz Label de göstereceğiz.
Veritabanında Aranılan Kayıt Bulunmadığında Mesaj Olarak GridView a Kayıt Bulunmadığını Yazdırmak Merhaba arkadaşlar bu makalemizde Veritabanında kayıt olmadığında veya sorguladığımız bilgi veritabanında bulunmadığında GridViewdaki satırlara kayıt bulunmamaktadır yazdıracağız.
DataGridView da Kayıt Arama ve TextBox a Aktarma Merhaba arkadaşlar bu makalemizde dataGridView nesnesinde Id numarasına göre arama yapacağız. Bir önceki, bir sonraki, ilk kayıt veya son kayıta gitmek için formumuza buttonlar ekleyeceğiz. Ayrıca kayıtlar arasında gezerken dataGridView da seçili satırdaki dataları textbox ta göstereceğiz.
GridView Nesnesindeki Verileri ve Resimleri Excele Aktarmak Merhaba arkadaşlar bu makalemizde GridView nesnesindeki verileri resimler ile birlikte excel dosyaya aktaracağız.
ListBox a Kayıt Ekleme ve Aynı Kayıt Girişini Engelleme Merhaba arkadaşlar bu makalemizde ListBox nesnesine yeni kayıt ekleyeceğiz. Ayrıca ListBox ta bulunan kayıtları kontrol ederek aynı kayıt girişinin olmasını engelleyeceğiz.
ProgressBar İle Birlikte Dosya Kopyalama Örneği Merhaba arkadaşlar bu makalemizde progressbar ile birlikte dosya kopyalama ile ilgili bir örnek yapacağız. OpenFileDialog ile seçtiğimiz dosyayı kopyalarken kopyalama yüzdesi ve kopyalama boyutunu da ekran da göstereceğiz.
Yükleniyor Uyarısından Sonra Update Panel İçerisindeki GridView Nesnesine Veri Aktarımı Yapmak Merhaba arkadaşlar bu makalemizde UpdatePanel içindeki veri al butonuna bastığımızda ilk önce loading image i ekrana gelecek ve daha sonra Update panelindeki GridView a verileri aktacağız.
GridView Nesnesinde Kayıt Arama Merhaba arkadaşlar bu makalemizde Gridview nesnesinde arama işlemi gerçekleştireceğiz. Textbox a yazılan değeri Gridview da aratacağız.
TextBox ta Otomatik Tamamlama İşlemi Merhaba arkadaşlar bu makalemizde javascript kodlarını kullanarak TextBox’ta otomatik tamamlama işlemini gerçekleştireceğiz. Genelde arama motorlarında da benzeri şekilde sıkça kullanılan ve kullanışlı bir kod parçacığıdır.
Repeater Nesnesinde AlternatingItemTemplate Kullanımı Merhaba arkadaşlar bu makalemizde Repeater nesnesinde AlternatingItemTemplate kullanarak, Repeater nesnesinin satır renklerini değiştireceğiz.
Accordion Menü Merhaba arkadaşlar bu makalemizde accordion menü ile ilgili bir örnek yapacağız. Accordion menüde gösterilecek içerik ve başlıklar için sayfamıza Repeater ekliyoruz. Menü için javascript kodları kullanıyoruz. Javascript kodlarına aşağıdaki linklerden ulaşabilirsiniz.
DetailsView Nesnesinde Yeni Kayıt Girişi, Güncelleme ve Silme İşlemleri Merhaba arkadaşlar bu makalemizde DetailsView da kayıt işlemi, kayıt güncelleme ve silme işlemlerinin nasıl yapıldığını göreceğiz. DetailsView nesnesinde sayfalama için AllowPaging özelliğini AllowPaging="true" ve yine DetailsView nesnesinin AutoGenerateRows özelliğini de AutoGenerateRows="false" yapın.
Repeater Nesnesinde Seperator Template Kullanımı Merhaba arkadaşlar bu makalemizde Repeater nesnesinde SeperatorTemplate ekleyeceğimiz horizontal çizgi hr ile repeater satırlarını birbirinden ayırmış olacağız.
JavaScript Kullanarak GridView da Arama Yapmak Merhaba arkadaşlar. Bu makalemizde javascript kodu kullanarak, GridView nesnesinde arama yapacağız. DataTable metodunu kullanarak Id, Name ve Country sütunlarımızı oluşturuyoruz. OnDataBound olayında ise GridView nesnesinin başlık kısmına bir satır ekliyoruz ve eklenen satıra textbox ilave ediyoruz. (
GridView Nesnesi FooterTemplate Kullanımı Merhaba arkadaşlar, bu makale de GridView nesnesinin FooterTemplate kısmına eklediğimiz Textbox ve Button ile Gridview a veri girişi yaparak yeni satır eklemiş olacağız. Mevcut satırlardaki bilgilerin güncellemesini, silinmesini sağlayacağız. Bu örnekte procedure metodunu kullanılacaktır.
FileUpload İle Upload Edilen Dosyalara Random İsim Vermek Merhaba arkadaşlar bu makalemizde FileUpload nesnesi ile upload ettiğimiz dosyaların rastgele isim almasını sağlayacağız.
Web Sitesi İçin Güvenlik Resimi Oluşturmak Merhaba arkadaşlar. Bu makalemizde web sitelerinde sıkça kullanılan güvenlik resmi oluşturma ve karşılaştırma işlemlerinin nasıl yapıldığını anlatacağım. Bu örneğimizde Session özelliğinden yararlanacağız.
GridView Nesnesinde Kaydırılabilir ScrollBar Çubuğu Ekleme Merhaba arkadaşlar bu makalemizde GridView nesnesine kaydırma çubuğu scrollbar nasıl eklenir onu göstereceğim. GridView nesnesinde kaydırma çubuğu için CSS class ını kullanacağız.
GridView Nesnesinde Aranan String in Satır Rengini Değiştirmek Merhaba arkadaşlar bu makalemizde TextBox a girilen string in bulunduğu GridView satırlarının rengini değiştireceğiz. Ayrıca Department sütunundaki R ile başlayan verilerin satır rengini de farklı renk yapacağız.
DropDownList Nesnesinde Seçime Göre GridView Sütunundaki Verileri Sıralama Merhaba arkadaşlar. Bu makalemizde DropDownList nesnesindeki seçime göre GridView sütununda ASC, DESC işlemini gerçekleştirerek verilerin sıralanmasını sağlayacağız.
FileUpload Çoklu Dosya Seçimi ve Kaydetme Merhaba arkadaşlar. Bu makalemizde FileUpload ile çoklu dosya seçimi yapacağız. Sonra images klasörüne seçtiğimiz dosyaları kaydedeceğiz. İlk önce Fileupload nesnesinin AllowMultiple özelliğini true yapın.
GridView Nesnesinde Sütundaki Verileri Toplama Merhaba arkadaşlar bu makalemizde GridView nesnesinde Quantity sütunundaki değerleri toplamını alt kısma yazdıracağız. Gridview nesnesinin AutoGenerateColumns özelliğini false yapın.
GridView Nesnesinde Kayıt Arama Merhaba arkadaşlar bu makalemizde textBox a gireceğimiz Adı GridView nesnesinde aratacağız. Bu örnekte Ad sütununa göre aramayı yapacağız.
GridView Nesnesinde Seçili CheckBox Satırların Silinmesi Merhaba arkadaşlar bu makalemizde Gridview nesnesine checkbox ekleyerek, seçili checkbox satırlarının isteğe bağlı olarak silinmesini sağlayacağız.
Sql Veritabanı Insert, Update İşlemleri Merhaba arkadaşlar bu makalemizde Sql veritabanımıza yeni kayıt girişi yapacağız. Veritabanındaki mevcut kayıtlarda güncelleme işlemi gerçekleştireceğiz.
GridView Nesnesine Boş Satır Ekleme Merhaba arkadaşlar bu makalemizde GridView nesnesinde veritabanında ki verileri göstereceğiz. ProducId ye göre kategorilendirme yapacağız ve kategorilendirirken aralara boş satır ekleyeceğiz.
DropDownList de JavaScript ile Image Gösterimi Merhaba arkadaşlar bu makalemizde Javascript ten yararlanarak dropdownlist nesnemizde image gösterimini sağlayacağız.
GridView Nesnesinde DropDownList Kullanımı ve Güncelleştirme Yapılması Merhaba arkadaşlar bu makalemizde GridView nesnesi içerisinde dropdownlist kullanacağız. Bu örnekte Ad sütununda kullandığımız Dropdownlist de seçili olan adın güncelleştirmesini yapacağız.
GridView Nesnesine Otomatik Satır Numarası Ekleme Merhaba arkadaşlar bu makalemizde GridView nesnesine PNo sütunu ekleyerek otomatik satır numarasının yazılmasını sağlayacağız.
GridView Nesnesinde Seçili CheckBox Satırlarının Gösterimi Merhaba arkadaşlar bu makalemizde GridView nesnesinde seçili CheckBox taki satırları alarak dinamik olarak oluşturacağımız diğer bir GridView nesnesinde gösterimini sağlayacağız.
GridView da Seçili Satırda Onay Butonunun Çıkması Merhaba arkadaşlar bu makalemizde mouse ile satır seçimi yapıldığında, seçili satırın sağında ki sütunda onay butonunun oluşmasını sağlayacağız.
DataList Nesnesinde Resim Gösterilmesi Merhaba arkadaşlar bu makalemizde DataList nesnesinde image larımızı göstereceğiz. İlk önce sql veritabanımızı Şekil 2 deki gibi oluşturun. Id sütunundaki Identity Specification özelliğini True yapın. Sonraki adımda projenize FileUpload, TextBox, Button ve DataList nesnesi ekleyin.
GridView Nesnesinde Dinamik Olarak Resim Gösterimi Merhaba arkadaşlar bu makalemizde GridView nesnesine dinamik olarak resim ve string girişi yapacağız. Şimdi projemize 3 adet TextBox, 1 adet FileuPload ve GridView ekleyelim.
GridView Nesnesinde Sütunlarda Arama Yapmak Merhaba arkadaşlar bu makalemizde GridView nesnesinde sütunların altındaki textboxlara gireceğimiz stringleri o sütunda arayacağız. Bunun için java kodlarından yararlanacağız.
GridView Nesnesinde Seçili Satır Bilgilerini TextBox ta Göstermek Merhaba arkadaşlar bu makalemizde GridView nesnesinde seçili satıra ait bilgileri TextBox a aktaracağız. Gridview nesnesinin AutoGenerateColumns özelliğini False ve AutoGenerateSelectButton özelliğini de True yapın.
PictureBox’ta Drag Drop İşlemleri Merhaba arkadaşlar bu makalemizde PictureBox nesnesinde sürükle bırak işlemini gerçekleştireceğiz. Bunun için PictureBox nesnesinin MouseDown, DragOver ve DragDrop olaylarına aşağıdaki kodları yazın.
Image Üzerinde ElevateZoom u Kullanarak Zoomlama İşlemi Gerçekleştirme Merhaba arkadaşlar bu makalemizde Resim üzerine elevateZoom kullanarak zoomlamayı göstereceğiz.
DataGridView Kontrolünde Kayıt Arama Merhaba arkadaşlar bu makalemizde DataGridView kontrolünde ki sutunlarda kayıt arayacağız. Bulunan kayıtın satır arka plan rengini değiştireceğiz.
Repeater Nesnesinde Image Gösterimi Merhaba arkadaşlar bu makalemizde Repeater nesnesinde images klasörü içindeki resimlerin gösterimini sağlayacağız.
GridView da Drag Drop İşlemleri Merhaba arkadaşlar bu makalemizde GridView nesnesinde seçili satırın yerini sürükle bırak metodu ile değiştireceğiz. Bunun için javascript kodlarından yararlanacağız.
DataGridView Kontrolünde Satır Arka Plan Rengini ve Sutun Yazı Rengini Değiştirme Merhaba arkadaşlar bu makalemizde DataGridView kontrolünde satır ve sütun başlıklarını, yazı karakterlerini ve seçili olan satırların ve sütunların arka plan renklerini ve font stillerini değiştireceğiz.
GridView Nesnesi ve DropDownList Nesnesini Birlikte Kullanmak Merhaba arkadaşlar bu makalemizde DropDownList nesnesinde gösterilen kategorideki verileri GridView nesnesinde gösterimini sağlayacağız.
DataGridView Nesnesine Dinamik Image Sütunu Ekleme Merhaba arkadaşlar bu makalemizde dataGridView nesnesine dinamik olarak image sütunu ekleyeceğiz.
GridView Nesnesinde ki Image in Zoomlanarak Tooltip Şeklinde Gösterilmesi Merhaba arkadaşlar bu makalemizde GridView nesnesinde, image gösterimini sağlayacağız. Sonra image’ın üzerine mouse ile gelindiğin de image’ın tooltip şeklinde büyüterek ekranda gösterimini sağlayacağız
Excel de Arama Yapmak Merhaba arkadaşlar bu makalemizde Excel sayfamızdaki Ad sütununa göre arama işlemi yapacağız. Excel sayfanızı Şekil 1 de olduğu gibi oluşturun.
DataGridView Satırlarını Koşullu Olarak Renklendirme Merhaba arkadaşlar bu makalemizde tablomuzdaki puan sütunundaki değerlere göre koşullu sorgulama yaparak, DataGridView kontrolümüzde ki satırların arka plan ve yazı renklerini değiştireceğiz.
GridView Nesnesinde Seçili CheckBox Satırlarının Silinmesi Merhaba arkadaşlar bu makalemizde GridView nesnesinde seçili CheckBox taki satırları sileceğiz. Sayfamıza ilk önce GridView ve SqlDataSource ekleyin. Şekil 1 deki Advenced butonuna tıklayarak, Generate INSERT, UPDATE, and DELETE statements i seçiniz.
ListBox Database İşlemleri Merhaba arkadaşlar. Bu makalede ListBox veritabanı işlemleri ile ilgili bir örnek yapacağız. Formunuza 1 adet ListBox ve TextBox ekleyin.
Dictionary Metodu ListBox Merhaba arkadaşlar. Bu makalemizde Dictionary kullanarak ListBox nesnesinde item ekleyeceğiz.Formunuza ListBox ekleyin.
ListView da Resim Göstermek Merhaba arkadaşlar. Bu makalemizde ListView nesnesine resim ekleyeceğiz. Formunuza ListView,Button ve OpenFileDialog ekleyin.
DataGridView Nesnesini Yazdırma Merhaba arkadaşlar. Bu makalede DataGridView nesnesindeki bilgileri yazdıracağız.
GridView da Arama Merhaba arkadaşlar. Bu makalemizde GridView nesnesinde arama işlemi gerçekleştireceğiz.
DataGridView da Link Sütunu Kullanmak Merhaba arkadaşlar. Bu makalemizde DataGridView nesnesinde sütunda link kullanımını anlatacağız.
GridView’daki Verileri Text Dosya’ya Aktarmak Merhaba arkadaşlar. Bu makalemizde GridView sütunlardaki verileri text dosya ya aktaracağız. GridView nesnemizin AutoGenerateColumns özelliğini AutoGenerateColumns="False" yapın.
DataGridView da Sütunda Arama Yapmak Merhaba arkadaşlar. Bu makalemizde TextBox a girdiğimiz stringi, DataGridView daki tüm sütunlarda aratıyoruz. TextBox a büyük veya küçük karakter girişi yaparak arama yapabilirsiniz. Bu durum arama sonucunu etkilemeyecektir. Aranan değer DataGridView da bulunduğunda, ilgili satırın backcolor rengi sarı olacaktır.
PictureBox taki Resimi Sql Veritabanına Kaydedip DataGridView da Gösterimini Sağlamak Merhaba arkadaşlar. Bu makalemizde PictureBox ta gösterdiğimiz image ları Sql veritabanına kaydedip, kaydedilen image ları DataGridView nesnesinde göstereceğiz.
DataList de Image Gösterimi Merhaba arkadaşlar. Bu makalemizde sitelerde sıkça gördüğümüz tanıtım yapılan ürünlerin katalog şeklinde gösterilmesi ile ilgili basit bir örnek yapacağız. DataList nesnesine image,label ve hyperlink ekleyeceğiz.
DataGridView Sütun ve Satır Renklerini Değiştirmek Merhaba arkadaşlar. Bu DataGridView nesnesinde sütun ve satır renklerinin nasıl değiştirildiğini göreceğiz.
DataGridView da Seçili Satır Bilgilerini TextBox ta Göstermek Merhaba arkadaşlar. Bu makalemizde Customers tablosundaki bilgileri, DataGridView da göstereceğiz. DataGridView da seçili satır bilgilerini Textbox ta göstereceğiz.
DataList de Kategorileme Merhaba arkadaşlar. Bu makalemizde DataList ile ilgili örnek yapacağız. ItemTemplate, AlternatingItemTemplate kısımlarına tablodaki sütunları yan yana ekleyerek gösterimini sağlayacağız.
ComboBox ta Veritabanı işlemleri Merhaba arkadaşlar. Bu makalede Combobox ile ilgili bir örnek yapacağız. Veritabanımızdaki kayıtlı müşteri id no larını combobox ta gösterimini sağlayacak ve seçili id ye göre TextBox ta müşterilerin bilgilerini göstereceğiz.
Excel Sayfasına Resim Eklemek Merhaba arkadaşlar. Bu makalemizde Excel sayfasına resim ekleyeceğiz. İlk önce Add Reference e tıklayın.
DataGridView da Sayfalama Merhaba arkadaşlar. Bu makalemizde DataGridView nesnesinde istenilen sayıda kayıt nasıl gösterilir ve kayıtlar arası geçişleri göreceğiz. Bu örnekte DataGridView da 5 li kayıt gösterimini sağlayacağız.
CheckBoxList Listesindeki Seçili Olanları Ekrana Yazdırmak Merhaba arkadaşlar. Bu makalemizde CheckBoxList listesindeki bilgilerin dropdown şeklinde göstermini sağlayacağız. Aşağı doğru açılır popup pencerede seçili checkbox taki personel isimlerini yazdıracağız.
DateIff Kullanımı İki tarih arasında ne kadar süre geçtiğini yıl, ay, gün, saat, dakika, saniye bazlı hesaplayan küçük bir program yapalım.
DataGridView da CellClick Olayı Merhaba arkadaşlar. Bu makalemizde Datagridview CellClick olayına örnek vereceğiz. Bu örnekte Datagridview da tıklanılan satırın tümünün seçilmesini, satır renginin değiştirilmesini ve seçili satırın bilgilerinin Messagebox ta gösterimini sağlayacağız.
DataGridView Nesnesinde BindingNavigator Kullanımı Merhaba arkadaşlar. Bu makalemizde DataGridView nesnesinde BindingNavigator nasıl kullanılıyor? bunu inceleyeceğiz. BindingNavigator ü kullanarak satırlar arası geçişleri göreceğiz.
BindingNavigator Kullanımı Merhaba arkadaşlar. Bu makalemizde BindingNavigator kullanarak veritabanında ki kayıtlar arasında gezinti yapacağız. Formumuza 1 tane BindingNavigator, BindingSource ve 5 tane TextBox, Label ekleyin.
GridView Nesnesinde Seçili Satırın Rengini Değiştirme Merhaba arkadaşlar. Bu makalemizde GridView nesnesine ekleyeceğimiz butona tıklanıldığında seçili olan satırın rengini değiştireceğiz.
GridView da Button Kullanarak Satır Ekleme Merhaba arkadaşlar. Bu makalemizde GridView nesnesine eklediğimiz Button a tıkladığımızda GridView a satır ekleyeceğiz. GridView nesnesinin AutoGenerateColumns="False" yapın.
DataTable Kullanımı Merhaba arkadaşlar. Bu makalemizde Datatable kullanımına basit bir örnek vereceğiz. Datatable daki satırları dinamik oluşturacağımız Gridview da gösterimini sağlayacağız.
Cümle İçerisindeki Boşluk Sayısını Almak Merhaba arkadaşlar. Bu makalemizde cümle içerisinde geçen boşluk sayısını öğreneceğiz. Aynı şekilde, Split(str, "bu kısıma sayılacak kelimeyi yazınız.") kod kısmına sayılacak kelime yazılarak, cümle içerisinde kaç kere yazıldığı öğrenilebilinir.
GridView da Seçili Olan Satırları Aktarmak Merhaba arkadaşlar bu makalemizde Gridview nesnesinde seçili Checkbox taki satırları İkinci Gridview nesnesine aktaracağız.
GridView da Seçili Dosyaları Çoklu Olarak Sıkıştırmak Merhaba arkadaşlar bu makalemizde Gridview nesnesinde seçilecek olan dosyaları çoklu olarak zipleyeceğiz. İlk önce Ionic.Zip.dll dosyasını buradan indiriniz.
GridView da Seçili Sütunları Excel e Aktarmak Merhaba arkadaşlar bu makalemizde Gridview nesnesinde seçili sütunları excel e aktaracağız. Gridview nesnesinde otomatik sütun eklemeyi AutoGenerateColumns = "False" yapın.
DataGridView Nesnesinde Button Kullanımı Merhaba arkadaşlar. Bu makalemizde Datagridview nesnesinde buton ekleyeceğiz. Butona tıkladığımızda, konumunu ekrana mesaj olarak yazdıracağız.
Propercase Metodu Merhaba arkadaşlar. Bu makalemizde Propercase metoduyla, cümledeki kelimelerin ilk harflerini büyük yazdıracağız.
DataGridView Nesnesinde Sütun Gizlemek Merhaba arkadaşlar. Bu makalemizde Datagridview nesnesinde Ad sütununu gizleyeceğiz.
DetailsView Nesnesinde Insert,Update,Delete İşlemleri Merhaba arkadaşlar. Bu makalemizde Detailsview nesnesinde Insert, Update, Delete işlemlerini göreceğiz.
ListView Nesnesine Insert,Update,Delete İşlemleri Merhaba arkadaşlar. Bu makalemizde Listview nesnesinde Insert, Update, Delete işlemlerini göreceğiz.
Asp.Net te Geri Sayım Uygulaması Merhaba arkadaşlar. Bu makalemizde timer kullanarak geri sayım işlemini gerçekleştireceğiz. Projenize ScriptManager,Timer ve Label ekleyin.
GridView da ObjectDataSource Kullanımı Merhaba arkadaşlar. Bu makalemizde GridView nesnesinde ObjectDataSource kullanımına değineceğiz. ObjectDataSource u kullanarak Gridview nesnesinde image gösterimini sağlayacağız.
FileUpload Nesnesi İle Yüklenen Dosyaları GridView da Göstermek Merhaba arkadaşlar bu makalemizde Fileupload ile yüklediğimiz dosyaları, Gridview da gösterimini sağlayacağız. GridView ItemTeplate kısmına ekleyeceğimiz LinkButtona tıklayarak yüklenilen dosyayı download edeceğiz.
Karakter Sayımı Merhaba arkadaşlar. Bu makalemizde Textbox alanındaki a harfinin kaç kez geçtiğini sayarak mesaj olarak yazdıracağız.
DataGridView Seçili Hücrenin Sütun Başlığını Almak Merhaba arkadaşlar. Bu makalemizde datagridview nesnesinde seçili hücrenin sütun başlığını alacağız.
DataGridView Seçili Satırın Fontunu, Rengini Değiştirme Merhaba arkadaşlar. Bu makalemizde seçili satırın arkaplan rengini ve fontunu değiştireceğiz.
GridView da TextBox Kullanımı Merhaba arkadaşlar. Bu makalemizde GridView nesnesinde TextBox alanın nasıl kullanıldığını göreceğiz.
DataGridView Nesnesinde Kayıt Arama Merhaba arkadaşlar. Bu makalede DataGridView nesnesinde ilk ada göre arama yapılıp, kişinin işini mesaj olarak ekrana yazılmasını sağlayacağız.
GridView daki Sütuna Otomatik Olarak Numara Verilmesini Sağlamak Merhaba arkadaşlar. Bu makalede GridView nesnesindeki ID sütununa otomatik olarak numara verilmesini sağlayacağız. Gridview nesnesinin Columns alanına aşağıdaki kodda belirtilen ItemTemplateyi ekleyeceğiz.
GridView daki Null Kısımları Doldurmak Selam arkadaşlar. Bu makalede GridView nesnesinde Null olan alanları ItemTemplate metodunu kullanarak bu boş alanlara “Kayıt Yok!” yazısını yazacağız.
ProgressBar Kullanımı Merhaba arkadaşlar. ProgressBar ile ilgili örnek yapacağız. Formumuza 1 adet Timer ekleyin.
Stringdeki Boşlukları Kaldırmak Merhaba arkadaşlar.Bu örnekte string içerisindeki boşlukları kaldıracağız. Bunun için Replace () metodunu kullanacağız.
TextBoxta Arama Yapmak Merhaba arkadaşlar. Bu makalemizde TextBox nesnesinde arama yapacağız. Formumuza 2 tane Textbox ve 1 tane buton ekliyoruz.
Serial Kod Oluşturmak Merhaba arkadaşlar. Bu makalemizde otomatik olarak 25 karakterli serial kod oluşturacağız.
GridView RowDataBound Olayları-5 Merhaba arkadaşlar. Bu makalemizde GridView daki sütundaki değere göre Buttonu aktif veya disable edeceğiz.
ListBoxta Birden Fazla Seçili Olan Verileri Almak Merhaba arkadaşlar. Bu makalemizde ListBox listesinde çoklu seçili olan itemleri Label nesnesine yazdıracağız. İlk önce projenize ListBox, Button ve Label ekleyin.
Arama Motorlarında Arama Yapmak Merhaba arkadaşlar. Bu makalemizde Textbox a yazılan stringi Google, Bing, Yahoo vb. arama motorlarında aratacağız.
Gridview daki Bilgileri Excel e Aktarma Merhaba arkadaşlar. Bu makalemizde GridView nesnesindeki verileri Excel dosyasına aktaracağız.
PictureBoxtaki Resim Siyah Beyaz Yapmak Merhaba arkadaşlar bu makalemizde PictureBox taki resimin RGB renklerini değiştirerek soldurup siyah beyaz yapacağız.
GridView Nesnesinde Dinamik Sütun Ekleme Merhaba arkadaşlar, bu makalemizde Gridview nesnesine dinamik olarak sütun ekleyeceğiz. İlk önce Gridview nesnesinin AutoGenerateColumns değerini False yapın.
Programlama E-Kitap-2 Merhaba arkadaşlar, geçenlerde “500”. makalemizi yayınlamıştık. İlk dalyayı çektik. Bunun şerefine programlama ile ilgili 2. e kitabımı yayınlıyorum. Nice 500 makalelerde buluşmak üzere.
Otomatik Kelime Tamamlama Merhaba arkadaşlar. Bu makalemizde Google arama motorundaki gibi Textbox a girilen kelimeyi otomatik olarak tamamlatacağız.
Kelime Ayırma Merhaba arkadaşlar. Aşağıdaki küçük kod parçasıyla cümlenin içerisindeki kelimeleri ayırıp alabilirsiniz.
GridView Nesnesinde Satır Rengini Değiştirme Merhaba arkadaşlar. Bu makalemizde ID noya göre satır arka plan renklerini değiştireceğiz.
Random Kod Üretmek Merhaba arkadaşlar bu makalemizde 8 karakterden oluşan random kodlar üreteceğiz.
Start ve Kill İşlemleri Merhaba arkadaşlar. Bu makalemizde Start ve Kill işlemlerini anlatacağız. Start metodunu kullanarak notepad, word, web sayfası gibi uygulamaları açabileceğiz.
Konsolda Renkli Yazdırma Merhaba arkadaşlar. Bu makalemizde konsoldaki yazıları farklı renklerde yazdıracağız. Projectinize using System.Runtime.InteropServices; class ını ekleyin.
GridView RowDataBound Olayları-4 Herkese selamlar. Arkadaşlar bu makalemizde GridView nesnesine, GridView Tasks Add Column dan HyperLinkField sütunu ekleyin. Burada Country sütunundaki ülke adına göre HyperLink ForeColour rengini farklı yapacağız.
GridView RowDataBound Olayları-3 Herkese selamlar. Arkadaşlar bu makalemizde veritabanındaki tablomuzdaki UnitsInStock ve UnitsOnOrder sütunlarındaki 0 değerlli satırları kalın ve kırmızı, 0 ve büyük olanları ise mavi olarak yazdıracağız.
GridView Sütun Rengini Değiştirme Herkese selamlar. Arkadaşlar bu makalemizde GridView vnesnemizdeki sütunun ve sütun içerisndeki yazının rengini değiştireceğiz. GridView nesnesinin AllowSorting="True" özelliğini true yapın.
GridView TemplateField Herkese selam. Arkadaşlar bu makalemizde GridView da TemplateField olayına örnek vereceğiz. Sayfanıza GridView nesnesi ekleyin.
WebMatrix ile Web Sitelerini Oluşturun, Özelleştirin ve Yayınlayın WebMatrix, Microsoft'un web sitesi geliştirme için ihtiyaç duyduğunuz her şeyi içeren yeni web geliştirme aracıdır. Açık kaynak web uygulamaları, dahili web şablonları ile başlayın ya da kodu kendiniz yazın.
Update Panel-1 Herkese Selam. Projenize ToolBox > Ajax Extensions kısmından Script Manager, Update Panel ve Update Progress ekleyin.
Visual Studio 2011 Developer Preview Training Kit Eğitim Seti Merhaba Arkadaşlar. Visual Studio 2011 Developer Preview sürümü Microsoft tarafından duyurulduktan sonra, şimdi de bu yeni versiyon için eğitim seti, kullanıcıların kullanımına açıldı.
GridView ve FormView Nesnelerini Birlikte Kullanmak Herkese selamlar. Bu makalemizde GridView FormView nesnesini birlikte kullanacağız. Sayfamıza GridView, FormView ve 2 adet SqlDataSource ekleyeceğiz.
GridView ve DetailsView Nesnelerini Birlikte Kullanmak Herkese selamlar. Bu makalemizde GridView ve DetailsView nesnesini birlikte kullanacağız. Sayfamıza GridView, DetailsView ve 2 adet SqlDataSource ekleyeceğiz.
DetailsView DropDownList Kullanımı Herkese Selam. Bu makalemizde DropDownList deki Üretimlere ait detayları DetailsView da göstereceğiz.
Visual Studio 2011 Developer Preview Visual Studio 2011 Developer Preview sürümü, Microsoft tarafından duyurularak, kullanıcıların kullanımına sunuldu. Developer Preview sürümünü http://msdn.microsoft.com/en-us/vstudio/hh127353 adresinden indirebilirsiniz.
Excel Sayfasındaki Sütundaki Verileri ListBoxta Göstermek Herkese selamlar. Bu örneğimizde Excel sayfasındaki verileri listboxta gösterimini sağlayacağız. İlk önce Formunuza Button ve OpenFileDialog ekleyin.
urlMappings Metodu Kullanımı Herkese selamlar. UrlMappings metodunu kullanarak, mevcut olan web sayfanızının adresini gizleyerek, var olmayan bir web sayfasını mevcut web sayfası yerine gösterebilirsiniz.
GridView da HyperLink Kullanımı Herkese selamlar. Bu makalemizde GridView nesnesinde Hyperlink kullanımına örnek vereceğiz. Veritabanınızdaki tablonuzu Şekil 1 deki gibi oluşturun. Hyperlinkimizi, TemplateField daki ItemTemplate kısmına ekliyoruz.
dataGridView Nesnesinde Sütun Başlıklarını Dikey Yazdırma Merhaba. DataGridView nesnemizdeki sütun başlıklarını dikey konumda yazılmasını sağlayacağız. Bunun için dataGridView1_CellPainting kısmına aşağıdaki kodları yazın.
GridView RowCommand Olayları-1 Herkese selam. Bu makalemizde GridView RowCommand a örnek vereceğiz. Projenize GridView ve Label ekleyin. GridView nesnenizin Columns kısmına < asp:CommandField SelectText="Seç" ShowSelectButton="True" / > u ekleyin.
GridView RowDataBound Olayları-2 Merhaba arkadaşlar, bu makalemizde GridView da RowDataBound olayına yazılan kodla unitsInStock sütununda bulunan 0 değerli satırların seçilerek, bu satırların backcolor rengini kırmızı, yazı rengini beyaz olacak şekilde ayarlayacağız.
dataGridView CellEndEdit ile Update İşlemi Gerçekleştirme Merhaba arkadaşlar, bu makalemizde dataGridView nesnesinde Update işlemini gerçekleştireceğiz. ToolBox tan formunuza BindingSource ekleyin.
GridView RowDataBound Metoduyla Sütun Toplama Merhaba arkadaşlar, bu makalemizde GridView da RowDataBound kısmına yazacağımız kod ile sütun toplama işlemini gerçekleştireceğiz.
GridView da RowDataBound Olayları Merhaba arkadaşlar, bu makalemizde GridView da RowDataBound olayına yazacağız kodlarla GridView daki sütunlarda bulunan verileri italik, bold ve renkli olarak yazdıracağız.
GridView Sütun Toplama Merhaba arkadaşlar, GridView nesnesindeki Unit Price sütunundaki değerleri toplayacağız. Total değerin alt kısımda gözükmesini sağlamak için ShowFooter özelliğini True yapıyoruz.
Stored Prosedure Kullanılarak Update İşlemini Gerçekleştirme Merhaba arkadaşlar, bu makalemizde Stored Procedure kullanarak Employees tablosundaki Ad, Soyada göre personelin Şehir, Ülke sütunundaki bilgilerini güncelleştireceğiz.
ListBox ta Tekrarlanan Satır Sayısını Öğrenme Merhaba arkadaşlar, bu makalemizde Listboxta tekrarlanan satır sayısını öğreneceğiz.
ListBox ta Tekrarlanan Satırların Silinmesi Merhaba arkadaşlar, bu makalemizde ListBox nesnesinde tekrarlanan satırların görünmemesini sağlayacağız.
Mail Kontrolü Merhaba arkadaşlar, bu makalemizde sql veritabanımızdaki mail adreslerini, Ad ve maile göre kontrol edeceğiz. İlk önce Şekil 1 deki gibi veritabanı tablonuzu oluşturun.
Excel,Word,Pdf,Image Dosyalarını Veritabanına Kaydetme Merhaba arkadaşlar,bu makalemizde Excel, Word, Pdf, Image dosyalarını Sql veritabanımıza binary formatında kaydedeceğiz.
Veritabanındaki Tabloları Birleştirip DataGridView da Göstermek Bu makalemizde veritabanımızda bulunan iki farklı tablodaki bilgileri birleştirip, dataGridView da göstereceğiz.
Sql Veritanına Image Kaydetmek Merhaba arkadaşlar, bu makalemizde sql veritabanımıza resim kaydedeceğiz. Formunuza 1 adet PictureBox, 2 adet Button ekleyin. Açıklamalar kod kısmında verilmiştir.
Rastgele İsim Seçmek Merhaba arkadaşlar, bu makalemizde dizide tanımladığımız isimlerden rastgele bir isim seçimine örnek vereceğiz.
ListView QueryStringField Alanını Kullanarak Sayfalama Merhaba arkadaşlar, bu makalemizde ListView nesnemizi web adresinde belirtiğimiz sayfa no ya göre sayfalama yapacağız.
DetailsView da Sayfalama Merhaba arkadaşlar, bu makalemizde DetailsView nesnesinde DropDownList i kullanarak sayfalama işlemi yapacağız. DetailsView ın AllowPaging özelliğini True yapın.
Dosya İsimlerini Sıralı Şekilde Oluşturma Merhaba arkadaşlar, bu makalemizde deneme klasöründe oluşturduğumuz dosyalara, ekleyeceğimiz yeni dosya isimleri ve numaraları sıralı bir şekilde önceki dosyaları takip edecek şekilde dosya ismi vereceğiz
DetailsView ile Birlikte DropDownList Nesnesi Kullanımı Merhaba arkadaşlar, bu makalemizde dropdownlist de seçili items e ait detay bilgilerini, DetailsView nesnemizde göstereceğiz.
GridView de HyperLink Kullanımı Merhaba arkadaşlar, ilk önce Gridview nesnemize HyperLinkField alanı ekleyeceğiz.
Excel de Chart Oluşturma Merhaba arkadaşlar, Bu makalemizde Excel sayfasında Chart gösterimini sağlayacağız.İlk önce Solution Explorer a sağ tıklayıp, Add Reference kısmından Excel componetini projenize ekleyin.
CSharp Örnek Kodlar Merhaba arkadaşlar, Microsoft firmasının MSDN de yayınladığı C# diline ait örnek kodları aşağıdaki linkten indirebilirsiniz...
DataGridView a ComboBox Sütun Ekleme Merhaba arkadaşlar, bu makalemizde DataGridView nesnemizde ComboBox alanın nasıl eklendiğini göreceğiz.
DataGridView Kontrolü Merhaba arkadaşlar, bu makalemizde dataGridView nesnesinin en çok kullanılan birkaç özelliğini göreceğiz. Formunuza 1 adet dataGridView ve Button ekleyin.
Visual Studio 2010 SP1 Beta Merhaba Arkadaşlar, Visual Studio 2010 SP1 Beta service pack paketini http://www.microsoft.com/downloads/en/... adresinden indirebilirsiniz. Visual Studio 2010 Service Pack1 Beta ile gelen iyileştirmelerin listesine aşağıdaki linkten ulaşabilirsiniz.
DataGridView da Seçili Hücre Bilgisini Almak Merhaba arkadaşlar, bu makalemizde DataGridView nesnemizde seçili konumdaki hücrenin bilgisini alacağız. İlk önce;
DataGridView Nesnesine Satır Ekleme Merhaba arkadaşlar, bu makalemizde DataGridView nesnemize satır eklemeyi anlatacağız. Detaylı açıklamalar kod kısmında verilmiştir.
FormView Paging İşlemi - 2 Merhaba arkadaşlar, bu makalemizde FormView nesnesini ve sayfalama işlemini değişik bir metod ile inceleyeceğiz.
FormView Paging İşlemi - 1 Merhaba arkadaşlar, bu makalemizde FormView nesnesini ve sayfalama işlemini inceleyeceğiz. İlk önce sayfanıza FormView ve SqlDataSource nesneleri ekleyin.
DataList Update Delete İşlemleri Merhaba arkadaşlar, bu makalemizde DataList nesnesinde Güncelleştirme, Silme işlemlerinin nasıl yapıldığını göreceğiz. İlk önce sayfanıza DataList ve SqlDataSource nesneleri ekleyin.
Adrotator ile Web Reklam Uygulaması Merhaba arkadaşlar, bu makalede AdRotator ile Web reklam uygulamasını göreceğiz. İlk önce adrotator.xml dosyasını aşağıdaki gibi oluşturun.
Dosya Kopyalama,Taşıma ve Silme İşlemleri Merhaba arkadaşlar, bu makalede Directory, dosya kopyalama, taşıma ve silme işlemlerini göreceğiz. İlk önce class kısmına using System.IO; ekleyin.
GridView da Seçili Satırın Rengini Değiştirmek Merhaba arkadaşlar, GridView nesnemizin < Columns >< / Columns > arasına tanımladığımız Seç butonuna tıklayarak, seçtiğimiz satırın arka plan rengini, border rengini ve yazı rengini değiştireceğiz.
GridView a Sütun Ekleme Merhaba arkadaşlar, GridView a 2 değişik metodla sütun ekleyeceğiz. Bu metodlardan 1. si DataTable metodunu kullanalar sutun ekleme işlemi.
Veritabanı Alanlarını Birleştirip ComboBox ta Göstermek Merhaba arkadaşlar, bu makalemizde veritabanında bulunan alanları birleştirerek, ComboBox nesnesinde gösterimini sağlayacağız.
Dosya Adı ve Sayısını Öğrenmek Merhaba arkadaşlar, bu makalemizde C sürücüsünde bulunan Text dosyalarının adını ve sayısını öğreneceğiz.
Resim Üzerine Yazı Yazmak Bu makalemizde FileUpload ile resimler klasörüne yükleyeceğimiz resimin üzerine dikey olarak yazı yazacağız...
ListView Nesnesinde VirtualMode Kullanımı Veritabanımızda 100 binlerce veya daha fazla kayıtlarımız olduğunda; kayıtlarımızın gösterimi ve bu kayıtlar arasında dolaşım zorlaşacaktır.
ComboBox Nesnesinde Otomatik Tamamlama İlk önce Şekil 1 deki gibi comboBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend; olarak seçin. Daha sonra ComboBox nesnesinin AutoCompleteSource i AutoCompleteSource.CustomSource; seçiyoruz.
Chart Kullanımı Chart kontrolü kullanılarak istediğimiz verilerin grafiksel gösterimini sağlayabiliriz. DataList, GridView vb. veri kontrollerinde olduğu gibi DataSource nesneleriyle çalışır.
Word Belgesinde Arama Yapmak Bu makalemizde Word belgesinde arama yapacağız. Bu işlemi Selection nesnesinin Find metodu ile gerçekleştireceğiz.
Programlama E-Kitap Merhaba arkadaşlar. Blog ve Web Sitemde yayınladığım C#,VisualBasic.NET, Asp.NET,Ado.NET,Sql,Ajax makalelerin bir kısmını e-kitap haline getirdim. Bu kitap, son 1 yılda yayınlamış olduğum makaleleri içermektedir.
OleDbDataAdapter Sınıfı Merhaba arkadaşlar. Bu makalemizde OleDbDataAdapter sınıfını inceleyeceğiz. Genel olarak DataAdapter sınıfları, veri kaynakları ile, sistem belleği üzerinde yer alan bağlantısız sistem katmanları veri alışverişinin kolay, güçlü ve verimli bir şekilde sağlanmasından sorumludur.
OleDbCommand Sınıfı Merhaba arkadaşlar. Bu makalemizde Command sınıflarından OleDbCommand sınıfına örnek olacak bir uygulama göreceğiz. Temel olarak SqlCommand sınıfı ile aynıdır.
SqlCommand Sınıfı Merhaba arkadaşlar. Bu makalemizde Command sınıfını inceleyeceğiz. Veritabanı uygulamalarımızda, veritabanı ile ilgili işlemlerimizde bir takım sorgu komutlarına ihtiyacımız bulunmaktadır.
SqlDataReader-2 Merhaba arkadaşlar. Bir önceki makalede SqlDataReader sınıfına kısaca değinerek, bir de uygulama yapmıştık. Bu uygulamımızda da SqlCommand sınıfına ait ExecuteReader ı ve almış olduğu CommandBehavior.CloseConnection a örnek vereceğiz
SqlDataReader-1 Merhaba arkadaşlar. Bu makalemizde SqlDataReader ile ilgili bir uygulama yapacağız. Uygulamamıza geçmeden önce SqlDataReader ile ilgili kısa bilgi verelim.
GridView HyperLink Kullanımı Merhaba arkadaşlar. Bir Asp.Net makalesinde daha birlikteyiz. Bu makalemizde GridView nesnesinde HyperLink kullanımını göreceğiz.
GridView da Sıralama İşlemi Merhaba arkadaşlar. Bir Asp.Net makalesinde daha birlikteyiz. Bu makalemizde GridView nesnesinde seçili sutuna göre sıralama işlemini gerçekleştireceğiz.Default.aspx sayfasını Şekil 1 deki gibi oluşturun.
DataTable da Veri Düzenlemek Merhaba arkadaşlar. Bu makalede projemizde tanımlayacağımız DataTable de, satır silme ve satır düzenleme işlemlerini göreceğiz. Satır düzenlerken BeginEdit(), EndEdit() özelliklerini kullanacağız.
StreamReader Sınıfı Merhaba arkadaşlar. Bu makalemizde Text dosyaları nasıl okuyacağımızı inceleyeceğiz. StreamReader, text dosyaların okunmasını, dosyalara yazılmasını sağlar. Bu uygulamamızda Text dosyasının Listbox ta gösterimini sağlayacağız.
Dizi Uygulaması Merhaba arkadaşlar. Bu makalemizde dizilerin kullanımıyla ilgili bir örnek yapacağız. Gerekli açıklamalar kod kısmında yapılmıştır...
Class Yapılar Merhaba arkadaşlar. Bu makalemizde Class yapı uygulamasına bakacağız. Bir önceki makalede Struct yapıyı incelemiştik.Classlardan (Sınıf) nesneler oluşturuldukları zaman bu nesnelerin değerleri Heap bölgesinde tutulur.
Structure Yapılar Merhaba arkadaşlar. Bu makalemizde Struct yapılara bir örnek vereceğiz.Struct veri tipi, değer tipi olduğu için, tanımlandıkları anda bellekte Stack bölümünde oluşturulur.
DataView İle Filtreleme-Windows Merhaba arkadaşlar. Bu makalemizde DataView daki RowFilter metodunu kullanarak filtreleme işlemini yapacağız. RowFilter da belirtiğimiz filtreleme kriterine göre verilerin gösterimini DataGridView nesnesinde sağlıyacağız.
CheckedListBox ile Veritabanı Bağlantısı Merhaba arkadaşlar. Yeni bir makalede yine birlikteyiz. Veritabanımızdaki verileri CheckedListBox nesnesinde göstereceğiz. Daha sonra CheckedListBox ta seçtiğimiz satırları ListBox a aktaracağız.
SiteMap Merhaba arkadaşlar. Bu makalemizde SiteMap konusunu ele alacağız. SiteMap ile Web uygulamalarında hangi sayfada olduğumuz gibi bilgileri verir. Site haritası hazırlanmasında kullanılır.
DataTable Find Metodu Merhaba arkadaşlar. Find metodu kullanarak DataTable içerisinde arama yapacağız. İlk önce arama yapacağınız sütunu primary key (birincil anahtar) tanımlayın.
Adrotator Sql Veritabanı Uygulaması Merhaba arkadaşlar. Bu makalemizde Adrotator kontrolünün kullanımı ile ilgili Sql veritabanlı bir örnek yapacağız. Şekil 1 de gösterildiği Sql veritabanındaki tablonuzu oluşturun. Default.aspx sayfanıza Adrotator kontrolünü ekleyin.
Adrotator Xml Uygulaması Merhaba arkadaşlar. AdRotator, uygulamalarımızda dönüşümlü olarak resim dosyalarının görüntülenmesini sağlayan kontroldür. Genellikle Asp.NET reklam uygulamalarında kullanılır.
Tabloya Sütun Ekleme Formumuzda oluşturacağımız Tabloya ilk önce sütun ekleyeceğiz. Daha sonra Tablomuza satırlar ekleyip, bu satırlara bilgi girişi yapacağız. Formunuza 1 adet DataGridView nesnesi ekleyin.
Dosya Bilgilerinin Alınması Merhaba arkadaşlar. Bu makalemizde WalPaper adlı dosyadaki jpeg resimlere ait bilgileri alacağız. Oluşturacağınız ConsoleApplication dosyasına aşağıdaki kodları yazın.
Access Veritabanına Kayıt ve Kayıt Girişi Kontrolü Merhaba arkadaşlar. Bu makalemizde Access veritabanına kayıt girişi yaparken girilen verilerin veritabanımızda kayıtlı olup olmadığını kontrolünü yapacağız.
Session Okuma ve Yazma İşlemleri Merhaba arkadaşlar. Yeni bir makalede yine birlikteyiz. Bu makalemizde Session konusunu inceleyeceğiz. Session a ilk önce yazıp, yine daha sonra session nesnesinden okuyacağız.
ReqularExpressionValidator ile Kontrol Arkadaşlar bu örneğimizde ReqularExpressionValidator nesnesini kullanarak mail kontrolü yaptıracağız. Web sayfanıza 1 adet ReqularExpressionValidator,TextBox ve Button ekleyin.
Sql Veritabanındaki Resimlere PictureBox ta Bakmak ve Dosya Olarak Kaydetmek Merhaba arkadaşlar. Önceki makalemizde resim dosyalarını Sql veritabanına kaydetmeyi görmüştük. Şimdi de Sql veritabanındaki Binary resim dosyalarını okuyup, dosya olarak kaydetmeyi göreceğiz.
ErrorProvider Nesnesi ile Tarih Kontrolü Merhaba arkadaşlar. ErrorProvider nesnesini kullanarak TextBox a girilen tarihin doğru olarak girilip girilmediğini kontrol edeceğiz.
Sql Veritabanına Resim Ekleme Merhaba arkadaşlar. Bu makalemizde oluşturmuş olduğumuz Sql veritabanına resim eklemeyi göreceğiz. Formumuza 1 adet pictureBox, textBox, label, openFileDialog ve 2 adet Button ekleyin.
Veritabanı Tablolarının TabControl da Gösterimi Nortwind veritabanındaki tabloları, TabControl de çalışma anında oluşturacağımız TapPage lerde, yine çalışma anında oluşturacağımız DataGridView nesnelerinde gösterimini sağlayacağız.
Grafik Çizim Örnekler Formunuzun Paint yordamına aşağıdaki kodları yazacağız. Bu örnekte, çizgi çizmeyi, elips oluşturmayı, dikdörtgen oluşturup içini boyamayı vb. örnekleri göreceğiz.
Enumerators Bugünkü makalemizde Enumerator (Numarandırıcılar) i inceleyeceğiz. Numaralandırıcılar sınırlı sayıda değer içeren değişken oluşturmamıza olanak sağlar.
Çalışma Anında Form, Button, Label Oluşturmak İlk önce Form1 inize Button nesnesi ekleyin. Button1_Click() olayına aşağıdaki kodları yazacağız.Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Hoşçakalın. Bahadır ŞAHİN
Sql Kayıt İşlemleri Merhaba arkadaşlar. Bu makalemizde Sql veritabanına kayıt işlemini gerçekleştireceğiz. İlk önce giris.mdf sql veritabanını oluşturun. Daha sonra Şekil 2 deki gibi kayitlar tablosunun parametrelerini oluşturun.
Cookie Oluşturma-2 Oluşturduğumuz Ad isimli Cookie ye isim değeri atıyoruz. Cookie nin bitiş zamanını 20 dakika sonraya ayarlıyoruz.Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Hoşçakalın. Bahadır ŞAHİN
Günün Saatine Göre Mesaj Vermek Oluşturduğumuz Console da günün değişik saatlerine göre mesaj verdireceğiz. Imports System i konsol a eklemeyi unutmayın. Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Hoşçakalın. Bahadır ŞAHİN
Word Belgesi Oluşturmak Bu makalemizde Word belgesi oluşturmayı göreceğiz. İlk önce Microsoft Word 12.0 Object Library referansını projemize eklememiz gerekiyor. Bunun için; Solution Explorer penceresi üzerinde
RichTextBox Zoomlama RichTextBox nesnesinde zoom in, zoom out nasıl oluyor? ile ilgili bir örneğe bakacağız. Formunuza 3 adet Button ekleyin. Yine Formunuzun Classına using System.Diagnostics; i ekleyin.
Ziyaretçi İstatistiklerini Almak Web sayfamızı ziyaret eden ziyaretçilerin hangi sayfalara girdikleri, ip numaralarını, giriş tarihlerini, hangi tarayıcı kullandıklarını kaydedeceğiz. Bunun için Global.asax ta Application_BeginRequest(object sender, EventArgs e) e aşağıdaki kodları yazacağız.
Process Uygulaması Merhaba arkadaşlar, Process nesnesi ile uygulama açmayı göreceğiz. Bu örnekte NotePad i açıp, 5 saniye sonra otomatik olarak uygulamanın kapanmasını göreceğiz.
ListView İle Veritabanı Bağlantısı-2 Merhaba arkadaşlar, bu makalemizde Access veritabanındaki bilgileri ListView nesnemizde göstereceğiz. (Şekil 1)
Excel Dosyası Oluşturma Bu örneğimizde Excel dosyası oluşturacağız. Formunuza 1 adet Button ekleyin ve aşağıdaki kodları yazın...
Dosya Uzantısı Arama Merhaba arkadaşlar, bu örnekte TextBox a girilen dosya uzantılarını arayıp, ListBox ta gösterimini sağlayacağız. Şekil 1 de görüldüğü gibi C dizininde arama yaptık.
Access Veritabanından Excel Dosyaya Aktarım Merhaba arkadaşlar, önceki makalelerde Excel sayfasının Access veritabanına aktarımını görmüştük. Bu makalemizde ise Access veritabanımızdaki dataları, Excel sayfasına nasıl ekleyebileceğimiz konusunu göreceğiz.
Excel Sayfasını Access Veritabanına Aktarmak Merhaba arkadaşlar, bugün Excel sayfasındaki verileri, Access veritabanımıza nasıl ekleyebileceğimiz konusunu göreceğiz. İlk önce Solution Explorer a sağ tıkla. Add Reference tıkla. Daha sonra COM kısmından Microsoft Excel 12.0 Object Library dosyasını seçip, OK e tıkla. Böylece Excel Library dosyasını projemize eklemiş olduk.
İnternet Açılış Sayfasını Değiştirme İnternet Explorer açılış sayfasını TextBox a gireceğimiz adres ile değiştireceğiz. Şekil 1.Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Hoşçakalın. Bahadır ŞAHİN
Veritabanındaki İki Tabloyu Birleştirme Bu örnekte Access veritabanındaki iki farklı tablodaki verileri birleştirip, DataGridView nesnemizde göstereceğiz. Personel veritabanındaki arge ve satis tablolarından verilerimizi çekiyoruz. Sql sorgumuz aşağıdaki gibidir. id nolara göre sıralıyoruz.
Microsoft Visual Studio 2010 ile Gelen Yenilikler Visual Studio 2010 Beta 2 ve Net Framework Beta 2 sürümlerini 21 Ekimden itibaren sorunsuz olarak herkes tarafından indirilmeye başlandı. Başlıca gelen yenilikler : Yeni Ürün Lisanslama Sistemi Visual Studio Express
ListView daki Verileri Excel e Aktarmak Arkadaşlar bu makalemizde ListView nesnesindeki verileri Excel dosyasına kaydedeceğiz. İlk önce Solution Explorer a sağ tıkla. Add Reference tıkla.
Password Eşleştirme Arkadaşlar bu makalemizde şifre eşleştirmesi yapacağız. TextBox1 ve TextBox2 e girilen şifreleri eşleştireceğiz.Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Hoşçakalın. Bahadır ŞAHİN
Pdf Dosyasının Formunuzda Gösterilmesi Merhaba arkadaşlar bir makalede daha birlikteyiz. Bu makalemizde Formumuzda Pdf dosyası açacağız. Toolbox tayken sağ tıkla. Choose Items i seç.
Windows MediaPlayer Şarkı Bilgilerini Göstermek Windows Media Player nesnesinde çalan parçaya ait bilgilerin gösterimini sağlayacağız. İlk önce Formunuza 1 adet MenuStrip, OpenFileDialog, Timer ve Media Player ekleyin. Media Player i formunuza ekleyebilmek için;
Xml deki Bilgileri Repeater Nesnesinde Göstermek Katolog isimli Xml dosyasındaki bilgileri Repeater nesnesinde göstereceğiz. < HeaderTemplate >< / HeaderTemplate > de Repeater daki sütunların başlıklarını tanımlayacağız. < ItemTemplate >< / ItemTemplate > ve < AlternatingItemTemplate > < / AlternatingItemTemplate > de Xml dosyasında bağlanacağımız alanları tanımlayacağız.
Bind Data Uygulaması Bind Data metoduyla veritabanımızda kayıtlı veriler arasında dolaşabileceğiz. Formunuza 4 adet TextBox, Button ve Label ekleyin.(Şekil 1) Bu uygulamada kayıtlar arasında ileriye, geriye, ilk kayıta veya son kayıta gidebileceğiz.
Kayıt Girişi ve Kullanıcı Kontrol Bu makalemizde, Sql komutu olan Insert Into metodu ile veritabanına kayıt gireceğiz. Ayrıca veritabanındaki kayıtları Ad ve Soyad a göre kontrol edip mükerrer kayıt işlemi olmasını engelleyeceğiz. Veritabanındaki PersonelListesi tablomuz Şekil 1 deki gibidir.
Repeater Kullanımı Repeater, Database deki verilerin gösteriminde kullanılan en yaygın nesnelerden biridir. Bu nesnede uygulamamızda da görebileceğiniz gibi; < HeaderTemplate > < / HeaderTemplate > kısmına Repeater in sütun başlıklarını oluştururuz.
Formu Sabitleme Formumuzun taşınmasını istemiyorsak, aşağıdaki hazır kod bayağı işimize yarayacak. İlk önce ; Imports System.Runtime.InteropServices formunuza ekleyin.
Text Dosyaya Kayıt ve Text Dosyadan Okuma Formumuzdaki TextBoxlara girilen bilgileri test2.txt text dosyasına kaydeceğiz. Daha sonra test2 text teki kayıtları ListBox nesnesinde gösterimini sağlıyacağız.
Birden Fazla TextBox a Aynı Anda Çoklu Yazdırmak Merhaba Arkadaşlar bu makalemizde dinamik olarak oluşturduğumuz 10 adet TextBox a aynı anda yazdıracağız.
ListView da Seçili Satırı TextBoxlarda Göstermek Merhaba Arkadaşlar önceki makalede ListView nesnesinde Ürün adına göre arama yapmıştık. Şimdi de ListView nesnesinde seçmiş olduğumuz satırdaki verileri TextBox ta göstereceğiz. Formunuzu Şekil 1 deki gibi oluşturun.
ListView da Arama Yapmak Merhaba Arkadaşlar, bu makalemizde TextBox a girmiş olduğumuz stringi ListView nesnesinde aratacağız. Bu örnekte Ürün Adına göre arama yapacağız. Formunuzu Şekil 1 deki gibi oluşturun.
Rezervasyon Kayıt, Referans ID Uygulaması Merhaba Arkadaşlar, önceki makalelerde 8 karakterli Referans ID nin nasıl atandığını, küçük bir uygulama ile göstermiştim. Şimdi de rezervasyon kayıt sisteminde kullanım şeklini göstereceğim. 2 sayfamız var bunlardan birincisi bilgi girişi yaptığımız formun bulunduğu sayfa, 2. Sayfa da kayıt sayfası.
PictureBox taki Resmi Kaydetmek OpenFileDialog nesnesini kullanarak açtığımız resimleri PictureBox ta gösterip, resimler klasörüne kaydedeceğiz.(Şekil 1)
Kayıt Arama Merhaba Arkadaşlar 1 haftalık tatilden sonra tekrar sizlerle birlikteyiz. Bu makalemizde veritabanımızda kayıtlar arasında id nosu na veya Ad a göre arama yapacağız. Formumuza 7 adet TextBox,2 adet RadioButton , GroupBox ve 1 adet Button ekleyin.
GridView da Insert,Update,Delete İşlemleri Merhaba Arkadaşlar, bu makalemizde GridView nesnemizde Insert, Update, Delete işlemlerinin nasıl yapıldığını göreceğiz. Daha önceki makalelerimizde bu konuya değinmiştik. Arşivdeki makalelerimizden bakabilirsiniz. Şimdi farklı bir metod ile işlemlerimizi yaptıracağız.
Ajax UpdateProgress Uygulaması Merhaba Arkadaşlar. Bu makalemizde Ajax ile birlikte gelen UpdateProgress nesnesini anlatacağız. Sayfamızda herhangi bir işlem yaptığımız zaman, işlemimizden önce ilk olarak UpdateProgress içine yerleştirdiğimiz nesneler çalışacaktır. Genelde sitelerde sıkça karşılaştığımız karşılama veya işlem yaparken “yükleniyor” gibi uyarı mesajları UpdateProgress ile verdirilmektedir.
DataGridView Arası Veri Gönderimi-2 Önceki makalelerimizde DataGridView1 de seçili olan satırları DataGridView2 nesnesinde gösterimini sağlamıştık. Bu makalemizde DataGridView1 nesnesinin 1.sütunundaki kayıtlara göre TextBox da arama yaptırarak, bulunan kayıtları DataGridView2 nesnesinde göstereceğiz. Formunuza 2 adet DataGridView1, 1 adet TextBox ve Button ekleyin. (Şekil 1)
DataGridView da Mouse ile Satır Seçme DataGridView nesnesindeki satırları Mouse ın sağ tuşuna tıklayarak seçeceğiz. Şekil 1. Kodlarımızı DataGridView1_CellMouseDown a yazacağız. Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek üzere. Hoşçakalın. Bahadır ŞAHİN
FormatPercent, FormatCurrency, FormatNumber Bu örneğimizde FormatPercent, FormatCurrency ve FormatNumber metodlarını inceleyeceğiz. FormatPercent ile girilen sayı % li, FormatCurrency ile parasal , FormatNumber ile sayının formatlı bir şekilde gösterimi sağlayacağız. (Şekil 1)
DataGridView da Mouse ile Satır Seçme DataGridView nesnesindeki satırları Mouse ın sağ tuşuna tıklayarak seçeceğiz. Şekil 1. Kodlarımızı DataGridView1_CellMouseDown a yazacağız.
Msdn Training Asp.Net Dökümanları Microsoft firmasının yayınladığı msdn trainning asp.net dökümanları. Pdf formatında 8 adet Asp.Net ile ilgili döküman. Toplam 4.71 MB. boyutunda, rar şifresi:bahadirsahin Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Hoşçakalın. Bahadır ŞAHİN
Comboboxta Veritabanındaki Verilerin Gösterimi Combobox nesnesinde Nortwind veritabanında bulunan Customers tablosundaki CustomerID sütunundaki dataların gösterimini sağlayacağız. Imports System.Data Imports System.Data.OleDb Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
TreeView daki Node ları Text Dosyaya Yazdırma TreeView nesnesinde oluşturduğumuz Node ları, child nodes ları metin dosyasına kaydedeceğiz. Formunuza 1adet TreeView ve Button ekleyin. Imports System.IO Public Class Form1 Dim baslik As New Windows.Forms.TreeNode("Bahadır ŞAHİN", 0, 0)
DataGridView da Seçili CheckBox Satırlarının Rengini Değiştirme DataGridView nesnesinde seçili CheckBox ların BackColor rengini OrangeRed yapacağız. Bunun için DataGridView1_RowPrePaint e aşağıdaki kodları yazacağız. Şekil 1 i inceleyin. Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Hoşçakalın. Bahadır ŞAHİN
ArrayList ile Sıralı Gösterim ArrayList metodunu kullanarak rastgele girilen stringleri sıralı gösterimini sağlayabiliriz. Formunuza 1 adet ListBox ekleyin. Şekil 1 i inceleyin. Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Hoşçakalın. Bahadır ŞAHİN
DataList Sayfalama-2 Bu örneğimizde Datalist nesnemizi nümerik olarak indekslemeyi göreceğiz. Default.aspx sayfanıza 1 adet DataList, TextBox ve 5 adet Label ekleyin. Şekil 1 deki gibi oluşturun. TextBox ın ismini txtStart yapın. TextBox ta sayfanın başlangıç durumunu tutacağız. Northwind veritabanındaki Customers tablosundaki verileri göstereceğiz.
Html Kodu Almak Bu örneğimizle istediğimiz sitenin html kodunu öğreneceğiz. Şekil 1 deki gibi formunuzu oluşturun. Formunuza 1 adet WebBrowser, Combobox, 2 adet Button ekleyin. Form1.cs using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms;
VisualStudio.NET Form Özellikleri Windows tabanlı uygulamaların DOS tabanlı uygulamalardan en büyük farkı formlardır. karşınızda duran siyah renkli bir ekranda beyaz yazılar üzerinde göz bozarak saatlerce çalışmak yerine Windows tabanlı programlamanın keyfine vardığımızı yaşatan en büyük nesnemiz Formlardır. Forma ait özellikler ve bu özelliklerin açıklamaları aşağıdaki gibidir ; Name : Bu özellik formumuzun adını belirtir. programın içindeki her nesnenin birbirinden
Ekran Çözünürlüğünü Bulmak Bu makalede ekran çözünürlüğünü ve işlemci bit sayısını bulacağız. Aşağıdaki kodları Formunuza yazın. Form1.cs using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 {
TextBox ta Satır Numarasını Bulmak Bu makalemizde Textbox nesnesinde imlecin bulunduğu satırın indeksini alacağız. Bununiçin MouseClick yordamına aşağıdaki kodları yazacağız. Şekil 1 i inceleyin. Not: Satır numarası 0 dan başlayarak gidiyor...
DataList Nesnesinde Sayfalama-1 Bu makalemizde DataList nesnemizde sayfalama nasıl yapılır? konusunu göreceğiz. Bu gösterimimizde Buttonlardan faydalanacağız. Sonraki makalelerde DataList nesnesinde nümerik indeksleme metodunu göstereceğim. Şimdi sayfanızı Şekil 1 deki gibi oluşturun. Bu örnekte Northwind veritabanındaki Customers tablosuna bağlanacağız. DataList nesnesinin ItemTemplate kısmına; Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşünceye kadar hoşçakalın. Bahadır ŞAHİN
C# Sıkça Sorulan Sorular C# Sıkça Sorulan Sorular C# ile ilgili sıkça soruların bulunduğu, 24 sayfalık, Türkçe Pdf dökümanı. Soru cevap şeklinde. Faydalı olması dileğiyle. Bir sonraki makalede buluşmak dileğiyle... Download Adresi: ........................................
DataList Nesnesinde Detay Gösterimi Bu makalede DataList nesnesinde detay gösterimini göreceğiz. İlk önce Northwind veritabanıdaki Suppliers tablosuna bağlantı yapıyoruz.
Formun Kapat Tuşunu Etkisiz Hale Getirmek Forma ait üst menüdeki kapat tuşunu etkisiz hale getireceğiz. Bunun için GetSystemMenu, EnableMenuItem library dosyalarından yararlanacağız. Aşağıdaki Şekil 1 i inceleyin. Public Class Form1 Public Class CloseButton Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Integer, ByVal revert As Integer) As Integer Private Declare Function EnableMenuItem Lib "user32" (ByVal menu As Integer, ByVal ideEnableItem As Integer, ByVal enable As Integer) As Integer Private Const SC_CLOSE As Integer = &HF060 Private Const MF_BYCOMMAND As Integer = &H0 Private Const MF_GRAYED As Integer = &H1 Private Const MF_ENABLED As Integer = &H0 Public Shared Sub Disable(ByVal form As System.Windows.Forms.Form)
Multiple FileUpload Bu makalemizde 5 adet dosyayı aynı anda upload edeceğiz. Default.aspx sayfanızı Şekil 1 deki gibi oluşturun. image/jpeg formatındaki image ları upload klasörüne yükleyeceğiz.
DataGridView ler Arasında Veri Gönderimi Bu makalemizde DataGridView1 de seçili olan satırları Cells metodunu kullanarak DataGridView nesnesine taşıyacağız. Ayrıca DataGridView1 de seçtiğimiz satırların Backcolor rengini değiştireceğiz.
DataBindings Metodu Sql order by metodu ile combobox taki sorgu kriterlerine göre Access veritabanındaki verileri textbox larda DataBindings metodunu kullanarak gösterimini sağlayacağız.
Visual Studio 2010 Microsoft'un, yeni nesil yazılım geliştirme platformu Visual Studio 2010 ve .Net Framework 4.0 hakkında ilk bilgiler, resmi ağızdan yayınlanırken, bu ürünlerin ne zaman sunulacağı hakkında net tarihler verilmedi. Ağırlıklı olarak Visual Studio 2010 üzerinde çalışan Microsoft, yeni modelleme araçlarının yanı sıra çok fazla teknik bilgiye sahip olmayan yazılım geliştiricilerin de kolayca işlem yapabileceği yeni uygulamaları bu platformda paylaşacak. VisualStudio 2010 ve NetFrameWork 4.0 CTP Download Adresi http://www.microsoft.com/downloads/details.aspx?FamilyId=922B4655-93D0-4476-BDA4-94CF5F8D4814&displaylang=en Visual Studio ile İlgili Bilgi Alacağınız Microsof Web Adresi: http://www.microsoft.com/visualstudio/en-us/products/2010/default.mspx Visual Studio 2010 Kurulumunun Görsel Olarak Anlatıldığı Adres: http://blogs.msdn.com/granth/archive/2008/11/03/converting-vs2010-ctp-to-hyper-v.aspx Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Bahadır ŞAHİN
Forma Grafik Metodu ile Yazı Yazmak Bu örnekte formumuzun üzerine yazı yazacağız. Bunun için DrawString metodundan faydalanacağız. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); Form form2 = new Form(); form2.Text = "String Yazım"; form2.BackColor = Color.White; form2.Paint += new PaintEventHandler(PaintHandler); Application.Run(form2); } static void PaintHandler(object objSender, PaintEventArgs pea) { Form form2 = (Form)objSender; Graphics graphics = pea.Graphics; graphics.DrawString("Merhaba Dünya!", form2.Font, Brushes.Black, 0, 0); } } } Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşmek dileğiyle. Bahadır ŞAHİN
C sürücüsündeki txt Uzantılı Dosyaları Listelemek Proje için Console Application formu oluşturun. Imports System.IO ı formunuza ekleyin. C sürücüsünde bulunan txt dosyaları gösterimini aşağıdaki Şekil 1 deki gibi sağlıyacağız. Imports System.IO Module getfiles Sub Main() Dim dInfo As DirectoryInfo dInfo = New DirectoryInfo("C:\\") Dim dbilgi() As FileInfo Try dbilgi = dInfo.GetFiles("*.txt") For Each bilgi In dbilgi Console.WriteLine(bilgi.FullName) Next Catch ex As Exception Console.WriteLine(ex.Message) End Try Console.ReadLine() End Sub End Module Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşünceye kadar. Hoşçakalın. Bahadır ŞAHİN
TextBox a Sadece Rakam Girmek Çalışma anında oluşturmuş olduğumuz textbox a sadece sayı girişi yapacağız. Bunun için onkeypress özelliğine aşağıdaki kodları yazıyoruz. Şekil 1 i inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { private sayisaltxt textBox1; public Form1() { InitializeComponent(); this.textBox1 = new sayisaltxt(); this.SuspendLayout(); this.textBox1.Location = new System.Drawing.Point(20, 20); this.Controls.Add(this.textBox1); } public class sayisaltxt : TextBox { protected override void OnKeyPress(KeyPressEventArgs e) { if (!char.IsControl(e.KeyChar) && !char.IsDigit(e.KeyChar)) { e.Handled = true; MessageBox.Show("Sadece rakam girebilirsiniz...", "Uyarı"); } base.OnKeyPress(e); } } } } Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Linq OrderBy Kullanımı Bu örnekte linq metodu ile orderby kullanımını göreceğiz. Sıralı olmayan bir şekilde girilen harf dizisini,listbox ta sıralıyacağız. Aşağıdaki şekli inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { string[] liste = { "h", "d", "r", "b" }; var harf = from i in liste orderby i select i; foreach (var i in harf) { listBox1.Items.Add(i); } } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Random Sayı Atama Bu örnekte rastgele sayı oluşturmayı göreceğiz. 1. olarak rastgele oluşturduğumuz ilk 10 rakam için sabit random değerini atadık. Bunuda ListBox nesnesinde Item olarak gösterdik. 2. olarak birbirinden farklı random sayıları Listbox a ekledik. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void btnRandom_Click(object sender, EventArgs e) { int[] sayi=new int[11]; for (int i = 0; i <= 10; i++) { Random rnd = new Random(); sayi[i] = rnd.Next(0, 100); //İlk 10 rakam için sabit random değerini atadık. //İlk 10 değerimiz aynı. listBox1.Items.Add(Convert.ToString(i + "=" + sayi[i])); } } private void btnRastgele_Click(object sender, EventArgs e) { //listBox1.Items.Clear(); Random rnd = new Random(); int i = rnd.Next(0,100); listBox1.Items.Add(i); } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Dosya Boyutunu Öğrenme C sürücüsündeki deneme.txt dosyasının boyutunu öğreneceğiz. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim dosyaBoyut As IO.FileInfo dosyaBoyut = My.Computer.FileSystem.GetFileInfo("C:/deneme.txt") MessageBox.Show("Dosya Boyut: " & dosyaBoyut.Length & " byte(s)") End Sub End Class Bir sonraki makalede görüşmek dileğiyle. Bahadır ŞAHİN
PictureBox a Yazı Ekleme Formunuza 1 adet PictureBox ve Button nesnesi ekleyin. Picturebox in ismini pbox1 yapın. Aşağıdaki şekilleri inceleyin. Graphics in DrawString özelliğinden yararlanarak picturebox a istediğimiz yazıyı ekleyebilirsiniz. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim grafik As Graphics = pbox1.CreateGraphics Dim style As FontStyle = FontStyle.Bold Dim fonts As Font = New Font(New FontFamily("Arial"), 14, style) grafik.DrawString("Bahadır", fonts, Brushes.Red, 10, 10) grafik.DrawString("ŞAHİN", fonts, Brushes.White, 10, 30) End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Geçme Notu Hesaplama 1 Vize ve Final Notuna göre harfli sisteme göre hangi notu aldığınızı, 60 geçiş notuna göre geçilip geçilmediğini gösteren program. Aşağıdaki şekilleri inceleyin. Public Class Form1 Dim vize, final As Integer Dim gnotu As Double Dim sonuc, durum As String Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click vize = InputBox("Not Girişi", "Vize Notu Girişi", 0) final = InputBox("Not Girişi", "Final Notu Girişi", 0) gnotu = vize * 0.3 + final * 0.7 Select Case gnotu Case 90 To 100 : sonuc = "A" Case 80 To 89 : sonuc = "B" Case 70 To 79 : sonuc = "C" Case 60 To 69 : sonuc = "D" Case Is < 50 : sonuc = "F" Case 50 To 59 : sonuc = "E" Case Else End Select If gnotu < 60 Then durum = "KALDINIZ!.." Else durum = "GEÇTİNİZ!.." End If MsgBox("Not Ortalaması:" & gnotu & Chr(10) & "Puan Dilimi: " & sonuc & Chr(10) & "Durum: " & durum) End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
DataList Nesnesinde Alfabetik Sıralama Bu makalemizde Northwind veritabandaki Customers tablosuna bağlanacağız. Bu tablodaki verileri CustomerID sine göre Datalist nesnesinde alfabetik olarak göstereceğiz.
Web Sitesinin Ip Adresini Öğrenme Bu örnekte Textbox a girilen web adresine ait ip adresini öğreneceğiz. aspx sayfanıza 1 adet button, textbox ve label ekleyin. Aşağıdaki Şekil 1 i inceleyin.
Cookie Oluşturma default.aspx ve login.aspx şeklinde iki sayfamız olsun. login.aspx sayfasından giriş yapan kullanıcının bilgisayarına cookie (çerez) oluşturacağız.
Linq Kullanımı Bu makalemizde Linq kullanımını anlatacağım. İlk önce Şekil 1 deki Sql veritabanımızı oluşturalım. 2. olarak Web Site > Add New Item kısmından LinQ to SQL Classes i projemize ekleyelim.
Mail Adresinize Otomatik Olarak Şifrenizin Gönderilmesi Bu makalemizde web sitesine kullanıcı adı ve şifre ile üye olduğunuzu düşünelim. Çoğu zaman kayıtlı olduğumuz siteye giriş yaparken şifremizi unutabiliriz.
Kullanıcı Login İşlemi Bu makalemizde sql veritabanında kayıtlı kullanıcıların sisteme nasıl giriş yapacağı konusunu işleyeceğiz. Oluşturduğunuz sql veritabanına giris.mdf ismini verin.
ListView da Access Veritabanındaki Verileri Göstermek Bu makalemizde access veritabanındaki personel tablosundaki bilgileri Listview nesnesinde göstereceğiz. Aşağıdaki şekilleri inceleyin.
Şifreli Text Dosyasını Çözmek Bir önceki makalede Textbox a girilen stringi şifreledik ve sifreli.txt dosyası olarak kaydetmiştik. (Şekil1) Şimdi ise şifrelidiğimiz dosyadaki bilgileri tekrardan çözeceğiz. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; using System.IO; using System.Security.Cryptography; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { TripleDESCryptoServiceProvider tdes = new TripleDESCryptoServiceProvider(); FileStream fs = File.OpenRead(@"c:\sifreli.key"); BinaryReader br = new BinaryReader(fs); tdes.Key = br.ReadBytes(24); tdes.IV = br.ReadBytes(8); FileStream fstream = File.OpenRead(@"c:\sifreli.txt"); CryptoStream cs = new CryptoStream(fstream, tdes.CreateDecryptor(), CryptoStreamMode.Read); StreamReader sr = new StreamReader(cs); textBox1.Text = sr.ReadToEnd(); sr.Close(); } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Textboxa Girilen Stringi Şifreleme (Cryptography) Bu makalemizde Textbox a girilen stringi şifreleyeceğiz. C sürücüsünde şifreli.txt sifreli kayıt girdisi oluşturacağız.(Şekil 2) İlk önce; using System.IO; using System.Security.Cryptography; i ekleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; using System.IO; using System.Security.Cryptography; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { try { FileStream fs = File.Create(@"c:\sifreli.txt"); TripleDESCryptoServiceProvider tdes = new TripleDESCryptoServiceProvider(); CryptoStream cs = new CryptoStream(fs, tdes.CreateEncryptor(), CryptoStreamMode.Write); StreamWriter sw = new StreamWriter(cs); sw.WriteLine(textBox1.Text); sw.Flush(); sw.Close(); FileStream fsKeyOut = File.Create(@"c:\sifreli.key"); BinaryWriter bw = new BinaryWriter(fsKeyOut); bw.Write(tdes.Key); bw.Write(tdes.IV); bw.Flush(); bw.Close(); MessageBox.Show("Girilen mesaj şifrelendi...","Şifreleme"); } catch (Exception) { MessageBox.Show("Hata oluştu...Tekrar deneyiniz!", "Şifreleme"); } } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Class Uygulaması Bu örnekte basit bir class uygulaması yapacağız. Uygulamamızda tarih isminde class oluşturacağız. Daha sonra bu class içinde girilen gün,ay,yıl değerlerini ekrana yazdıracağız. İlk önce File >New >Project den Console Application formu açın. Aşağıdaki şekli inceleyin. using System; using System.Collections.Generic; using System.Linq; using System.Text; namespace ConsoleApplication1 { class tarih { public short gun,ay,yil; public tarih() { gun=22; ay=02; yil=2009; } } class Program { static void Main(string[] args) { tarih date = new tarih(); Console.WriteLine("Gün:{0}", date.gun); Console.WriteLine("Ay:{0}", date.ay); Console.WriteLine("Yıl:{0}", date.yil); Console.ReadLine(); } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Dosya Oluşturma Projenize ConsoleApplication ekleyin. Aşağıdaki kodları eklediğiniz forma yazın. using System; using System.Collections.Generic; using System.Text; using System.IO; namespace ConsoleApplication1 { class Program { static void Main(string[] args) { FileInfo dosya = new FileInfo(@"C:\deneme.txt"); FileStream fs = dosya.Create(); Console.WriteLine("Dosya Oluşturulma Tarihi: {0}", dosya.CreationTime); Console.WriteLine("Adı: {0}", dosya.FullName); Console.WriteLine("Dosya Biçimi: {0}", dosya.Attributes.ToString()); fs.Close(); dosya.Delete(); Console.ReadLine(); return ; } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Mouse Hareketleri Bu örneğimizde mouse un sol,orta, sağ tuşa tıklanıldığında veya klavyenin herhangi bir tuşuna tıklanıldığında, o tuşun ismini mesajla bildiren küçük bir program yapacağız. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); this.MouseUp += new MouseEventHandler(OnMouseUp); this.MouseMove += new MouseEventHandler(OnMouseMove); this.KeyUp += new KeyEventHandler(OnKeyUp); CenterToScreen(); } private void Form1_Load(object sender, EventArgs e) { } protected void OnMouseUp(object sender, MouseEventArgs e) { if (e.Button == MouseButtons.Left) MessageBox.Show("Sol tuş tıklandı!"); else if (e.Button == MouseButtons.Right) MessageBox.Show("Sağ tuş tıklandı!"); else if (e.Button == MouseButtons.Middle) MessageBox.Show("Orta tuş tıklandı!"); } protected void OnMouseMove(object sender, MouseEventArgs e) { this.Text = "Mouse Şimdiki Pozisyon: (" + e.X + ", " + e.Y + ")"; } public void OnKeyUp(object sender, KeyEventArgs e) { MessageBox.Show(e.KeyCode.ToString(), "Klavyedeki tuşa tıklanıldı!"); } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Caps Lock Kontrolü Bu örnekte caps lock un açık olup olmadığını kontrol edeceğiz. Formunuzun keydown yordamına aşağıdaki kodları kopyalayınız. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; using Microsoft.VisualBasic.Devices; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); this.KeyDown += Form1_KeyDown; } private void Form1_KeyDown(object sender, KeyEventArgs e) { Computer comp = new Computer(); Keyboard keyboard = comp.Keyboard; if (keyboard.CapsLock) { MessageBox.Show("CAPS LOCK AÇIK"); } else { MessageBox.Show("CAPS LOCK KAPALI"); } } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Alfabetik Sıralama Inputbox tan girilen isimleri, listbox ta alfabetik olarak sıralayacağız.Aşağıdaki şekilleri inceleyin Hatırlatma: Inputbox nesnesini kullanabilmek için; İlk önce Project kısmından Add Reference tıklayın. Daha sonra .Net kısmından Microsoft.VisualBasic i seçip OK e tıklayın. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { string[] isim = new string[5]; string str; for (int i = 0; i < isim.Length; i++) { isim[i]= Microsoft.VisualBasic.Interaction.InputBox("Lütfen " + (i + 1) + " isim giriniz...", "Alfabetik sıralama ", "İsim giriniz...",20,20); } for (int i = 0; i < isim.Length; i++) { for (int j = i + 1; j < isim.Length; j++) { if (String.Compare(isim[i], isim[j]) > 0) { str = isim[i]; isim[i] = isim[j]; isim[j] = str; } } } for (int i = 0; i < isim.Length; i++) { listBox1.Items.Add(isim[i]); } } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Faktoriyel Hesaplama Bu örnekte textbox a girilen sayının faktoriyelini hesaplayacağız. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private static long faktoriyel(int sayi) { if (sayi <= 1) return 1; else return sayi * faktoriyel(sayi - 1); } private void button1_Click(object sender, EventArgs e) { string sonuc = ""; int sayi = Convert.ToInt32(textBox1.Text); for (int i = 1; i <= sayi; i++) sonuc += i + "!= \t" + faktoriyel(i).ToString() + "\n"; MessageBox.Show(sonuc.ToString(), "Faktoriyel Hesabı"); } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Labele Resim Ekleme Bu makalemizde label nesnesinde resim göstereceğiz. Aşağıdaki şekli inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); Label label1 = new System.Windows.Forms.Label(); this.SuspendLayout(); label1.Image = new Bitmap("C:\\image.jpg"); label1.ImageAlign = System.Drawing.ContentAlignment.TopRight; label1.Location = new System.Drawing.Point(20, 9); label1.Name = "label1"; label1.Size = new System.Drawing.Size(100, 128); label1.TabIndex = 0; label1.Text = "Labele resim ekleme..Bahadır ŞAHİN"; label1.ForeColor = Color.White; this.Controls.Add(label1); this.Font = new System.Drawing.Font("Tahoma", 8.25F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0))); this.Text = "Labele Resim Ekleme"; this.ResumeLayout(false); } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Windows Soundlarını Oynatmak Bu örnekte SystemSounds classındaki play metodu ile windowsun 5 sabit soundunu çaldıracağız. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { System.Media.SystemSounds.Beep.Play(); /* veya System.Media.SystemSounds.Hand.Play(); veya System.Media.SystemSounds.Asterisk.Play(); veya System.Media.SystemSounds.Exclamation.Play(); veya System.Media.SystemSounds.Question.Play();*/ } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
TrackBar ile Renk Kontrolü Formunuza 3 adet TrackBar,4 adet Label ve 1 adet Panel ekleyin. Aşağıdaki şekli inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); KirmiziTrackBar.BeginInit(); YesilTrackBar.BeginInit(); MaviTrackBar.BeginInit(); KirmiziTrackBar.Value = 0; YesilTrackBar.Value = 0; MaviTrackBar.Value = 0; KirmiziTrackBar.TickFrequency = 5; KirmiziTrackBar.TabIndex = 2; KirmiziTrackBar.Maximum = 255; KirmiziTrackBar.Scroll += new System.EventHandler(this.KirmiziTrackBar_Scroll); YesilTrackBar.TickFrequency = 5; YesilTrackBar.TabIndex = 2; YesilTrackBar.Maximum = 255; YesilTrackBar.Scroll += new System.EventHandler(this.KirmiziTrackBar_Scroll); MaviTrackBar.TickFrequency = 5; MaviTrackBar.TabIndex = 2; MaviTrackBar.Maximum = 255; MaviTrackBar.Scroll += new System.EventHandler(this.KirmiziTrackBar_Scroll); KirmiziTrackBar.EndInit(); YesilTrackBar.EndInit(); MaviTrackBar.EndInit(); renk_deger(); } private void KirmiziTrackBar_Scroll(object sender, EventArgs e) { renk_deger(); } private void YesilTrackBar_Scroll(object sender, EventArgs e) { renk_deger(); } private void MaviTrackBar_Scroll(object sender, EventArgs e) { renk_deger(); } private void renk_deger() { Color renk = Color.FromArgb(KirmiziTrackBar.Value, YesilTrackBar.Value, MaviTrackBar.Value); panel1.BackColor = renk; label4.Text = "Renk Değer: " + "(" + KirmiziTrackBar.Value + ", " + YesilTrackBar.Value + " ," + MaviTrackBar.Value + ")"; } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Win Api Kullanımı CLR tarafından yönetilmeyen kodlara erişebilmek için C# ta System.Runtime.InteropServices isim alanında bulunan ve DllImprtAttribute sınıfını temsil eden DllImport niteliği kullanılmaktadır. DllImport niteliği ile harici bir kaynakta bulunan metoda referans vermek için external anahtar sözcüğü kullanılır. Bir sınıf bildiriminin en başında external anahtar sözcüğü ve DllImport niteliği kullanılarak CLR tarafından yönetilmeyen bir metot bildirimi yapılır. Tabi metodun gövdesi harici bir kaynakta zaten var olduğu için bizim metodun gövdesini yazmamızın bir anlamı yoktur. Ardından bu metot sınıfın istenildiği yerinde kullanılabilir. Aşağıdaki Şekil 1 i inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.Runtime.InteropServices; namespace WindowsApplication1 { public partial class Form1 : Form { [DllImport("user32.dll")] public static extern int MessageBox(int tip, string mesaj, string baslik, int secenek); public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { MessageBox(0, "Win api kullanımı...", "Win API Mesaj", 2); } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Elapsed Olayı Bu makalemizde elapsed olayına değineceğiz. Elapsed ile geçen süreyi ekrana yazdıracağız. İlk önce New Project > ConsoleApplication açınız. Aşağıdaki kodları formunuza yazınız. Şekli inceleyin. using System; using System.Collections.Generic; using System.Text; using System.Timers; namespace gecensure { class Program { static void Main(string[] args) { Timer t = new Timer(1000); t.Elapsed += new ElapsedEventHandler(zaman); t.Elapsed += new ElapsedEventHandler(mesaj); t.Start(); Console.ReadLine(); } static void zaman(object o, ElapsedEventArgs a) { Console.WriteLine(DateTime.Now); } static void mesaj(object o, ElapsedEventArgs a) { Console.WriteLine("Geçen Süre:"); } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Çalışma Anında Button Oluşturup Görev Atamak Bu örnekte buton oluşturup, oluşturulan butona görev atayacağız. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { Button buton = new Button(); public Form1() { InitializeComponent(); this.buton.Click += new System.EventHandler(this.buton_Click); } private void Form1_Load(object sender, EventArgs e) { buton.Text = "Çalışma Anında Buton Oluşturma " + System.DateTime.Now; buton.Location = new Point(10, 10); buton.Size = new System.Drawing.Size(250, 25); buton.Visible = true; Controls.Add(buton); } private void buton_Click(object sender, EventArgs e) { MessageBox.Show("Çalışma anında oluşturulan" + System.Environment.NewLine + "Butona görev atandı..."); } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Panelde Resimin ScrollBarlı Olarak Gösterimi Panelde resim yatay ve dikey scrollbar lı şekilde gösterimini sağlayacağız. Şekil 1 i inceleyiniz. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { Panel panel1 = new System.Windows.Forms.Panel(); public Form1() { InitializeComponent(); this.SuspendLayout(); panel1.AutoScroll = true; panel1.BackgroundImage = new Bitmap("C:\\pic1.bmp"); panel1.Location = new System.Drawing.Point(13, 13); panel1.Size = new System.Drawing.Size(267, 243); AutoScaleDimensions = new System.Drawing.SizeF(8F, 16F); AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font; ClientSize = new System.Drawing.Size(292, 268); Controls.Add(panel1); this.Load += new System.EventHandler(this.Form1_Load); this.ResumeLayout(false); panel1.AutoScrollMinSize = panel1.BackgroundImage.Size; } private void Form1_Load(object sender, EventArgs e) { int midX = panel1.AutoScrollMinSize.Width / 2; int midY = panel1.AutoScrollMinSize.Height / 2; int halfSizeX = panel1.Size.Width / 2; int halfSizeY = panel1.Size.Height / 2; int startPosX = midX - halfSizeX; if (startPosX < 0) startPosX = 0; int startPosY = midY - halfSizeY; if (startPosY < 0) startPosY = 0; panel1.AutoScrollPosition = new Point(startPosX, startPosY); } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Kare Şekli Oluşturmak Bu örnekte mouse un sol tuşuna tıklayarak form da istenildiği kadar kare şekli oluşturup, oluşturduğumuz kare sayısını label de göstereceğiz. Aşağıdaki şekli inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { List< Rectangle > squares = new List< Rectangle >(); public Form1() { InitializeComponent(); this.AutoScaleDimensions = new System.Drawing.SizeF(6F, 13F); this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font; this.ClientSize = new System.Drawing.Size(299, 272); this.Controls.Add(this.label1); this.Font = new System.Drawing.Font("Tahoma", 8.25F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0))); this.Name = "kare"; this.Text = "kare"; this.Paint += new System.Windows.Forms.PaintEventHandler(this.kare_Paint); this.MouseDown += new System.Windows.Forms.MouseEventHandler(this.kare_MouseDown); this.ResumeLayout(false); } private void kare_Paint(object sender, PaintEventArgs e) { Pen pen = new Pen(Color.Red, 10); foreach (Rectangle kare in squares) { e.Graphics.DrawRectangle(pen, kare); } pen.Dispose(); label1.Text = " " + squares.Count.ToString() + " kare"; } private void kare_MouseDown(object sender, MouseEventArgs e) { if (e.Button == MouseButtons.Left) { Rectangle square = new Rectangle(e.X, e.Y, 20, 20); squares.Add(square); square.Inflate(1, 1); Invalidate(square); } } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Form Paint Örnek Bu örnekte form da paint metodunu göreceğiz. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); this.Text = "Paint Event"; this.Paint += new PaintEventHandler(MyPaintHandler); } static void MyPaintHandler(object objSender, PaintEventArgs pea) { Graphics grafik = pea.Graphics; grafik.Clear(Color.LightGreen); } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Gün İçindeki Saat Göre Farklı Karşılama Mesajı Vermek Bu örnekte o andaki sistem saatine göre farklı karşılama mesajı veren program yapacağız. Bir yandan da switch metodunu göreceğiz. Aşağıdaki şekli inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { string mesaj = "Hoşgeldiniz!"; int saat = DateTime.Now.Hour; switch (saat) { //case 9 ile saat 09.00 tanımladık. case 9: case 10: case 11: MessageBox.Show(mesaj.Insert(0, "Günaydın,")); break; case 12: case 13: case 14: case 15: MessageBox.Show(mesaj.Insert(0, "İyi günler,")); break; case 16: case 17: case 18: case 19: MessageBox.Show(mesaj.Insert(0, "İyi akşamlar,")); break; case 20: case 21: case 22: case 23: case 24: MessageBox.Show(mesaj.Insert(0, "İyi geceler,")); break; default: mesaj = mesaj.Insert(0, "Merhaba,"); break; } } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Fahrenheit Sıcaklık Arasındaki Çevrimler Bu örnek te Sıcaklık değerini fahrenheit e ya da fahrenheit değerini sıcaklık değerine çevireceğiz. Formunuza 2 adet button ve 1 adet TextBox ekleyin. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } public static double FahrenheitaCevir(string sicaklikdeger) { double santigrat = System.Double.Parse(sicaklikdeger); MessageBox.Show("Fahrenheit Değeri: " + Convert.ToString((santigrat * 9 / 5) + 32)); return (santigrat * 9 / 5) + 32; } public static double SicakligaCevir(string fahrenheitdeger) { double fahrenheit = System.Double.Parse(fahrenheitdeger); MessageBox.Show("Sıcaklık Değeri: " + Convert.ToString((fahrenheit - 32) * 5 / 9)); return (fahrenheit - 32) * 5 / 9; } private void button1_Click(object sender, EventArgs e) { FahrenheitaCevir(textBox1.Text); } private void button2_Click(object sender, EventArgs e) { SicakligaCevir(textBox1.Text); } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
SendKey Metodunda TAB Kullanımı Bu örnekte Sendkey de tab nasıl kullanıldığını göreceğiz. Formunuza Aşağıdaki Şekil1 de gösterildiği gibi 2 adet TextBox ekleyin. Örnekte textBox1 e 6. karakter girildiğinde, otomatik olarak textBox2 ye yazılacak. private void textBox1_TextChanged(object sender, EventArgs e) { if (textBox1.Text.Length == 5) SendKeys.Send("{TAB}"); } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Array Dizisinde Değer Silme Bu örnekte 9 değer arasından seçtiğimiz aralıktaki değerleri sildirip, 0 yazdıracağız. Aşağıdaki şekli inceleyin. New Projecten ConsoleApplication formu açın ve aşağıdaki kodları forma yazın. using System; using System.Collections.Generic; using System.Text; namespace ConsoleApplication1 { class ArrayDegerSil { public static void Main() { int[] deger = { 1, 2, 3, 4, 5, 6, 7, 8, 9 }; diziliste("Önceki Değerler: ", deger); //Silinecek değer aralığı Array.Clear(deger, 1, 5); //silme işleminden sonraki kalan değerler diziliste("Kalan Sonraki Değerler: ", deger); } public static void diziliste(string title, int[] a) { Console.Write(title); for (int i = 0; i < a.Length; i++) { Console.Write("[{0}]: {1, -5}", i, a[i]); } Console.WriteLine(); Console.ReadLine(); } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
DNS Adını Öğrenme Bu örnekte DNS adını öğreneceğiz. İlk önce; using System.Net; i formunuza ekleyin. Daha sonra aşağıdaki kodları ConsoleApplication a yazın. Aşağıdaki şekli inceleyin. using System; using System.Collections.Generic; using System.Text; using System.Net; namespace DNSAdi { public class DNSAd { public static void Main() { string hostAd = Dns.GetHostName(); Console.WriteLine("Local hostAd: {0}", hostAd); IPHostEntry myself = Dns.GetHostByName(hostAd); foreach (IPAddress adres in myself.AddressList) { Console.WriteLine("IP Adres: {0}", adres.ToString()); Console.Read(); } } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Ekran Çözünürlüğünü Öğrenmek Bu örnekte bilgisayarımızın ekran boyutunu öğreneceğiz. Aşağıdaki şekili inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { MessageBox.Show("Monitor Boyutu:" + SystemInformation.PrimaryMonitorSize); //veya aşağıdaki şekilde //MessageBox.Show("Asıl Boyut: " + SystemInformation.VirtualScreen); } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Thread Metodu Örnek Bu örnekte Thread yani iş parçacığı metodunun kullanımını göreceğiz. Formunuza 1 adet Button ekleyin. Aşağıdaki şekli inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.Threading; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { Thread thread = Thread.CurrentThread; thread.Name = "CSharp Thread Örnek.."; } private void button1_Click(object sender, EventArgs e) { Thread thread = Thread.CurrentThread; MessageBox.Show("Thread Adı: " + thread.Name); } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Klasör Oluşturulma Tarihini Öğrenmek Bu örnekte, herhangi bir klasörün, oluşturulma tarihini öğreneceğiz. İlk önce; using System.IO; i ekleyin. Daha sonra Button un Click yordamına aşağıdaki kodları ekleyin. Aşağıdaki Şekil 1 i inceleyin. C:\ deki test klasörünün oluşturulma tarihine bakacağız. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.IO; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { string directoryString =Directory.GetCurrentDirectory() + @"\test"; Directory.CreateDirectory(directoryString); DateTime dateTime = Directory.GetCreationTime(directoryString); MessageBox.Show("Klasör Oluşturulma Tarihi: " + dateTime); Directory.Delete(directoryString); } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Windows Formda Msdos Çalıştırma Formunuza 1 adet textBox,richTextBox ve Button ekleyin. Aşağıdaki şekili inceleyin. private void button1_Click(object sender, EventArgs e) { System.Diagnostics.Process islem; islem = new System.Diagnostics.Process(); string Par1 = "/c " + textBox1.Text; islem.StartInfo.FileName = "cmd"; islem.StartInfo.Arguments = Par1; islem.StartInfo.CreateNoWindow = true; islem.StartInfo.RedirectStandardOutput = true; islem.StartInfo.UseShellExecute = false; islem.Start(); richTextBox1.Text = islem.StandardOutput.ReadToEnd(); } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Rastgele Üretilen Sayıların En Küçüğü,En Büyüğü ve Ortalamasını Bulma Rastgele ürettiğimiz 20 sayının en küçüğü en büyüğü ve bu 20 sayının ortalamasını bulacağız. Formunuza 1 adet Button, Label ve ListBox ekleyin. Aşağıdaki şekilleri inceleyin. private void button1_Click(object sender, EventArgs e) { int[] dizi = new int[20]; int sayi = 0, j = 0, toplam =0; bool buldu = false; Random rastgele = new Random(); for (int i = 0; i < 20; i++) { buldu = false; while (buldu == false) { sayi = rastgele.Next(1, 30); for (j = 0; j < 20; j++) if (dizi[j] == sayi) break; if (j == 20) { dizi[i] = sayi; buldu = true; } } toplam = toplam + dizi[i]; } int ortalama; ortalama = toplam / 20; Array.Sort(dizi); MessageBox.Show("En Küçük Sayı=" + dizi[0] + Environment.NewLine + "En Büyük Sayı=" + dizi[19]+ Environment.NewLine + "Ortalama=" + ortalama); foreach (int yaz in dizi) listBox1.Items.Add(yaz); } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Klasör Oluşturma ve Silme İşlemleri Bu örnekte klasör oluşturmayı ve klasör silme işlemini göreceğiz. İlk önce, using System.IO; ekleyin. Formunuza 1 adet textbox(oluşturacağımız klasörün ismini giriyoruz), Listbox (Durumu gösteriyor), 2 adet button ve Label ekleyin. Aşağıdaki şekli inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.IO; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { string directoryString = "C:\\" + @"\" + textBox1.Text; Directory.CreateDirectory(directoryString); if (Directory.Exists(directoryString)) listBox1.Items.Add(directoryString + " klasörü oluşturuldu. " + DateTime.Now); else listBox1.Items.Add(directoryString + " klasörü oluşturulamadı. " + DateTime.Now); } private void button2_Click(object sender, EventArgs e) { string directoryString = "C:\\" + @"\" + textBox1.Text; if (Directory.Exists(directoryString)) Directory.Delete(directoryString); listBox1.Items.Add(directoryString + " klasörü silindi. " + DateTime.Now); } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
ListBoxtaki Verilerin Azalan Sıralanması Listbox taki verilerinizi Büyükten küçüğe (Desc) aşağıdaki küçük kod parçası ile sıralatabilirsiniz. Formunuzu Şekil 1 deki gibi tasarlayın. Button un click yordamına aşağıdaki kodu yazın. private void button1_Click(object sender, EventArgs e) { string[] myArray = new string[listBox1.Items.Count]; for (int i = 0; i < listBox1.Items.Count; i++) myArray[i] = listBox1.Items[i].ToString(); Array.Sort(myArray); Array.Reverse(myArray); listBox1.Items.Clear(); foreach (string str in myArray) { if (str != null) listBox1.Items.Add(str); } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Text Dosyadan İstenilen Bilgiyi Almak Text dosya içerisindeki satırlarda istenilen bilgileri yazdıracağız. Örneğin Birden fazla satır var bu satırlardan Frekans -- diye başlayanlarda yazılı olan verileri tek tek çekip ekrana yazdıracağız. İlk önce C:\ veri.txt dosyasını oluşturun. Şekil 1 deki gibi veri.txt in içindeki satırları oluşturun. Aşağıdaki kodları yazın. Şekil 2 deki gibi ekran elde edilir. using System; using System.Collections.Generic; using System.Text; using System.IO; namespace ConsoleApplication1 { class Program { static void Main(string[] args) { StreamReader dosyaoku = File.OpenText("C:\\veri.txt"); string ara = "Frekans -- "; string str = dosyaoku.ReadLine(); while (str != null) { if (str.StartsWith(ara)) { string gecici = str.Replace(ara, ""); string[] parcalar = gecici.Split(new char[] { ’ ’ }, StringSplitOptions.RemoveEmptyEntries); Console.WriteLine(string.Format("Deger1 = {0}, Deger2 = {1}, Deger3 = {2}{3}", parcalar[0], parcalar[1], parcalar[2], Environment.NewLine)); } str = dosyaoku.ReadLine(); } dosyaoku.Close(); Console.Read(); } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Google da Arama Bu örnekte google da arama yapmayı göreceğiz. Formunuza 1 adet TextBox, Button ve webBrowser ekleyin. Aşağıdaki şekili inceleyin. namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { this.WindowState = FormWindowState.Maximized; //Formumuzun tüm ekranı kaplamasını sağlıyoruz. webBrowser1.Size = this.Size; webBrowser1.Navigate("www.google.com"); //Web browserin googleye gitmesini sağlıyoruz.. while (webBrowser1.ReadyState != WebBrowserReadyState.Complete) { // .Sayfanın tamamen yüklenmesi bekleniyor Application.DoEvents(); //Bu kod ile programın kitlenmesini önlüyoruz. } HtmlElement user = webBrowser1.Document.GetElementById("q"); //Bu kod ile id si "q" olan nesneyi seciyoruz ve aşağıda üzerine text deki değeri yazdırıyoruz... user.SetAttribute("value", textBox1.Text); HtmlElement button = webBrowser1.Document.GetElementById("btnG"); //ve burda da id si "btnG" olan nesneyi seçiyoruz ve aşağıda click olayını tetikliyoruz.. button.InvokeMember("click"); } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Ctrl+Enter Tuşunu Combobox ta Kullanmak Combobox.Text teki stringi Ctrl+Enter tuşuna basıp alacağız.Daha sonra aldığımız stringi WebBrowser da kullanacağız. Örnek: Combobox Text e google yazacağız.(Şekil 1) Daha sonra Ctrl+Enter tuş kombinasyonuna basacağız. Böylece WebBrowser da (http://www.google.com) sayfası açılacak ve Combobox.Text te http://www.google.com yazacak. Not: InitializeComponent(); den sonra this.comboBox1.KeyUp += new KeyEventHandler(comboBox1_KeyUp); eklemeyi unutmayın. namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); this.comboBox1.KeyUp += new KeyEventHandler(comboBox1_KeyUp); } private void comboBox1_KeyUp(object sender, KeyEventArgs e) { string str; str = comboBox1.Text; if ((e.KeyValue == 13) && (e.Control)) comboBox1.Text = "http://www." + str + ".com"; webBrowser1.Navigate(comboBox1.Text); } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
10 luk Sayı Sistemini 2 lik Sayı Sistemine Çevirme Bu örnekte TextBox a girilen onluk sayı sitemini 2 lik sayı sistemine çevireceğiz. Formunuza 2 adet textbox ve 1 adet button ekleyin. Aşağıdaki şekli inceleyin. private void button1_Click(object sender, EventArgs e) { textBox2.Clear(); byte deger; Byte bit; deger = Convert.ToByte(textBox1.Text); for (int i = 7; i >= 0; i--) { bit = (byte)(deger >> i & 1); //mantıksal veri textBox2.Text = textBox2.Text+Convert.ToString(bit); } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Sayıları Yazıya Çevirmek Bu makalede TextBox a girilen sayıları yazı ya çevireceğiz. Formunuza 1 adet TextBox ve Button ekleyin. Aşağıdaki şekli inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { string[,] ifade = new string[2,9]; ifade[0, 0] = "bir"; ifade[0, 1] = "iki"; ifade[0, 2] = "üç"; ifade[0, 3] = "dört"; ifade[0, 4] = "beş"; ifade[0, 5] = "altı"; ifade[0, 6] = "yedi"; ifade[0, 7] = "sekiz"; ifade[0, 8] = "dokuz"; ifade[1, 0] = "on"; ifade[1, 1] = "yirmi"; ifade[1, 2] = "otuz"; ifade[1, 3] = "kırk"; ifade[1, 4] = "elli"; ifade[1, 5] = "altmış"; ifade[1, 6] = "yetmiş"; ifade[1, 7] = "seksen"; ifade[1, 8] = "doksan"; string s = textBox1.Text; string yazıyla=""; for (int i = 0; i < s.Length; i++) { if (i==s.Length-2 \|\| i==s.Length-5 \|\| i==s.Length-8 ) { int deger =Convert.ToInt32(s[i].ToString()); yazıyla+=ifade[1,deger-1]; continue; } if (((i==s.Length-3) &&(s[i]==’1’)) \|\|((i==s.Length-6) &&(s[i]==’1’)) \|\|((i==s.Length-9) &&(s[i]==’1’))) { yazıyla+="yüz"; continue; } if ((i == s.Length - 4) && (s[i] == ’1’)) { yazıyla+="bin"; continue; } if ((i==s.Length-1)&& (s[i]==’0’)) { if (s.Length == 1) { yazıyla = "sıfır"; } else continue; } byte d = Convert.ToByte(s[i].ToString()); yazıyla += ifade[0, d - 1]; if (i == s.Length - 3 \|\| i == s.Length - 6 \|\|i ==s.Length - 9) { yazıyla += "yüz"; } if (i == s.Length - 4) {yazıyla += "bin";} if (i == s.Length - 7) {yazıyla += "milyon";} } MessageBox.Show(yazıyla); } } } //Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Formunuz Efektli Açılsın Formunuza 1 adet Timer ekleyin. Aşağıdaki kodları yazın. private void Form1_Load(object sender, EventArgs e) { timer1.Start(); } private void timer1_Tick(object sender, EventArgs e) { int x, y, k; x = 300; y = 0; for (k = 0; k <= 100; k++) { y++; this.Size = new System.Drawing.Size(x, y); } timer1.Stop(); } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
İki Tarih Arasındaki Günü Hesaplama VisualBasic teki DateDiff () fonksiyonunu biraz farklı bir şeklini C# de kullanacağız. Bugünkü tarih ile girilen ilk tarih arasındaki gün sayısını bulacağız. private void button1_Click(object sender, EventArgs e) { DateTime ilkTarih = new DateTime(2008,06,18); DateTime BugunkuTarih = DateTime.Now; TimeSpan ts = BugunkuTarih - ilkTarih; MessageBox.Show(Convert.ToString(ts.Days)); } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Regex.Replace() Kullanımı Regular expression bir metni düzenlemek yada metin içerisinden belli kurallara uyan alt metinler elde etmek için kullandığımız bir dildir. Bir regular expression, string tipindeki karakter topluluğuna uygulanır. Sonuç olarak substringler oluşur yada orjinal metnin bir kısmını içeren değiştirilmiş yeni metinler elde edilir. Regular Expression‘larda Kullanılan Özel Karakterler ve Etkileri Regular expression desenleri tanımlamada kullanılan özel karakterleri örnekleri ile anlatırsak sanırım regular expressionlar daha tanıdı ve kolay gelebilir. 1. ‘.‘ Karakteri Tek bir karakteri temsil eder(yeni satır karakteri hariç). \"CSharp.edir\" şeklindeki bir desen CSharpnedir, CSharpNedir, CSharpSedir, CSharp3edir gibi stringleri döndürebilir. 2. ‘[]‘ Karakterleri Bir arrayi yada aralığı temsil eder. \"CSharp[SNY]edir\" deseni, CSharpSedir, CSharpNedir ve CSharpYedir stringlerini döndürür. \"CSharp[a-z]edir\" şeklindeki kullanım aralık belirtmeye yarar. \"CSharp[0-9]edir\" şeklindeki kılanlım ise sayısal aralık belirtmeye yarar. 3. ‘?‘ Karakteri Kendinden önceki karakterin stringte olması yada olmamasını sağlar. \"CSharpn?edir\" deseni CSharpedir yada CSharpnedir döndürür. 4. ‘\‘ Karakteri Kendinden sonraki özel karakterin stringe dahil edilmesini sağlar. ‘CSharpnedir\?‘ deseni CSharpnedir? Stringini döndürür. (Eğer ‘\‘ karakterini kullanmamış olsaydık CSharpnedi yada CSharpnedir dönerdi.) 5. ‘‘ Karakteri Kendinden önceki karakterin yada stringin hiç olmaması yada istediği sayıda olmasını sağlar. \"CSharpnedir\" deseni, CSharpnedi, CSharpnedir, CSharpnedirr, CSharpnedirrr, ... döndürür. \"CSharp(nedir)*\" deseni ise CSharp, CSharpnedir, CSharpnedirnedir, ... döndürür. 6. ‘{}‘ Karakterleri Kendinden önce gelen karakterin belirtilen sayıda tekrar etmesini sağlar. \"C{4}Sharpnedir\" deseni, CCCCSharpnedir stringini döndürür. 7. ‘^‘ Karakteri Satır başını ifade eder. \"^CSharpnedir\" deseni, satır başında \"CSharpnedir\" stringi varsa bunu döndürür. 8. ‘$‘ Karakteri Satır sonunu ifade eder. \"CSharpnedir$\" deseni, satır sonunda \"CSharpnedir\" stringi varsa bunu döndürür. Şimdi örneğimize geçelim; Regular expression kullanabilmeniz içi öncelikle "System.Text.RegularExpressions;" ad uzayını kod tarafında "using" direktifi ile eklemeniz gerekir. yani; using System.Text.RegularExpressions; ekleyin. private void Form1_Load(object sender, EventArgs e) { bool isMatch = Regex.IsMatch("abc123de", @"\d{3}"); // 123 match eder. // Replace Örneği : Regex regex = new Regex(@"\d{3}"); string sonuc = regex.Replace("abc123de", "BAHADIRŞAHİN"); MessageBox.Show(sonuc); // sonuc -> "abcBAHADIRŞAHİNde" olur } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Çalışma Anında Oluşturulan Button a Görev Atamak Bu makalede çalışma anında oluşturduğumuz button a tıkladığımızda, mesaj yazdıracağız. Aşağıdaki şekli inceleyin. private void Form1_Load(object sender, EventArgs e) { Button yenibuton = new Button(); yenibuton.Size=new System.Drawing.Size(100, 30); yenibuton.Location = new Point(10, 10); yenibuton.Text = "&Tıkla"; this.AcceptButton = yenibuton; this.Controls.Add(yenibuton); yenibuton.Click += new System.EventHandler(yenibuton_Click); } private void yenibuton_Click(object sender, EventArgs e) { MessageBox.Show("Çalışma anında oluşturduğunuz butona tıkladınız... "); } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Çalışma Anında PictureBox Oluşturmak Çalışma anında picturebox oluşturup, resim yükleyeceğiz. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { PictureBox picture = new PictureBox(); picture.SetBounds(10, 10, 150, 150);//location ve size belirleme this.Controls.Add(picture); picture.Image = Image.FromFile("C:\\img17.jpg"); picture.SizeMode=PictureBoxSizeMode.StretchImage; /* Birden fazla picturebox oluşturmak için private PictureBox[] picturebox = new PictureBox[10]; for (int i = 1; i < 11; i++) { picturebox[i] = new PictureBox(); picturebox[i].Name = "picturebox"+i.ToString (); picturebox[i].SetBounds(10, 10, 150, 150);//location ve size belirleme this.Controls.Add(picturebox[i]); } */ } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Label de Kayan Yazı Bu örneğimizde Label de kayan yazıya bakacağız. Formunuza 1 adet Label ve Timer nesnesi ekleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { timer1.Start(); label1.Text = "Bahadır ŞAHİN "; } private void timer1_Tick(object sender, EventArgs e) { label1.Text = label1.Text.Substring(1) + label1.Text[0].ToString(); } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
MesajBox taki Hangi Tuşa Basıldığını Öğrenmek Bu makalede mesajbox kutusundaki Evet, Hayır, İptal tuşlarından hangisine basıldığını öğreneceğiz. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { DialogResult sonuc= MessageBox.Show("Bir tuşa basınız...","Uyarı Mesajı",MessageBoxButtons.YesNoCancel,MessageBoxIcon.Asterisk); if (sonuc==DialogResult.Yes) { MessageBox.Show("EVET tuşuna basıldı"); } else if (sonuc==DialogResult.No) { MessageBox.Show("HAYIR tuşuna basıldı"); } else if(sonuc==DialogResult.Cancel) { MessageBox.Show("IPTAL tuşuna basıldı"); } } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Label de Yazı Kaydırma Labelin içerisinde yazdığımız stringi kaydıracağız. Formunuza 1 adet Label ve Timer ekleyin. Aşağıdaki kodları yazın. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { timer1.Start(); label1.Text = "Bahadır ŞAHİN"; } private void timer1_Tick(object sender, EventArgs e) { label1.Text = label1.Text.Substring(1) + label1.Text[0].ToString(); } } } //Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
İki Matris Çarpımı private void button1_Click(object sender, EventArgs e) { int[,] matris1 = new int[2, 2]; int[,] matris2 = new int[2, 2]; int j, l, k,i, sonuc = 0, boyut1, boyut2, ilkboyut1, ilkboyut2; matris1[0, 0] = Convert.ToInt32(textBox1.Text); matris1[0, 1] = Convert.ToInt32(textBox2.Text); matris1[1, 0] = Convert.ToInt32(textBox3.Text); matris1[1, 1] = Convert.ToInt32(textBox4.Text); matris2[0, 0] = Convert.ToInt32(textBox5.Text); matris2[0, 1] = Convert.ToInt32(textBox6.Text); matris2[1, 0] = Convert.ToInt32(textBox7.Text); matris2[1, 1] = Convert.ToInt32(textBox8.Text); ilkboyut1 = matris1.Rank;// ilk matrsin sutun sayisi ilkboyut2 = matris1.GetLength(0);// satir sayisi boyut1 = matris2.Rank;// ikinci matrsin sutun sayisi boyut2 = matris2.GetLength(0);// satir sayisi for (i = 0; i <= ilkboyut2 - 1; i++) { for (j = 0; j <= ilkboyut1 - 1; j++) { for (k = 0; j <= boyut1 - 1; k++) { sonuc = sonuc + matris1[i,j] * matris2[j,i]; } } } textBox9.Text = sonuc.ToString(); } Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
TrackBar ile Formunuzun Arka Plan Rengini Değiştirin TrackBar kullanarak formumuzun arka plan rengini değiştireceğiz. Formunuza 3 adet TrackBar ekleyin. Aşağıdaki şekli inceleyin. public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { this.BackColor = Color.FromArgb(trackBar1.Value, trackBar2.Value, trackBar3.Value); trackBar1.Maximum = 255; trackBar2.Maximum = 255; trackBar3.Maximum = 255; } private void trackBar1_Scroll(object sender, EventArgs e) { this.BackColor = Color.FromArgb(trackBar1.Value, trackBar2.Value, trackBar3.Value); } private void trackBar2_Scroll(object sender, EventArgs e) { trackBar1_Scroll(sender, e); } private void trackBar3_Scroll(object sender, EventArgs e) { trackBar1_Scroll(sender, e); } Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Media Play Uygulama Formunuza 4 adet Button ve 1 adet TextBox ekleyin. Aşağıdaki şekli inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.IO; using System.Windows.Forms; using System.Runtime.InteropServices; namespace WindowsApplication1 { public partial class Form1 : Form { [DllImport("winmm.dll")] private static extern long mciSendString(string strCommand, StringBuilder strReturn, int iReturnLength, IntPtr hwndCallback); public string Pcommand; public bool isOpen; public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { } private void button1_Click(object sender, EventArgs e) { openFileDialog1.Filter = "Media Dosya(.mpg,.dat,.avi,.wmv,.wav,.mp3)\|.wav;.mp3;.mpg;.dat;.avi;.wmv"; openFileDialog1.ShowDialog(); if (openFileDialog1.FileName != "") textBox1.Text = openFileDialog1.FileName; } private void button2_Click(object sender, EventArgs e) { Pcommand = "Aç \"" + textBox1.Text + "\" tip mpegvideo Media Dosyaları"; mciSendString(Pcommand, null, 0, IntPtr.Zero); isOpen = true; Play(true); } private void button3_Click(object sender, EventArgs e) { Pcommand = "Media Dosyasını Kapat"; mciSendString(Pcommand, null, 0, IntPtr.Zero); isOpen = false; } private void button4_Click(object sender, EventArgs e) { Application.Exit(); } public void Play(bool loop) { if (isOpen) { Pcommand = "Media Dosyasını Oynat"; if (loop) Pcommand += " REPEAT"; mciSendString(Pcommand, null, 0, IntPtr.Zero); } } } } //Bir sonraki makalede buluşmak üzere. Bahadır
Taskmanager Bilgilerinin Gösterilmesi Formunuza File > New Project > ConsoleApplication ı ekleyin. Ayrıca formunuza using System.Diagnostics; i ekleyin. Aşağıdaki şekli inceleyin. namespace ConsoleApplication1 { class Program { static void Main(string[] args) { Process[] processes = Process.GetProcesses(); for (int i = 0; i < processes.Length; i++) { Console.WriteLine("Id: " + processes[i].Id.ToString()); Console.WriteLine("ProcessName: " + processes[i].ProcessName); Console.WriteLine("MainWindowTitle: " + processes[i].MainWindowTitle); Console.WriteLine("StartTime: " + processes[i].StartTime.ToString()); Console.WriteLine("UserProcessorTime: " + processes[i].UserProcessorTime.ToString()); Console.WriteLine("Responding: " + processes[i].Responding.ToString()); Console.WriteLine(""); } Console.ReadLine(); } } } //Bir sonraki makalede görüşmek üzere. Bahadır
Ses Ayarı Denetimi Bu örnekte işletim sisteminin ses denetimi kısmını çalıştıracağız. private void button1_Click(object sender, EventArgs e) { try { System.Diagnostics.Process.Start("c:\\windows\\system32\\Sndvol32.exe"); } catch (Exception ex) { } } //Bir sonraki makalede görüşmek üzere. Bahadır
VScrollBar, HScrollBar Kullanarak Form Boyutunu Değiştirme Bu örneğimizde VScrollBar, HScrollBar kullanarak formumuzun yatay ve dikey boyutlarını değiştireceğiz. Aşağıdaki şekilleri incdeleyin. private void Form1_Load(object sender, EventArgs e) { hScrollBar1.Minimum = 300; hScrollBar1.Maximum = 1000; hScrollBar1.SmallChange = 1; hScrollBar1.LargeChange = 50; vScrollBar1.Minimum = 300; vScrollBar1.Maximum = 1000; vScrollBar1.SmallChange = 1; vScrollBar1.LargeChange = 50; this.Text = "Boyut(" + this.Width + "," + this.Height + ")"; } private void hScrollBar1_Scroll(object sender, ScrollEventArgs e) { this.Width = Convert.ToInt32(hScrollBar1.Value); this.Text = "Boyut(" + Convert.ToInt32(hScrollBar1.Value) + "," + Convert.ToInt32(vScrollBar1.Value) +")"; } private void vScrollBar1_Scroll(object sender, ScrollEventArgs e) { this.Height = Convert.ToInt32(vScrollBar1.Value); this.Text = "Boyut(" + Convert.ToInt32(hScrollBar1.Value) + "," + Convert.ToInt32(vScrollBar1.Value) + ")"; } //Bir sonraki makalede buluşmak üzere. Bahadır
İki Sayı Arasındaki Sayıların Toplamı İki sayıda dahil olmak üzere aradaki sayıların toplamını bulacağız. Aşağıdaki şekli inceleyin. private void button1_Click(object sender, EventArgs e) { int x = Convert.ToInt32(textBox1.Text); int y = Convert.ToInt32(textBox2.Text); int sonuc = 0; for (int i = x; i <= y; i++) { sonuc += i; } MessageBox.Show("İki Sayı Arası Toplam:" + sonuc.ToString(), "Sonuç"); } //Bir sonraki makalede buluşmak üzere. Bahadır
Faktoriyel Hesaplama Bu örnekte faktoriyel hesaplamaya bakacağız. InputBox tan girilen sayı aralığında faktoriyel hesabı yapacağız. InputBox için; İlk önce Solution Explorer a sağ tıklayıp Add Reference kısmından Microsoft.VisualBasic i ekleyin. Aşağıdaki şekilleri inceleyin. private void Form1_Load(object sender, EventArgs e) { label1.Text = "Faktoriyel Hesaplama"; } private void button1_Click(object sender, EventArgs e) { int i, j, faktoriyel; Int32 XPos = ((SystemInformation.WorkingArea.Width / 2) - 200); Int32 YPos = ((SystemInformation.WorkingArea.Height / 2) - 100); string sayi1 = Microsoft.VisualBasic.Interaction.InputBox("1.Sayıyı Giriniz...", "Faktoriyel Hesaplama ", "0", XPos, YPos); string sayi2 = Microsoft.VisualBasic.Interaction.InputBox("2.Sayıyı Giriniz...", "Faktoriyel Hesaplama ", "", XPos, YPos); for (i = Convert.ToInt32(sayi1); i <= Convert.ToInt32(sayi2); i++) { faktoriyel = 1; for (j = 1; j <= i; j++) { faktoriyel = faktoriyel * j; this.Text = Convert.ToString(faktoriyel); label1.Text = sayi1 + "-" + sayi2 + "Sayı Aralığında: " + "Hesaplanan Değer: " + faktoriyel; } } } //Bir sonraki makalede buluşmak üzere. Bahadır
Parse( ) Metodu Parse() Metodu Parse() metodu string bilgiler sayısal bilgiye dönüştürülmek istendiğinde kullanılmaktadır. Değişik türdeki bilgiler Convert sınıfının ilgili metotları ile String e çevrilirken istenildiği gibi biçimlendirilmektedir. Bazen bu işlemin tersine gerek duyulur. Örneğin bir TextBox a yazıp biçimlendirdiğiniz string bilgiyi sayısal bilgiye dönüştürmek isteyebilirsiniz. Bu dönüştürme işlemini .NET Framework ile gelen Int16, Int32, Boolean vb. gibi sınıfların Parse() metotlarından yararlanarak yapabilirsiniz. Parse() metodunun en basit şekli ile nasıl kullanıldığını aşağıda görebilirsiniz. int Sayi; string Str; Str = "123"; Sayi = System.Int16.Parse(Str); Bu kodda önce Integer ve String 2 değişken tanımladım ve String değişkene yalnızca rakamlardan meydana gelen bilgi aktardım. Ardından bu String değişkeni Int16 sınıfının Parse() metoduna parametre olarak verip Integer değişkene aktardım. String bilgide küçük bir değer saklandığı için Int16 sınıfının Parse() metodunu kullandım. String bilgide büyükçe bir sayı saklanıyor olsaydı bu kez Int32 sınıfının Parse() metodunu kullanmam gerekirdi. String bilgileri Parse() metodu ile dönüştürürken sayısal bilginin tipine ve büyüklüğüne göre sınıf seçimini yapmalısınız. Örneğin String değişkende kesirli sayı olarak değerlendirilecek bilgi varken Int16 veya Int32 sınıflarının Parse() metodu ile dönüştürme yaparsanız hata meydana gelir. Aşağıda verilen kod işletildiğinde String değişkenin içeriği Parse() metodu ile Single bilgiye dönüştürülür. Single Sayi; string Str; Str = "123,456"; Sayi = System.Single.Parse(Str); textBox1.Text = Convert.ToString(Sayi); Single sınıfının Parse() metodu kendisine parametre olarak verilen String bilgiyi kayıpsız olarak Single tipine dönüştürür. Şimdi ise üçer hanelere ayrılmış tamsayı şeklinde düzenlenmiş bilgi içeren String değişkenin içeriğini Parse metodu ile Long değişkene aktaracağım. long Sayi; string Str = "1.234.567"; Sayi = System.Int32.Parse(Str); İlk bakışta Parse() metodunun dönüştürmeyi başarılı bir şekilde yapacağı beklenir. Ancak bu şekilde üçer hane ayırıcı olarak kullanılabilecek karakter içeren bilgiyi Parse() metodu ile dönüştürmek istiyorsanız Parse() metodunun 2. parametresinde bunu belirtmeniz gerekir. long Sayi; string Str = "1.234.567"; Sayi = System.Int32.Parse(Str, System.Globalization.NumberStyles.AllowThousands); Bu örneği denediğimde kullandığım bilgisayarda ondalık ayırıcı karakter olarak virgül(,), binlik basamak ayırıcı karakter olarak nokta(.) geçerliydi. Bu şartlarda Parse() metodu aşağıdaki gibi kullanılırsa hata meydana gelir. long Sayi; string Str = "1,234,567"; Sayi = System.Int32.Parse(Str, System.Globalization.NumberStyles.Any); textBox1.Text = Convert.ToString(Sayi); Bu sırada kullandığım bilgisayarda üçer hane ayırıcı karakter olarak virgül(,) geçerli olsaydı hata meydana gelmezdi. Bu gibi durumlarda Parse() metodunun 3. parametresi ile bölgesel ayar seçimini yapabilirsiniz. long Sayi; string Str = "1,234,567"; System.Globalization.CultureInfo ulke; ulke = new System.Globalization.CultureInfo("en-US"); Sayi = System.Int32.Parse(Str, System.Globalization.NumberStyles.Any, ulke); textBox1.Text = Convert.ToString(Sayi); Parse() metoduna 3. parametre olarak vermek üzere System.Globalization.CultureInfo tipinde bir değişken tanımladım. Parametre olarak ?en-US? kullandığım için Parse() metoduna 1. parametre olarak verdiğim bilgi hatasızca Long tipine dönüştürüldü. Şimdi ise örnek olması için 16 tabanlı bir sayıya çevrilebilecek string bilgiyi Parse() metoduna parametre olarak vereceğim. Bu amaçla hazırladığım örneği aşağıda görebilirsiniz. long Sayi; string Str = "FFFF"; Sayi = System.Int32.Parse(Str, System.Globalization.NumberStyles.HexNumber); textBox1.Text = Convert.ToString(Sayi); // TextBox a 65535 yazılır. Parse sınıfının ToString() metodu ile kolayca 10 tabanlı sayıları 16 tabanlı olarak String bilgiye dönüştürülebilir. Bu işlemin nasıl yapıldığını aşağıda görebilirsiniz. int sayi=255; string str; str = Convert.ToString(sayi, 16); textBox1.Text = str;
TextBox taki Türkçe Karakterleri Değiştirmek Bu örneğimizde TextBoxtaki Türkçe karakterleri İngilizce karakterler ile değiştireceğiz. Ör: Ş-S, Ğ-G, ı-i vb. Formunuza 1 adet TextBox, 12 adet CheckBox ekleyin. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { } private void karakter() { if (checkBox1.Checked == true) textBox1.Text = textBox1.Text.Replace(‘Ş‘, ‘S‘); if (checkBox2.Checked == true) textBox1.Text = textBox1.Text.Replace(‘ş‘, ‘s‘); if (checkBox3.Checked == true) textBox1.Text = textBox1.Text.Replace(‘İ‘, ‘I‘); if (checkBox4.Checked == true) textBox1.Text = textBox1.Text.Replace(‘ı‘, ‘i‘); if (checkBox5.Checked == true) textBox1.Text = textBox1.Text.Replace(‘Ğ‘, ‘G‘); if (checkBox6.Checked == true) textBox1.Text = textBox1.Text.Replace(‘ğ‘, ‘g‘); if (checkBox7.Checked == true) textBox1.Text = textBox1.Text.Replace(‘Ç‘, ‘C‘); if (checkBox8.Checked == true) textBox1.Text = textBox1.Text.Replace(‘ç‘, ‘c‘); if (checkBox9.Checked == true) textBox1.Text = textBox1.Text.Replace(‘Ü‘, ‘U‘); if (checkBox10.Checked == true) textBox1.Text = textBox1.Text.Replace(‘ü‘, ‘u‘); if (checkBox11.Checked == true) textBox1.Text = textBox1.Text.Replace(‘Ö‘, ‘O‘); if (checkBox12.Checked == true) textBox1.Text = textBox1.Text.Replace(‘ö‘, ‘o‘); } private void checkBox1_CheckedChanged(object sender, EventArgs e) { karakter(); } private void checkBox2_CheckedChanged(object sender, EventArgs e) { karakter(); } private void checkBox3_CheckedChanged(object sender, EventArgs e) { karakter(); } private void checkBox4_CheckedChanged(object sender, EventArgs e) { karakter(); } private void checkBox5_CheckedChanged(object sender, EventArgs e) { karakter(); } private void checkBox6_CheckedChanged(object sender, EventArgs e) { karakter(); } private void checkBox7_CheckedChanged(object sender, EventArgs e) { karakter(); } private void checkBox8_CheckedChanged(object sender, EventArgs e) { karakter(); } private void checkBox9_CheckedChanged(object sender, EventArgs e) { karakter(); } private void checkBox10_CheckedChanged(object sender, EventArgs e) { karakter(); } private void checkBox11_CheckedChanged(object sender, EventArgs e) { karakter(); } private void checkBox12_CheckedChanged(object sender, EventArgs e) { karakter(); } } } //Bir sonraki makalede görüşmek üzere. Bahadır
TextBox a Yazılan Yazıyı Hizalama Bu örnekte TextBox a yazılan yazıyı hizalayacağız. Aşağıdaki şekilleri inceleyin. private void Form1_Load(object sender, EventArgs e) { textBox1.Text = "Merhaba Dünya...Bahadır"; rb1.Checked = true; } private void rb1_CheckedChanged(object sender, EventArgs e) { textBox1.TextAlign = HorizontalAlignment.Left; } private void rb2_CheckedChanged(object sender, EventArgs e) { textBox1.TextAlign = HorizontalAlignment.Center; } private void rb3_CheckedChanged(object sender, EventArgs e) { textBox1.TextAlign = HorizontalAlignment.Right; } //Bir sonraki makalede görüşmek üzere. Bahadır
Otomatik Key Kodu Üretmek 25 karakterlik otomatik key kodları üreteceğiz. İsteğe bağlı olarak bu sayıyı azaltabilir veya artırabilirsiniz. Formunuza 1 adet textbox ve button ekleyin. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { //25 karakterlik key kodu üreteceğiz. KeyKodu(25); } private string KeyKodu(int codeLength) { System.Text.StringBuilder sb = new System.Text.StringBuilder(); System.Random nesneRandom = new System.Random(); string[] strKarakter = {"A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z", "1", "2", "3", "4", "5", "6", "7", "8", "9", "0", "a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w ", "x", "y", "z"}; int maxRand = strKarakter.GetUpperBound(0); for (int i = 0; i <= codeLength - 1; i++) { int rndNumara = nesneRandom.Next(maxRand); sb.Append(strKarakter[rndNumara]); } textBox1.Text = Convert.ToString(sb); //textbox1 deki stringin arasına "-" koyuyoruz. string veri = textBox1.Text; string str = veri.Insert(5, "-"); string str2 = str.Insert(11,"-"); string str3 = str2.Insert(17, "-"); string str4 = str3.Insert(23, "-"); textBox1.Text = str4; return Convert.ToString(sb); } private void Form1_Load(object sender, EventArgs e) { textBox1.ReadOnly = true; textBox1.Font = new Font("Arial",12,FontStyle.Bold); button1.Text = "Key Numarası Üret"; button1.Font = new Font("Arial", 12, FontStyle.Bold); } } } //Bir sonraki makalede görüşmek üzere. Bahadır
Formun Arka Planına Bitmap Resim Ekleme Bu örnekte formun arka planına bitmap resim ekleyeceğiz. Formunuzun FormBorderStyle özelliğini None seçin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.Drawing.Drawing2D; namespace WindowsApplication1 { public partial class Form1 : Form { Bitmap resim = new Bitmap("resim.jpg"); public Form1() { InitializeComponent(); this.Paint += new System.Windows.Forms.PaintEventHandler(Form1_Paint); } private void Form1_Paint(object sender, PaintEventArgs e) { Graphics g = e.Graphics; Rectangle mainRect = new Rectangle(0, 0, 695, 278); Region mainRegion = new Region(mainRect); e.Graphics.SetClip(mainRegion, CombineMode.Replace); GraphicsPath myPath = new GraphicsPath(); Region ExcludeRegion3 = new Region(myPath); e.Graphics.ExcludeClip(ExcludeRegion3); e.Graphics.DrawImage(resim, 0, 0, 495,278); e.Graphics.ResetClip(); } private void Form1_Load(object sender, EventArgs e) { this.Size = new System.Drawing.Size(500,280); } } } //Bir sonraki makalede görüşmek üzere. Bahadır
Dosya ve Klasör Kontrolü Bu makalemizde C:\ sürücüsünde adı geçen dosya ve klasör mevcut mu? Eğer yok ise otomatik olarak oluşturacağız. İlk önce; using System.IO; i ekleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.IO; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { } private void button1_Click(object sender, EventArgs e) { //dosya kontrol string str; str = "C:\\deneme.text"; if (File.Exists(str) == false) { File.Create(str); MessageBox.Show(str + " oluşturuldu", "Uyarı"); } else if(File.Exists(str) == true) { MessageBox.Show(str + " dosyası zaten var.", "Uyarı"); } } private void button2_Click(object sender, EventArgs e) { //klasor kontrol string str; str = "C:\\dosyalar"; if (Directory.Exists(str) == false) { Directory.CreateDirectory(str); MessageBox.Show(str + " oluşturuldu", "Uyarı"); } else if(Directory.Exists(str) == true) { MessageBox.Show(str + " dosyası zaten var.", "Uyarı"); } } } } //Bir sonraki makalede görüşmek üzere. Bahadır.
Grafik Uygulaması Örnek Bu örnekte Windows System Iconlarını graphics metodu ile C:\ dizinine icon.bmp olarak kaydedeceğiz. Formunuza 1 adet button ve pictureBox ekleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { Graphics grafik; Bitmap bit = new Bitmap(50, 50); grafik = Graphics.FromImage(bit); grafik.DrawIconUnstretched(SystemIcons.Error, new Rectangle(10, 10, SystemIcons.WinLogo.Width, SystemIcons.WinLogo.Height)); pictureBox1.Image = bit; bit.Save("C:\\icon.bmp"); } } } //Bir sonraki makalede görüşmek üzere. Bahadır
Bilgisayarınızın Kaç Saat Açık Olduğunu Öğrenmek Arkadaşlar bu örnekte, bilgisayarımızın ne zamandan beri açık olduğunu öğreneceğiz. Bunun için System.Environment.TickCount özelliğinden faydalanacağız. Formunuza 1 adet timer ekleyin. Aşağıdaki şekli inceleyiniz. private void Form1_Load(object sender, EventArgs e) { timer1.Enabled = true; timer1.Interval = 1000; } private void timer1_Tick(object sender, EventArgs e) { string ad, versiyon; double sure; int dakika; sure = System.Environment.TickCount; //bilgisayar adı öğrenme ad = System.Environment.MachineName; //versiyon öğrenme versiyon = Convert.ToString(System.Environment.OSVersion); //dakika cinsinden dakika = Convert.ToInt32((sure / 1000) / 60); //saat cinsinden sure = (((sure / 1000) / 3600)); string saat = sure.ToString("F"); label4.Text = ad; label5.Text = versiyon; label6.Text = ad + " adlı bilgisayarınız " + saat + " saattir açık bulunmakta. " + Environment.NewLine + "(" + dakika + " dakikadır açık)"; } //Bir sonraki makalede görüşmek üzere. Bahadır
Sayının Üssünü Almak Bu örnekte textbox a girilen sayının üssünü alacağız. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { int i; int j; int k; double sonuc; j=Convert.ToInt32(textBox1.Text); k=Convert.ToInt32(textBox2.Text); sonuc = 1; if (k > 0) { for (i = 1; i <= k; i++) { sonuc = sonuc * j; } if (k == 0) { sonuc = 1; } if (k < 0) { k = -k; for (i = 1; i <= k; i++) { sonuc = sonuc * j; } sonuc = 1 / sonuc; } MessageBox.Show("Sonuç=" + Convert.ToString(sonuc)); } } } } //Bir sonraki makalede görüşmek üzere. Bahadır
TextBox ta Telefon Formatında Yazmak TextBox a girilen rakamları telefon formatında göstereceğiz. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { string telefonno = "02121234567"; string str = telefonno.Insert(1, "-"); string str2 = str.Insert(5, "-"); textBox1.Text = str2; //Programı çalıştırdığımızda //textBox a girilen no 0-212-1234567 //şeklinde görülür. } } } //Bir sonraki makalede görüşmek üzere. Bahadır
PictureBox ta 3 Adımda Drag Drop İşlemi Temel olrak Drag&Drop işlemini basit bir örnek(form üzerindeki bir resmi belirlediğimiz panele sürükleyip bırakmak) üzerinden 3 adımda nasıl projelerimize adapte edebiliriz; Adım 1: PictureBox nesnesi bizim kaynağımız, Panel nesnesi ise hedefimiz. Adım 2: İlk önce PictureBox nesnemizi sürükleme(Drag) işlemine hazırlamalıyız. Bunun için; * PictureBox nesnesinin Mouse Down ve Mouse Move olaylarını eklemeliyiz. * Mouse Down olayında nesneye tıklandığı anki pozisyonunu saklamalıyız. * Mouse Move olayında ise nesnenin tıklandığını(Mouse Down olayı) ve sürükleme işlemi için belirlenen aralık dahilinde işlemin gerçekleştirilip gerçekleştirilmediğini kontrol etmeliyiz. * Eğer 3. adımda istediklerimiz gerçekleşmiş ise nesnenin DoDragDrop methodunu ClipBoard a kopyalanacak nesneyi ve efekt tipini belirterek çağırırız. private Point mouseDownLocation = Point.Empty; private void pictureBox1_MouseDown(object sender, MouseEventArgs e) { mouseDownLocation = new Point(e.X,e.Y); } private void pictureBox1_MouseMove(object sender, MouseEventArgs e) { if (e.Button == MouseButtons.Left) { Size dragBoxSize = SystemInformation.DragSize; if ((dragBoxSize.Width > Math.Abs(mouseDownLocation.X - e.X)) \|\| (dragBoxSize.Height > mouseDownLocation.Y - e.Y)) { pictureBox1.DoDragDrop(pictureBox1, DragDropEffects.Copy); } } } Adım 3: Sıra sürükleme işleminin gerçekleşeceği Panel kontrolu için gerekli işlemlerin gerçekleştirilmesine geldi. * İlk olarak nesnenin sürüklenen nesneleri kabul etmesi için AllowDrop özelliğini aktif hale getirmeliyiz. * Sürüklenecek olan (örnekte PictureBox) nesnenin DoDragDrop methoduna parametre olarak verilen efektin Panel kontrolünün Drag Enter ve Drag Over olaylarında geçerli olduğunu belirtmeliyiz. * ve artık nesnemizi sürükledikten sonra ClipBoard dan onu çağırıp Panel kontrolüne eklemeliyiz. Tabiki bu işlemi DragDrop olayı içinde gerçekleştireceğiz. Önemli bir nokta olarak, Panel kontrolüne sürükleyerek eklediğimiz PictureBox nesnesinin Location(pozisyonunu) belirtmez isek otomatik olarak Panel kontrolünün 0,0 noktasına yerleşecektir. Bunu engellemek içinde gene DragDrop olayı içinde sürükleme işleminin bittiği noktanın koordinatlarını tutmamız grekir ve tabiki bu noktayıda Panel in koordinat sistemine uyarlamalıyız. private void panel1_DragEnter(object sender, DragEventArgs e) { e.Effect = DragDropEffects.Copy; } private void panel1_DragOver(object sender, DragEventArgs e) { e.Effect = DragDropEffects.Copy; } private void panel1_DragDrop(object sender, DragEventArgs e) { Int32 dropX = e.X; Int32 dropY = e.Y; Point dropLocation = new Point(dropX,dropY); dropLocation = panel1.PointToClient(dropLocation); PictureBox pb = e.Data.GetData(typeof(PictureBox)) as PictureBox; panel1.Controls.Add(pb); pb.Location=dropLocation; } tüm işlem bu. NOT: Bu makale M. Genç adlı yazardan alıntı olarak alınmıştır
Yeni Yıla Kalan Günü Hesaplama using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { DateTime yeniyıl =new DateTime(2007, 12, 31); DateTime kalangun =System.DateTime.Now; while (kalangun < yeniyıl) { MessageBox.Show(yeniyıl.DayOfYear - kalangun.DayOfYear + " gün sonra yeni yıla girilecek ..."); kalangun = kalangun.AddDays(1); } } } } //Bir sonraki makalede görüşmek üzere. Bahadır
TextBox a Sadece Sayı Girebilme Bu örnekte textBox nesnesine sadece sayı girişi yapılacak. String girilemiyecek. String girilmeye çalışıldığında bizi uyaracak. textBox ın KeyPress olayına aşağıdaki kodları yazacağız. Public Form1() kısmına textBox1.KeyPress += new System.Windows.Forms.KeyPressEventHandler(textBox1_KeyPress); i eklemeyi unutmayın. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); textBox1.KeyPress += new System.Windows.Forms.KeyPressEventHandler(textBox1_KeyPress); } private void textBox1_KeyPress(object sender, System.Windows.Forms.KeyPressEventArgs e) { if ((e.KeyChar) == 8) { e.Handled = false; return; } if ((e.KeyChar) < 48 \| (e.KeyChar) > 57) { e.Handled = true; MessageBox.Show("Sadece Sayı Girebilirsiniz", "Dikkat!!", MessageBoxButtons.OK); return; } } } } //Bir sonraki makalede görüşmek üzere. Bahadır
Seçili Dosyanın Genel Özelliklerinin Alınması Bu makalede openFileDialog ile seçilen dosyanın uzantısını, dosya yolunu, boyutunu, oluşturulma tarihi gibi genel özelliklerini alacağız. Formunuza 5 adet label, textBox, 1 adet button ve openFileDialog ekleyin. Şekil1 i inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; using System.IO; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void textBox4_TextChanged(object sender, EventArgs e) { } private void Form1_Load(object sender, EventArgs e) { this.Text = "Dosya Özellikleri...Bahadirsa"; this.MaximizeBox = false; this.Location = new Point(250, 200); this.Size = new System.Drawing.Size(274, 235); } private void btnTikla_Click(object sender, EventArgs e) { openFileDialog1.Title = "Dosya Aç-Bahadır ŞAHİN"; openFileDialog1.InitialDirectory = "C:\\"; openFileDialog1.Filter = "Tüm Dosyalar(.)\|."; if (openFileDialog1.ShowDialog() == System.Windows.Forms.DialogResult.OK) { string path = openFileDialog1.FileName; FileInfo dosya = new System.IO.FileInfo(path); float str; str = ((dosya.Length) / 1000); txtName.Text =dosya.Name.ToUpper(); txtUzanti.Text =dosya.Extension.ToUpper(); txtLength.Text =str.ToString() + " KB."; txtDate.Text = dosya.CreationTime.ToString(); txtAdres.Text =dosya.DirectoryName; } } } } //Bir sonraki makalede görüşmek üzere. Bahadır
Ekran Çözünürlüğünü Almak Bu örnekte Ekran Çözünürlüğünü alıp, MSN deki gibi formu timer nesnesinden faydalanarak, sağ alt köşede aşağı doğru kaymasını sağlayacağız. Formunuza 1 adet timer nesnesi ekleyin ve intervalini 10 yapın. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { int k; public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { this.Size = new System.Drawing.Size(175, 150); int i, j; //Ekran Çözünürlük Boyutunu alıyoruz i=System.Windows.Forms.Screen.PrimaryScreen.Bounds.Width; j=System.Windows.Forms.Screen.PrimaryScreen.Bounds.Height; this.Text = i + "," + j; this.Location = new Point(System.Windows.Forms.Screen.PrimaryScreen.Bounds.Width - this.Width, System.Windows.Forms.Screen.PrimaryScreen.Bounds.Height - this.Height); timer1.Enabled = true; timer1.Interval = 10; } private void timer1_Tick(object sender, EventArgs e) { k = k + 1; this.Location = new Point(System.Windows.Forms.Screen.PrimaryScreen.Bounds.Width - this.Width, System.Windows.Forms.Screen.PrimaryScreen.Bounds.Height - this.Height+k); } } } //Bir sonraki makalede görüşmek üzere. Bahadır
statusStrip te ProgressBar Kullanımı İlk önce formunuza 1 adet statusStrip ve button ekleyin. Daha sonra statusStrip te tıklayın ve 1 adet toolStripProgressBar1 ekleyin. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { toolStripProgressBar1.Size = new System.Drawing.Size(200, 20); } private void button1_Click(object sender, EventArgs e) { int i; toolStripProgressBar1.Minimum = 0; toolStripProgressBar1.Maximum = 100; for (i = toolStripProgressBar1.Minimum; i < toolStripProgressBar1.Maximum;i++ ) { toolStripProgressBar1.Value = i; System.Threading.Thread.Sleep(30); } } } } //Bir sonraki makalede görüşmek üzere. Bahadır
if Döngüsü, MessageBox Örnek Bu yazımızda, if döngüsüne ve MessageBox kullanımına basit bir örnek vereceğiz.Formunuza 3 adet textBox ve 1 adet button ekleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { int a, b, c; if (textBox1.Text == "" \|\| textBox2.Text == "") { MessageBox.Show("TextBox a lütfen rakam giriniz...", this.Text, MessageBoxButtons.OK, MessageBoxIcon.Error); } else { a = (int.Parse(textBox1.Text)); b = (int.Parse(textBox2.Text)); c = a + b; textBox3.Text = c.ToString(); } } } } //Bir sonraki makalede görüşmek üzere. Bahadır
Form Başlığında Kayan Başlık Bu örnekte Form başlığında kayan yazı örneğini gerçekleştireceğiz. Formunuza 1 adet Timer ekleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { this.Text = "Kayan Yazı Örnek...Bahadır "; timer1.Interval = 100; timer1.Enabled = true; } private void timer1_Tick(object sender, EventArgs e) { int i; string str; str = ""; for ( i =1 ; i < this.Text.Length; i+=1 ) { str = str + this.Text[i]; } this.Text = str + this.Text[0]; } } }
Dosya Yolunu Açmak Bu örneğimizde dosyalarımızın bulunduğu klasörü açacağız. Bunun için process metodundan faydalanacağız. Bu örnekte Windows klasörünü açacağız. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { System.Diagnostics.Process yeniProcess; yeniProcess = System.Diagnostics.Process.Start("Explorer.exe ", "C:\\Windows"); yeniProcess.CloseMainWindow(); yeniProcess.Close(); } } } //Bir sonraki makalede buluşmak üzere. Bahadır
folderBrowserDialog Bu makalemizde folderBrowserDialog nesnesini inceleyeceğiz. Formunuza 1 adet folderBrowserDialog, label ve button ekleyin. Aşağıdaki şekilleri inceleyin. folderBrowserDialog nesnesi ile dizinleri ve alt klasörleri açabilir buna göre uygulamalar geliştirebiliriz. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void btnAc_Click(object sender, EventArgs e) { string dir; folderBrowserDialog1.ShowNewFolderButton = false; folderBrowserDialog1.Description = "Dosyalarım...Bahadır"; folderBrowserDialog1.RootFolder = Environment.SpecialFolder.Desktop; folderBrowserDialog1.ShowDialog(); dir = folderBrowserDialog1.SelectedPath; label1.Text = "Seçilen Dosya Yolu: " + dir; } private void Form1_Load(object sender, EventArgs e) { btnAc.Text = "Klasöre Gözat"; label1.Text = ""; } } } //Bir sonraki makalede görüşmek üzere. Bahadır
Form Soldurma Formunuza 1 adet button ekleyin. Aşağıdaki kodları yazın. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { double deger; for (deger = 0; deger >= 1 - 0.1; deger += +0.1) { System.Threading.Thread.Sleep(50); Application.DoEvents(); this.Opacity = deger; this.Refresh(); this.Opacity = 100; } } private void button1_Click(object sender, EventArgs e) { double deger; for (deger = 3; deger >= 0 + 0.2; deger += -0.2) { System.Threading.Thread.Sleep(50); Application.DoEvents(); this.Opacity = deger; this.Refresh(); } Environment.Exit(0); } } } //Bir sonraki makalede buluşmak üzere. Bahadır
Döküman Yazdırma Bu örneğimizde richTextBox ımızdaki stringi yazdıracağız. Formunuza 1 adet printDocument,r,chTextBox ve Button ekleyin. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void printDocument1_PrintPage(object sender, System.Drawing.Printing.PrintPageEventArgs e) { e.Graphics.DrawString(richTextBox1.Text, new Font("Times New Roman", 12, FontStyle.Regular), Brushes.Black, 100, 100); } private void Form1_Load(object sender, EventArgs e) { this.Text = "Döküman Yazdırma"; this.MaximizeBox = false; } private void button1_Click(object sender, EventArgs e) { printDocument1.Print(); } } } //Bir sonraki makalede görüşmek üzere. Bahadır
Google da Arama Bu örneğimizde Google da arama konudsunu göreceğiz. Formunuza 1 adet textbox, button ve webBrowser ekleyin. textbox ın name ini txtAra, buttonu btnAra yapın. Aşağıdaki şekili inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void btnAra_Click(object sender, EventArgs e) { webBrowser1.Navigate("http://www.google.com.tr/search?hl=tr&q=" + txtAra.Text + ("&meta=")); } private void Form1_Load(object sender, EventArgs e) { this.Text = "Google da Arama"; this.MinimizeBox = false; this.MaximizeBox = false; this.Location = new Point(250, 150); } } } //Bir sonraki makalede görüşmek üzere. Bahadır
MS Office Uygulamalarını Açma Bu örneğimizde Process metodu ile MS Office e ait Word,Excel, Access vb... uygulamalarını aşağıdaki kod ile açacağız. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { System.Diagnostics.Process.Start("Notepad.exe"); } private void button2_Click(object sender, EventArgs e) { System.Diagnostics.Process.Start("Winword.exe"); } private void button3_Click(object sender, EventArgs e) { System.Diagnostics.Process.Start("Excel.exe"); } private void button4_Click(object sender, EventArgs e) { System.Diagnostics.Process.Start("MSaccess.exe"); } private void button5_Click(object sender, EventArgs e) { System.Diagnostics.Process.Start("Powerpnt.exe"); } private void button6_Click(object sender, EventArgs e) { System.Diagnostics.Process.Start("Outlook.exe"); } private void button7_Click(object sender, EventArgs e) { System.Diagnostics.Process.Start("MSPub.exe"); } private void button8_Click(object sender, EventArgs e) { System.Diagnostics.Process.Start("InfoPath.exe"); } private void Form1_Load(object sender, EventArgs e) { this.Text = "Ofis Kısayolları"; this.MaximizeBox = false; } } } //Bir sonraki makalede görüşmek üzere...Bahadır
TreeView Node daki Bilgileri TextBox a Aktarma Bu makale treeView nesnesine node lar oluşturulacak ve bu nodlardaki veriler textboxlara aktarılacak. Formumuzda; public class DataTreeNode : TreeNode ve public class Site class ları oluşturacağız. Forma 1 adet treeView, 4 adet textBox eklenecek. Aşağıdaki şekildeki gibi formunuzu oluşturun. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } public class DataTreeNode : TreeNode { private object data; public DataTreeNode(object data) : base(data.ToString()) { this.data = data; } public object Data { get { return data; } } } public class Site { private string kategori; private string adres; private string kurucuad; private string aciklama; public Site(string kategori, string adres, string kurucuad, string aciklama) { this.kategori = kategori; this.adres = adres; this.kurucuad = kurucuad; this.aciklama = aciklama; } public string Kategori { get { return kategori; } set { kategori = value; } } public string Adres { get { return adres; } set { adres = value; } } public string Kurucuad { get { return kurucuad; } set { kurucuad = value; } } public string Aciklama { get { return aciklama; } set { aciklama = value; } } public override string ToString() // <------ DataTreeNode sınıfında temel constructora gönderilecek ToString() işte burası. { return kategori + " " + adres; } } private void Form1_Load(object sender, EventArgs e) { Site sitebilgi = new Site("Site", " ", " ", ""); DataTreeNode node1 = new DataTreeNode(sitebilgi); treeView1.Nodes.Add(node1); sitebilgi = new Site("Programlama", "http://bahadirsam.somee.com", "Bahadır ŞAHİN", "vc#.net,visualbasic.net,asp.net,ado.net "); DataTreeNode node2 = new DataTreeNode(sitebilgi); node1.Nodes.Add(node2); sitebilgi = new Site("Diğer", "http://ysa.somee.com", "Bahadır ŞAHİN", "Yapay Zeka, Ysa, Backpropagation"); DataTreeNode node3 = new DataTreeNode(sitebilgi); node1.Nodes.Add(node3); } private void treeView1_AfterSelect(object sender, TreeViewEventArgs e) { DataTreeNode node = (DataTreeNode)e.Node; // <--- Node DataTreeNode tipinde textBox1.DataBindings.Clear(); textBox2.DataBindings.Clear(); textBox3.DataBindings.Clear(); textBox4.DataBindings.Clear(); textBox1.DataBindings.Add("Text", node.Data, "Kategori"); textBox2.DataBindings.Add("Text", node.Data, "Adres"); textBox3.DataBindings.Add("Text", node.Data, "Kurucuad"); textBox4.DataBindings.Add("Text", node.Data, "Aciklama"); } } } //Bir sonraki makalede görüşmek üzere. Bahadır
Process ile Uygulamaların Exelerinin Çalıştırılması Formunuza 1 adet Process, label , 2 adet Button ve 3 adet radiobutton ekleyin. Process nesnesini kullanarak mspaint,notepad ve hesap makinesi uygulamalarını çalıştıracağız. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { if (radioButton1.Checked) { process1.StartInfo.FileName = "C:\\Windows\\notepad.exe"; process1.Start(); } else if (radioButton2.Checked) { process1.StartInfo.FileName = "C:\\Windows\\system32\\mspaint.exe"; process1.Start(); } else if (radioButton3.Checked) { process1.StartInfo.FileName = "C:\\Windows\\system32\\calc.exe"; process1.Start(); } label1.Text = "Son Durum: "+ process1.StartInfo.FileName + " uygulaması başlatıldı"; } private void button2_Click(object sender, EventArgs e) { process1.CloseMainWindow(); label1.Text = "Son Durum: " + process1.StartInfo.FileName + " uygulamasından çıkıldı."; } private void Form1_Load(object sender, EventArgs e) { this.Text = "Process Uygulaması...Bahadır"; this.MaximizeBox = false; } } } //Bir sonraki makalede görüşmek üzere...Bahadır
Tablodan Veri OKumak Bu örneğimizde oluşturacağımız tablodan veri okuyacağız. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { this.dataGridView1.RowTemplate.DefaultCellStyle.BackColor = Color.LightYellow; this.dataGridView1.RowTemplate.DefaultCellStyle.ForeColor = Color.Navy; this.dataGridView1.RowTemplate.DefaultCellStyle.Font = new Font("Verdana", 10, FontStyle.Regular); DataGridViewCellStyle columnHeaderStyle = new DataGridViewCellStyle() ; columnHeaderStyle.BackColor = Color.Aqua; columnHeaderStyle.ForeColor = Color.AliceBlue; columnHeaderStyle.Font = new Font("Verdana", 10, FontStyle.Bold); dataGridView1.ColumnHeadersDefaultCellStyle = columnHeaderStyle; dataGridView1.GridColor = Color.Black; DataTable tablo1=new DataTable("Customers"); string [] str1 = {"Bahadirsa", "xxxxx", "Muhendis", "Master", "Istanbul"}; string [] str2= {"Fatih", "Koç", "Muhendis", "Üniversite", "Istanbul"}; string [] str3= {"Haluk", "Akman", "Muhendis", "Üniversite", "Istanbul"}; string [] str4 = {"Ahmet", "Aydın", "Muhendis", "Üniversite", "Istanbul"}; string[] str5 = { "Kürşat", "Şahin", "Muhendis", "Üniversite", "Istanbul" }; try { DataColumn ad = new DataColumn("Ad"); ad.DataType = System.Type.GetType("System.String"); tablo1.Columns.Add(ad); DataColumn soyad = new DataColumn("Soyad"); soyad.DataType = System.Type.GetType("System.String"); tablo1.Columns.Add(soyad); DataColumn meslek = new DataColumn("Meslek"); meslek.DataType = System.Type.GetType("System.String"); tablo1.Columns.Add(meslek); DataColumn ogrenim = new DataColumn("Öğrenim"); ogrenim.DataType = System.Type.GetType("System.String"); tablo1.Columns.Add(ogrenim); DataColumn il = new DataColumn("İl"); il.DataType = System.Type.GetType("System.String"); tablo1.Columns.Add(il); tablo1.Rows.Add(str1); tablo1.Rows.Add(str2); tablo1.Rows.Add(str3); tablo1.Rows.Add(str4); tablo1.Rows.Add(str5); } catch { MessageBox.Show("Hata Oluştu...", "Hata"); } System.Data.DataSet ds = new System.Data.DataSet(); ds = new System.Data.DataSet(); ds.Tables.Add(tablo1); dataGridView1.DataSource = ds.Tables[0]; } } } //Bir sonraki makalede buluşmak üzere.Bahadır
vScrollBar ile Renk Yönetimi VScrollBar nesnesini kullanarak formumuzun arkaplan rengini değiştireceğiz. İlk önce formunuza 3 adet vScrollBar nesnesi ekleyin. Aşağıdaki şekilleri inceleyin. Önemli Not:formunuzun InitializeComponent(); kısmına this.vScrollBar1.ValueChanged += new System.EventHandler(this.vScrollBar1_ValueChanged); this.vScrollBar2.ValueChanged += new System.EventHandler(this.vScrollBar2_ValueChanged); this.vScrollBar3.ValueChanged += new System.EventHandler(this.vScrollBar3_ValueChanged); kodlarını eklemeyi unutmayın...Bahadır using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); this.vScrollBar1.ValueChanged += new System.EventHandler(this.vScrollBar1_ValueChanged); this.vScrollBar2.ValueChanged += new System.EventHandler(this.vScrollBar2_ValueChanged); this.vScrollBar3.ValueChanged += new System.EventHandler(this.vScrollBar3_ValueChanged); } private void Form1_Load(object sender, EventArgs e) { label1.Text = "Değer1: 0"; label2.Text = "Değer2: 0"; label3.Text = "Değer3: 0"; this.Text = "vScrollBar Renk Yönetimi"; this.MaximizeBox = false; } private static int kırmızı = 0; private static int mavi = 0; private static int yeşil = 0; private void vScrollBar1_ValueChanged(object sender, System.EventArgs e) { this.label1.Text = String.Format("Değer1: {0}", vScrollBar1.Value); kırmızı = this.vScrollBar1.Value; this.BackColor = Color.FromArgb(kırmızı,yeşil,mavi); //veya //this.BackColor = Color.FromArgb(vScrollBar1.Value, vScrollBar2.Value, vScrollBar3.Value); //seklinde gösterebilirsiniz. } private void vScrollBar2_ValueChanged(object sender, System.EventArgs e) { this.label2.Text = String.Format("Değer2: {0}", vScrollBar2.Value); yeşil = this.vScrollBar2.Value; this.BackColor = Color.FromArgb(kırmızı, yeşil, mavi); //veya //this.BackColor = Color.FromArgb(vScrollBar1.Value, vScrollBar2.Value, vScrollBar3.Value); //seklinde gösterebilirsiniz. } private void vScrollBar3_ValueChanged(object sender, System.EventArgs e) { this.label3.Text = String.Format("Değer3: {0}", vScrollBar3.Value); mavi = this.vScrollBar3.Value; this.BackColor = Color.FromArgb(kırmızı, yeşil, mavi); //veya //this.BackColor = Color.FromArgb(vScrollBar1.Value, vScrollBar2.Value, vScrollBar3.Value); //seklinde gösterebilirsiniz. } } } //Bir sonraki makalede görüşmek üzere. Bahadır
SendKeys Kullanımı SendKeys metodunu kullanarak, textBox a yazdığımız stringi NotePad yazılmasını sağlayacağız. Ayrıca SendKeys.SendWait() metodu ilede mesajınızı direkt NotPad e yazdırabilirsiniz. Aşağıdaki şekli inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { Microsoft.VisualBasic.AppWinStyle stil = Microsoft.VisualBasic.AppWinStyle.NormalFocus; int i; Microsoft.VisualBasic.Interaction.Shell(@"NotePad.exe", stil, false,-1); for (i = 0; i <= textBox1.Text.Length - 1; i += 1) { SendKeys.SendWait(textBox1.Text.Substring(i, 1)); if (i > textBox1.Text.Length) { break; } } // Bu kısımdada textboxta yazılan yazının altına //aşağıdaki mesajı ekliyoruz. Notepade ekliyecek... SendKeys.SendWait("{ENTER}"); SendKeys.SendWait("Şimdilik bu kadar...Bahadır ŞAHİN"); } private void Form1_Load(object sender, EventArgs e) { this.Text = "SendKeys..."; this.MaximizeBox = false; } } } //Bir sonraki makalede görüşmek üzere. Bahadır
TextBox ta Replace Olayı Replace metodunu kullanaak textBox ınızda yazılı metinlerinizi değiştirebilirsiniz. Aşağıdaki şekilleri inceleyin... using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { this.Text = "Kelime Değiştirme"; this.MaximizeBox = false; textBox1.Text = "Merhaba Bahadirsa. Hello World."; } private void button1_Click(object sender, EventArgs e) { textBox1.Text = textBox1.Text.Replace("Hello World", "Merhaba Dünya"); } } } //Bir sonraki makalede görüşmek üzere. Bahadır
VC#.Net te F Tuşları, Yön Tuşları Kullanımı Bu makalemizde VC#.Net te F Tuşları, Yön Tuşları Kullanımı göreceğiz. F tuşları, yön tıuşları veya klavyede herhangi bir tuşa basıldığı zaman program, hangi tuşa basıldığını mesaj olarak verecek. Önemli: 1-İlk önce Formunuzun KeyPreview özelliğini True yapın. 2-InitializeComponent(); kısmına this.KeyDown += new System.Windows.Forms.KeyEventHandler(Form1_KeyDown); eklemeyi unutmayın. Daha sonra aşağıdaki kodları Formunuzun KeyDown yordamına yazın.Aşağıdaki şekilleri inceleyin... using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); this.KeyDown += new System.Windows.Forms.KeyEventHandler(Form1_KeyDown); } private void Form1_Load(object sender, EventArgs e) { } private void Form1_KeyDown(object sender, System.Windows.Forms.KeyEventArgs e) { //Yön tuşları if (e.KeyCode == Keys.Left) MessageBox.Show("Sol ok tuşuna bastınız"); if (e.KeyCode == Keys.Right) MessageBox.Show("Sağ ok tuşuna bastınız"); if (e.KeyCode == Keys.Up) MessageBox.Show("Yukarı ok tuşuna bastınız"); if (e.KeyCode == Keys.Down) MessageBox.Show("Aşağı ok tuşuna bastınız"); //F tuşları if (e.KeyCode == Keys.F1) MessageBox.Show("F1 tuşuna bastınız"); if (e.KeyCode == Keys.F2) MessageBox.Show("F2 tuşuna bastınız"); //Harf tuşları if (e.KeyCode == Keys.A) MessageBox.Show("A tuşuna bastınız"); //... } } } //Bir sonraki makalede görüşmek üzere. Bahadır
Upper Case, Lower Case Uygulaması Bu örneğimizde textbox ta seçili olan kısımları büyük veya küçük karakterlere çevireceğiz. Bunun için toUpper, toLower metodlarını kullanacağız. Formunuza 1 adet textBox, 2 adet button ekleyin. textBox ın Multiline özelliğini true yapın. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { //TextBox ta Seçili olan küçük karakterleri, büyük karakter //lere çevirir. textBox1.SelectedText = textBox1.SelectedText.ToUpper(); } private void button2_Click(object sender, EventArgs e) { //TextBox ta Seçili olan büyük karakterleri, küçük karakter //lere çevirir. textBox1.SelectedText = textBox1.SelectedText.ToLower(); } private void Form1_Load(object sender, EventArgs e) { this.Text = "UpperCase,LowerCase Uygulama"; this.MaximizeBox=false; textBox1.Text = "Merhaba Dünya...Bahadır"; } } } //Bir sonraki makalede görüşmek üzere. Bahadır
CD-ROM ınızı Açıp Kapatma BU örnekte cd-rom u açıp kapatmayı göreceğiz. İlk önce formunuza Class ekleyin. Class a aşağıdaki kodları yazın. Class kısmına using System.Runtime.InteropServices; eklemeyi unutmayın. Class a yazılacak kodlar using System; using System.Collections.Generic; using System.Linq; using System.Text; using System.Runtime.InteropServices; namespace WindowsFormsApplication1 { class Class1 { [DllImport("winmm.dll", EntryPoint = "mciSendStringA")] public static extern int mciSendString(string lpstrCommand, string lpstrReturnString, int uReturnLength, int hwndCallback); [DllImport("kernel32.dll", EntryPoint = "GetVolumeInformationA")] public static extern int GetVolumeInformation(string lpRootPathName, StringBuilder lpVolumeNameBuffer, int nVolumeNameSize, int lpVolumeSerialNumber, int lpMaximumComponentLength, int lpFileSystemFlags, string lpFileSystemNameBuffer, int nFileSystemNameSize); [DllImport("kernel32.dll", EntryPoint = "GetDriveTypeA")] public static extern int GetDriveType(string nDrive); } } Forma yazacağınız kodlar using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { int i; public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { if (i == Class1.mciSendString("set CDAudio door closed", null, 127, 0)) { Class1.mciSendString("set CDAudio door open", null, 127, 0); //MessageBox.Show("CD-ROM şu an açık"); button1.Text = "CD-ROM şu an açık "; } else if (i == Class1.mciSendString("set CDAudio door open", null, 127, 0)) { Class1.mciSendString("set CDAudio door closed", null, 127, 0); //MessageBox.Show("CD-ROM şu an açık"); button1.Text = "CD-ROM şu an kapalı "; } } private void Form1_Load(object sender, EventArgs e) { button1.Text = "CD-ROM Aç/Kapa"; } } } //Bir sonraki makalede görüşmek üzere...Bahadır
Sistem Bilgilerini Almak Bu örnekte bilgisayarın adını, versiyonunu, çözünürlüğünü, ne kadar süre işletim sisteminin açık olduğu gibi bilgileri alacağız. Formunuza 12 adet label, 1 button ekleyin. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { label1.Text = "Bilgisayar Adı:"; label2.Text = "Sistem Dizini:"; label3.Text = "Ekran Çözünürlüğü:"; label4.Text = "Süre:"; label5.Text = "Directory Dizini:"; label6.Text = "Versiyon No:"; label7.Text=""; label8.Text=""; label9.Text=""; label10.Text=""; label11.Text = ""; label12.Text = ""; btn1.Text = "Sistem Bilgilerini Al"; this.Text = "Sistem Bilgileri"; this.MaximizeBox=false; } private void btn1_Click(object sender, EventArgs e) { label7.Text = System.Environment.MachineName; label8.Text = System.Environment.SystemDirectory; label9.Text = Convert.ToString(SystemInformation.PrimaryMonitorSize); int r, f; r = System.Environment.TickCount; f = ((r / 1000) / 60); label10.Text = Convert.ToString(f) + " dakikadır bilgisayarınız açık."; label11.Text = Convert.ToString(System.Environment.OSVersion); label12.Text = Convert.ToString(System.Environment.Version); } } } //Bir sonraki makalede görüşmek üzere...Bahadır
colorDialog Kullanımı Bu örneğimizde colorDialog nesnesini kullanarak formumuzun rengini değiştireceğiz. İlk önce formunuza 1 adet button ve colorDialog ekleyin. Aşağıdaki şekilleri inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void btnRenk_Click(object sender, EventArgs e) { if (colorDialog1.ShowDialog() == System.Windows.Forms.DialogResult.OK); { this.BackColor = colorDialog1.Color; } } private void Form1_Load(object sender, EventArgs e) { this.Text = "colorDialog Bahadirsa"; this.Size = new System.Drawing.Size(250, 200); this.Location = new Point(100, 100); this.MaximizeBox = false; } } } //Bir sonraki makalede görüşmek üzere...Bahadır
VC#.Net te Array Uygulaması Bu örneğimizde Array e değineceğiz. Formunuza 1 tane listbox nesnesi ekleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { string[] str = new string[7]; int i; this.Text = "Array & Dizi Kullanımı Örnek...Bahadirsa"; this.Size = new System.Drawing.Size(207, 158); this.Location = new Point(250, 190); this.MaximizeBox = false; listBox1.Size = this.Size; str.SetValue("Ali", 0); str.SetValue("Veli", 1); str.SetValue("KırkDokuz", 2); str.SetValue("Elli", 3); str.SetValue("Merhaba", 4); str.SetValue("Dünya", 5); for (i = 0; i <= 5; i++) { listBox1.Items.Add(str.GetValue(i)); } } } } //Bir sonraki makalede görüşmek üzere...Bahadır
Combobox ta Font Gösterimi Bu örnekte combobox nesnesinde font gösterimi konusunu işleyeceğiz. Formunuza 1 adet label ve combobox ekleyin. Aşağıdaki şekili inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { label1.Text = "aAbBcCdD"; FontFamily[] fontlar = FontFamily.Families; int i; for (i = 0; i <= 10; i++) { comboBox1.Items.Add(fontlar[i].Name); comboBox1.SelectedIndex = 0; } } private void comboBox1_SelectedIndexChanged(object sender, EventArgs e) { label1.Font = new Font(comboBox1.Text, 12 , FontStyle.Regular); } } } //Bir sonraki makalede görüşmek üzere...Bahadır
Çalışma Anında Button ve Label Oluşturmak Bu örneğimizde çalışma anında button ve label oluşturacağız. Çalışma anında istediğiniz kadar Button ve Label oluşturabilirsiniz Aşağıdaki şekili inceleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { Button button1=new Button(); Label label1=new Label(); this.Controls.Add(button1); this.Controls.Add(label1); button1.Text = "Çalışma Anında Button Ekleme"; button1.Size = new System.Drawing.Size(100, 60); label1.Text = "Çalışma Anında Label Oluşturma"; label1.Width = 200; label1.Left = 100; } } } //Bir sonraki makalede görüşmek üzere...Bahadır
ListBox ta Arama Bu makalede ListBox ta artırarak arama yaptıracağız. TextBox a girilen string karakterlere göre, Listbox ımızda arama yapacağız. Formunuza 1 adet textBox ve listBox ekleyin. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { } private void txtAra_TextChanged(object sender, EventArgs e) { int itemIndex; itemIndex = lbox1.FindString(txtAra.Text); lbox1.SelectedIndex = itemIndex; } } }
RichTextBox ta Arama Bu makalemizde richTextBox nesnemiz içinde yazılı olan string te arama yaptıracağız. Aşağıdaki şekilleri inceleyin. Formunuza 1 adet textBox, button ve richTextBox ekleyin...Bahadirsa using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { btnAra.Font = new Font("Verdana", 10, FontStyle.Regular); richTextBox1.Font = new Font("Verdana", 10, FontStyle.Regular); txtAra.Font = new Font("Verdana", 10, FontStyle.Regular); richTextBox1.Text = "Merhaba Bahadirsa. Bu örneğimizde kelime aramaya örnek vereceğiz. Öncelikle aranacak kelimeyi yukarıdaki textbox a giriniz." ; txtAra.Text = "Aranacak kelimeyi buraya gir..."; this.Text = "Arama Uygulaması...Bahadirsa"; this.MaximizeBox = false; } private void btnAra_Click(object sender, EventArgs e) { int r; r = richTextBox1.Text.IndexOf(txtAra.Text); if (r > 0) { richTextBox1.Select(r, txtAra.Text.Length); richTextBox1.SelectionBackColor = Color.Black; richTextBox1.SelectionFont = new Font("Verdana", 12, FontStyle.Bold); richTextBox1.SelectionColor = Color.Yellow; MessageBox.Show("Aranılan kelime, " + (r+1) + " . karakterde bulundu."); } else { MessageBox.Show("Üzgünüz. Aranılan kelime bulunamadı"); } } private void txtAra_TextClick(object sender, EventArgs e) { richTextBox1.SelectionBackColor = Color.White; richTextBox1.SelectionColor = Color.Black; richTextBox1.SelectionFont = new Font("Verdana", 10, FontStyle.Regular); } } } //Bir sonraki makalede görüşmek üzere...Bahadirsa
Ağ Kontrolu Bu uygulamamızda bilgisayarımızın ağa bağlı olup olmadığını ve hangi ad ile bağlı olduğunu göreceğiz. Aşağıdaki şekili inceleyiniz. Formunuza 1 adet button ve textBox ekleyin. textBox ın MultiLine özelliğini true yapın...Bahadirsa using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplica,tion1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { textBox1.Multiline = true; this.Text = "Ağ Bağlantısı Kontrol...Bahadirsa"; this.MaximizeBox = false; this.Location = new Point(250, 250); } private void btnBaglan_Click(object sender, EventArgs e) { System.Net.IPHostEntry host; try { textBox1.Text = Environment.GetEnvironmentVariable("LOGONSERVER"); host = System.Net.Dns.GetHostByName(textBox1.Text.Substring(2)); textBox1.Text = textBox1.Text + Environment.NewLine + " Adıyla ağa bağlısınız. "; return; } catch { textBox1.Text = "Ağ Bağlantınız Bulunmamaktadır."; } } } } //Bir sonraki makalede görüşmek üzere...Bahadirsa
Path Örnek Bu örnekte path yolunu girmiş olduğumuz dosyaların çalıştırılmasını sağlıyacağız...Bahadirsa using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { this.Text = "Path Örnek...Bahadirsa"; this.MaximizeBox = false; this.Location = new Point(260, 160); this.Size = new System.Drawing.Size(215, 96); } private void button1_Click(object sender, EventArgs e) { string path= "c:\\kayit.txt"; System.Diagnostics.Process.Start(path); } } } Bir sonraki makalede görüşmek üzere...Bahadirsa
Exe Uygulamalarının Dosya Özelliklerinin Alınması Bu uygulamamızda .Exe uygulamalarının özelliklerinin alınması konusunu inceleyeceğiz. Uygulamamızda Windows Media Player e ait özelliklerin gösterilmesini inceledik. Formunuza 1 adet openFileDialog, 1 adet button, 7 adet label ve textbox ekleyin. Aşağıdaki şekil 1 deki gibi formunuzu tasarlayın...Bahadirsa using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.Diagnostics; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { this.Text = "Exe Uygulamalarına Ait Özelliklerin Gösterilmesi...Bahadirsa"; this.MaximizeBox = false; this.Location = new Point(250, 200); this.Size = new System.Drawing.Size(360, 300); } private void button1_Click(object sender, EventArgs e) { openFileDialog1.Title = "Dosya Aç Bahadirsa"; openFileDialog1.InitialDirectory = "C:\\"; openFileDialog1.Filter = "Exe Uygulaması Dosyası (.exe)\|*.exe"; if (openFileDialog1.ShowDialog() == System.Windows.Forms.DialogResult.OK) { FileVersionInfo FileProperties = FileVersionInfo.GetVersionInfo(openFileDialog1.FileName); //Dosya tanımlamasını al textBox1.Text = FileProperties.FileDescription; //Dosya versiyonunu al textBox2.Text = FileProperties.FileVersion; //Dahili ismini al textBox3.Text = FileProperties.InternalName; //Orjinal ismini al textBox4.Text = FileProperties.OriginalFilename; //Uretim ismini al textBox5.Text = FileProperties.ProductName; //Uretim versiyonunu al textBox6.Text = FileProperties.ProductVersion; //Dosya dilini al textBox7.Text = FileProperties.Language; } } } } // Bir sonraki makalede görüşmek dileğiyle...Bahadirsa
fontDialog Kullanımı Formunuza 1 adet label, button ve fontDialog ekleyin. Bu örnekte labelimizin font değerlerini değiştireceğiz. Aşağıdaki şekilleri inceleyin...Bahadirsa using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { if (fontDialog1.ShowDialog() == System.Windows.Forms.DialogResult.OK) { label1.Font = fontDialog1.Font; } } } } Bir sonraki makalede görüşmek üzere...Bahadirsa
Kısmi String Alma Bu örneğimizde bir string de yazılan metinin bir kısmını alıp, MessageBox ta göstereceğiz. Formunuza 1 adet button ekleyin ve aşağıdaki kodları yazın... Bahadirsa using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { string str = "Merhaba Bahadirsa"; str = str.Substring(8, 9); MessageBox.Show(str); } } }
VC #.Net te SoundPlayer Kullanımı Bu örnekte SoundPlayer kullanımını inceleyeceğiz. İlk önce using System.Media; ekleyin. Formunuza 1 adet openFileDialog, 4 Button ve 1 label ekleyin. Bu örnektw .wav uzantılı ses dosyalarını çalacağız. Aşağıdaki Şekili inceleyin...Bahadirsa using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.Media; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void btnAc_Click(object sender, EventArgs e) { label1.Text = ""; openFileDialog1.Filter = ".wav dosyaları\|.wav\|Tüm Dosyalar\|."; openFileDialog1.ShowDialog(); label1.Text = openFileDialog1.FileName; } private void btnCal_Click(object sender, EventArgs e) { if (label1.Text != "" && label1.Text.ToLower().IndexOf(".wav") > 0) { SoundPlayer sp = new SoundPlayer(); sp.SoundLocation = label1.Text; sp.Play(); } } private void btnDurdur_Click(object sender, EventArgs e) { SoundPlayer sp = new SoundPlayer(); sp.Stop(); } private void btnLoop_Click(object sender, EventArgs e) { if (label1.Text != "" && label1.Text.ToLower().IndexOf(".wav") > 0) { SoundPlayer sp = new SoundPlayer(); sp.SoundLocation = label1.Text; sp.PlayLooping(); } } private void Form1_Load(object sender, EventArgs e) { } } } Bir sonraki makalede buluşmak üzere...Bahadirsa
VC#.Net te InputBox Kullanımı Bu makalemizde C#.Net te InputBox nasıl kullanılır konusunu işleyeceğiz. İlk önce Project kısmından Add Reference tıklayın. Daha sonra .Net kısmından Microsoft.VisualBasic i seçip OK e tıklayın. Microsoft.VisualBasic.Interaction.InputBox(); şeklinde InputBox ı kullanacağız. Aşağıdaki kodları ve şekilleri inceleyin...Bahadirsa using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; namespace WindowsApplication1 { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { Int32 XPos = ((SystemInformation.WorkingArea.Width/2)-200); Int32 YPos = ((SystemInformation.WorkingArea.Height/2)-100); String ad = Microsoft.VisualBasic.Interaction.InputBox("Lütfen İsim Giriniz...", "VC# InputBox Örnek... ", "Bahadır", XPos, YPos); if(ad != "") { MessageBox.Show("Merhaba " + ad); } else { MessageBox.Show("Merhaba her kimsen..."); } } } } Bir sonraki makalede görüşmek üzere...Bahadirsa
Geçme Notu Hesaplama 1 Vize ve Final Notuna göre harfli sisteme göre hangi notu aldığınızı, 60 geçiş notuna göre geçilip geçilmediğini gösteren program. Aşağıdaki şekilleri inceleyin. Public Class Form1 Dim vize, final As Integer Dim gnotu As Double Dim sonuc, durum As String Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click vize = InputBox("Not Girişi", "Vize Notu Girişi", 0) final = InputBox("Not Girişi", "Final Notu Girişi", 0) gnotu = vize * 0.3 + final * 0.7 Select Case gnotu Case 90 To 100 : sonuc = "A" Case 80 To 89 : sonuc = "B" Case 70 To 79 : sonuc = "C" Case 60 To 69 : sonuc = "D" Case Is < 50 : sonuc = "F" Case 50 To 59 : sonuc = "E" Case Else End Select If gnotu < 60 Then durum = "KALDINIZ!.." Else durum = "GEÇTİNİZ!.." End If MsgBox("Not Ortalaması:" & gnotu & Chr(10) & "Puan Dilimi: " & sonuc & Chr(10) & "Durum: " & durum) End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
WebBrowser da Kayan Yazı Bu örnekte webbrowser nesnesinde Navigate girilen yazıyı kaydıracağız. Aşağıdaki şekilleri inceleyin. Public Class Form1 Private Sub btnBaslat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnBaslat.Click baslat() End Sub Sub baslat() WebBrowser1.Navigate("about:< body scroll=’no’ >< body bgcolor=white >< marquee scrolldelay=’120’ direction=’Left’style=’font-size: 20pt; font-family: Verdana; color:orangered; font-weight: bold() ’> Merhaba Dünya. Bahadır ŞAHİN< / marquee >") End Sub Private Sub btnDurdur_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDurdur.Click WebBrowser1.Navigate("about:") End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Ekran Görüntüsünü Almak Bu makalemizde ekran görüntüsünün nasıl alındığını göreceğiz. Aşağıdaki kodları formunuzun button click ine yazın. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Me.Hide() ’ formumuzun ekran görüntüsünde çıkmaması için gizliyoruz. Threading.Thread.Sleep(1000) ’Girilen süre zarfınca bekletiyoruz. ’Ekran boyutunu ve görüntüsünü alıyoruz. Dim ekranboyut As Size = New Size(My.Computer.Screen.Bounds.Width, My.Computer.Screen.Bounds.Height) Dim ekrangoruntu As New Bitmap(My.Computer.Screen.Bounds.Width, My.Computer.Screen.Bounds.Height) Dim grafik As System.Drawing.Graphics = System.Drawing.Graphics.FromImage(ekrangoruntu) grafik.CopyFromScreen(New Point(0, 0), New Point(0, 0), ekranboyut) ekrangoruntu.Save("C:\screen.jpg", System.Drawing.Imaging.ImageFormat.Jpeg) Me.Show() ’görüntü alma işlemi bittikten sonra formumuzu gösteriyoruz. ’Daha sonra ekran görüntüsüne ait image ı process yardımıyla açıyoruz Dim pr As System.Diagnostics.Process = New System.Diagnostics.Process() pr.StartInfo.FileName = "C:\screen.jpg" pr.Start() End Sub End Class
Formu Saydamlaştırma Formumuzun Opacity değeriyle oynayarak saydamlaştırabiliriz. Formumuzun Opacity değerini Trackbar nesnesiyle değiştireceğiz. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TrackBar1.Minimum = 0 TrackBar1.Maximum = 10 TrackBar1.Value = 10 End Sub Private Sub TrackBar1_ValueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TrackBar1.ValueChanged Me.Opacity = TrackBar1.Value / 10 End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Form Başlığında Kayan Yazı Formunuza 1 adet Timer ekleyin. Sonra Imports vb = Microsoft.VisualBasic i ekleyin. Aşağıdaki kodları formunuza ekleyin. Imports vb = Microsoft.VisualBasic Public Class Form1 Dim i As Integer Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Timer1.Interval = 50 Timer1.Start() End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick i = i + 1 Me.Text = vb.Left("Merhaba Dünya...Bahadır ŞAHİN", i) If i > 100 Then i = 0 End If End Sub End Class
PictureBoxdaki Resimleri 90 Derece Döndürme Bu örnekte picturebox daki resimleri sağa ve sola olmak üzere 90 derece döndereceğiz. Formunuza 1 adet PictureBox ve 2 adet Button ekleyin. Aşağıdaki şekilleri inceleyin. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load PictureBox1.Image = Image.FromFile("pic1.jpg") PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage End Sub Private Sub btnSolaCevir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSolaCevir.Click PictureBox1.Image.RotateFlip(RotateFlipType.Rotate90FlipXY) PictureBox1.Refresh() End Sub Private Sub btnSagaCevir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSagaCevir.Click PictureBox1.Image.RotateFlip(RotateFlipType.Rotate90FlipNone) PictureBox1.Refresh() End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
NumericUpDown ile Label Font Boyutunu Değiştirme Bu örnekte numericupdown kullanarak, font boyutunu istediğimiz şekilde büyüteceğiz. Aşağıdaki şekli inceleyin. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load NumericUpDown1.Minimum = 0 NumericUpDown1.Maximum = 100 Label1.Text = "Merhaba Dünya..." End Sub Private Sub NumericUpDown1_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NumericUpDown1.ValueChanged Dim deger As Integer deger = NumericUpDown1.Value Label1.Font = New Font("Times New Roman", deger, FontStyle.Regular) End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Çalışma Anında Buttonu Hareket Ettirmek Bu örnekte button un keydown yordamına yazılan küçük bir kod parçasıyla butonu sağa,sola, yukarı, aşağı hareket ettirebiliriz. Public Class Form1 Dim a As Integer = 10 Dim b As Integer = 10 Private Sub Button1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Button1.KeyDown If e.KeyValue = Keys.W Then a = a - 4 Button1.Top = a ElseIf e.KeyValue = Keys.A Then b = b - 4 Button1.Left = b ElseIf e.KeyValue = Keys.S Then a = a + 4 Button1.Top = a ElseIf e.KeyValue = Keys.D Then b = b + 4 Button1.Left = b End If End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Çalışma Anında Label Oluşturmak Aşağıdaki şekillerde gösterildiği gibi çalışma anında label oluşturacağız. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim labels As New Label labels.Name = "labeller" labels.Text = "Çalışma Anında Label Oluşturmak- Örnek" labels.Size = New System.Drawing.Size(500, 100) labels.Font = New System.Drawing.Font("Tahoma", 10, FontStyle.Bold) labels.Location = New Point(1, 40) labels.Visible = True Me.Controls.Add(labels) End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Process Nesnesi Kullanılarak Video Dosyası Açmak Bu örnekte process nesnesi ile video dosyası açacağız. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim prc As New Process prc.StartInfo.FileName = "C:\test.avi" prc.StartInfo.Arguments.Insert(0, "-Fullscreen") prc.Start() End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
VisualBasic.Net C# Arasındaki Belli Başlı Farklılıklar Bilindiği gibi Microsoft .NET teknolojisinde şu an için yoğun olarak C# ve VB.NET dilleri kullanılmaktadır.Bu iki dilin .NET için bu kadar önemli olmasının Java ve Visual Basic üzerinde yazılım geliştirenlerin bildiklerini unutmak zorunda kalmadan .NET ‘e geçişinin kolaylaştırılmasının amaçlanmış olduğunu sanıyoruz. .NET ile sadece VB dili gibi uygulama geliştirmenin son derece zahmetsiz ve kolay biçimde gerçekleştirilmesini sağlayan bir dile tam destek verilmemiş aynı zamanda bu dilde bir takım değişiklikler yapılarak tam anlamıyla nesne temelli bir yapıya dönüştürülmüştür. Bu yazıda C# ile VB.NET dilleri arasındaki bir takım farklılıkları ve benzerlikleri anlatmaya çalıştık.Belki her şeyden önce ilk söylenmesi gereken C# ‘ın bütün C türevi dillerde olduğu gibi büyük-küçük harf duyarlı (case-sensitive) olduğuna dikkat çekmektir.Yani C# için String ile string kesinlikle farklı şeylerdir.Bu hassasiyet tahmin edileceği gibi VB.NET dilinde mevcut değildir. Program açıklamaları : VB.NET ‘de açıklamalar yine önceki sürümde olduğu gibi bir kesme ( ‘ ) imi ile yapılıyor.Derleme işlemi esnasında açıklama bölümü dikkate alınmadığı için açıklamalarınızı Türkçe karakter kullanarak yapabilirsiniz. ‘ VB açıklaması C#’da ise Java ‘da olduğu gibi tek satırlık bir açıklama için çift slash (//) ve çok satırlı bir açıklama için bir slash ve yıldız (/) ile başlayıp diğer satırın sonunda bir yıldız ve bir slash ile biten (/) açıklama biçimi kullanılıyor. // Tek satırlık C# açıklaması /* Çok satırlı bir C# açıklaması */ Satır sonlandırması : VB.NET ‘te önceki VB sürümünde olduğu satır bitirmeye yarayan bir im yoktur bunun yerine alt satıra geçerken boşluk alt çizgi ( _) imi kullanılır. degisken = degisken1 + degisken2 +_degisken3 Java,JavaScript,PHP gibi C türevi bütün dillerde olduğu gibi C# ‘da da satırlar noktalı virgül ( ; ) ile biter.Bunun dışında noktalı virgül konulmadığı sürece alt satırlara geçilebilir. degisken = degisken1 + degisken2 +degisken3; Koşullu Yapılar : If –elseif-else VB.NET If sayi =1 ThenYapılacak işlemElseif degisken=”Merhaba”Yapılacak başka bir işlemElseYapılacak başka bir işlemEnd If C# if (sayi=1){Yapılacak işlem;}elseif (degisken==”Merhaba”){Yapılacak başka bir işlem}else{Yapılacak başka bir işlem} Select Case VB.NET Select Case DegiskenCase 1Yapılacak işlemCase 2Yapılacak işlemCase ElseYapılacak işlemEnd Select C# switch (degisken){case 1:Yapılacak işlembreak;case 2:Yapılacak işlembreak;default:Yapılacak işlembreak;} Döngüler For-Next For-Next döngüsü bütün programlama dillerinde kullanılan bir döngüdür.VB.NET dilinde Step kelimesi ile döngüyü istenen adımda yapmak imkanı da vardır.Aşağıdaki örnekte değişken değeri Step 1 ile 1 arttırılmaktadır.C# dilinde ise bu durum ufak tefek farklılıklar ile aynıdır. VB.NET Dim i As IntegerFor i=1 To 10 Step 110 kez sürecek bir iş yapNext C# for (int 1=0 ;i<10;i++){10 kez sürecek bir iş yap} Do Loop VB.NET dili Do While döngüsünü hem While için olanını hem de Until için olanını destekler.While koşulunda “karşılaştırma doğru olduğu sürece” Until ise “karşılaştırma doğru olmadığı sürece” anlamındadır.C#’ta ise sadece While anahtar sözcüğü kullanılmaktadır. Do While döngüsü iki şekilde olmaktadır. VB.NET Dim i As Integer = 1Doi+=110 kez sürecek bir iş yapLoop While i < 10 Veya Dim i As IntegerDo While i<10i+=110 kez sürecek bir iş yapLoop C# int i=1;while (i<10){i+=1;10 kez sürecek bir iş yap} Veya aşağıdaki şekilde koşulun koddan sonra çıkılmasına olanak veren biçimde: int i=1;{i+=1;10 kez sürecek bir iş yap}while (i<10); NOT: Bu yazı alıntıdır. Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Dosya Yolunu ve Özelliklerini Öğrenmek Bu örnekte dosyanın yolunu, uzantısını, adını, directory i öğreneceğiz. İlk önce ConsoleAplication sayfası açın. Aşağıdaki şekli inceleyin. Imports System.IO Module Module1 Sub Main() Dim P As String = "C:\Test.txt" Try Console.WriteLine("Başlama Adresi: {0}", P) Console.WriteLine("Directory Adı: {0}", Path.GetDirectoryName(P)) Console.WriteLine("Uzantı: {0}", Path.GetExtension(P)) Console.WriteLine("Dosya Adı: {0}", Path.GetFileName(P)) Console.WriteLine("Uzantı İle Birlikte Dosya Adı: {0}", Path.GetFileNameWithoutExtension(P)) Console.WriteLine("Tam Adres: {0}", Path.GetFullPath(P)) Console.WriteLine("Root: {0}", Path.GetPathRoot(P)) Catch E As Exception Console.WriteLine("Hata: {0}", E.Message) End Try Console.WriteLine() Threading.Thread.Sleep(10000) End Sub End Module Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Memory Stream ile Yazma ve Okuma Bu örnekte memory stream metodu ile yazmayı ve yazdığımızı okutmayı göreceğiz. İlk önce File New Projec Console Application açın. Aşağıdaki şekli inceleyin. Imports System Imports System.IO Imports System.Text Module Module1 Sub Main() Dim mstream As New MemoryStream() Dim binaryyaz As New BinaryWriter(mstream) binaryyaz.Write("www.bahadirsam.somee.com") Dim binaryoku As New BinaryReader(mstream) mstream.Seek(0, SeekOrigin.Begin) Console.WriteLine(binaryoku.ReadString()) binaryoku.Close() End Sub End Module Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Bilgisayar Host ve Kullanıcı Adını Öğrenmek Bu örnekte bilgisayarın host ve kullanıcı adını öğreneceğiz. Formunuza 1 adet Button ekleyin. Aşağıdaki şekli inceleyin. Public Class Form1 Sub Get_Bilgi() Dim HostAd As String Dim KullaniciAd As String ’ Host Adı / Bilgisayar Adı HostAd = Environ$("computername") ’ Kullanıcı Adı KullaniciAd = Environ$("username") MsgBox("Kullanıcı Adı: " & KullaniciAd & vbCrLf & "Host Adı: " & HostAd) End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Get_Bilgi() End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Bilgisayar Host Adını Değiştirmek Bu örnekte bilgisayarın Host adını değiştireceğiz. Formunuza 1 adet Button ve TextBox ekleyin. Public Class Form1 Declare Function SetBilgisayarAd Lib "kernel32" _ Alias "SetComputerNameA" (ByVal lpBilgisayarAd As String) As _ Long Public Function BilgisayarAdiniDegistir(ByVal YeniBilgisayarAd As String) _ As Boolean On Error Resume Next Dim nReturn As Long nReturn = SetBilgisayarAd(YeniBilgisayarAd) If Err.Number = 0 Then BilgisayarAdiniDegistir = nReturn <> 0 End If End Function Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click BilgisayarAdiniDegistir(TextBox1.Text) End Sub End Class
Dosya İsmi Değiştirme İstediğiniz dosyanın ismini küçük bir kod parçasıyla değiştirebilirsiniz. İlk önce; Imports System.IO i formunuza eklemeyi unutmayın. Imports System.IO Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim dosyabilgi As New FileInfo("C:\image.jpg") 'image.jpg ismini resim.jpg olarak değiştireceğiz. dosyabilgi.MoveTo("C:\resim.jpg") 'veya klasör ismi değiştirmek istersek; 'Dim dosyabilgi As New FileInfo("C:\test") 'dosyabilgi.MoveTo("C:\test2") End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Form Taşıma Formun üzerinden tutup taşıyacağız. Formunuza 1 adet Panel ekleyin. Panel in dock özelliğini Fill seçin veya Panel in sağ üstündeki oka tıklayıp Panel Task ten seçin. Böylece Panelin formun tümünü kaplamasını sağladık. Aşağıdaki kodları panel in mousedown yordamına yazın. Public Class Form1 Const i As Integer = &HA1 Const j As Integer = 2 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub Panel1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Panel1.MouseDown If e.Button = Windows.Forms.MouseButtons.Left Then Panel1.Capture = False Dim msg As Message = Message.Create(Me.Handle, i, New IntPtr(j), IntPtr.Zero) Me.DefWndProc(msg) End If End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Bilgisayarın Hızını Ölçün Bilgisayarınızın hızını GetSystemMetrics Apisini kullanarak ölçebilirsiniz. Aşağıdaki şekli inceleyin. Public Class Form1 Private Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If GetSystemMetrics(73) Then MessageBox.Show("Bilgisayarınız yavaş çalışmakta...", "Uyarı!", MessageBoxButtons.OK, MessageBoxIcon.Warning) Else MessageBox.Show("Bilgisayarınız hızlı çalışmakta...", "Uyarı!", MessageBoxButtons.OK, MessageBoxIcon.Warning) End If End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Girilen Tarihi Kontrol Etmek Aşağıdaki küçük kod parçasında girmiş olduğumuz tarihin uygun olup olmadığı kontrol edilmektedir. Public Class Form1 Public Function TarihKontrol(ByVal Tarih As String) As Boolean Dim Sonuc As Boolean = False Err.Clear() On Error GoTo Hata Dim Trh As DateTime = Tarih Hata: If Err.Number <> 0 Then Sonuc = False Else Sonuc = True Return Sonuc End Function Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click ‘Aşağıdaki tarih kısmını Ay.Gün.Yıl sırasında yazınız.) MessageBox.Show(IIf(TarihKontrol("08.17.08"), "Girilen Tarih Uygun", "Girilen Tarih Uygun Değil"), "Tarih Kontrolü", MessageBoxButtons.OK) End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Ağ Bağlantılarım Klasörünün Açılması Ağ Bağlantılarım Klasörünü Process.Start("ncpa.Cpl") metodunu kullanarak açabilirsiniz. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Process.Start("ncpa.Cpl") End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Faktoriyel Bulmak TextBox a girmiş olduğunuz sayının faktoriyelini bulur. Aşağıdaki şekili inceleyin. Public Class Form1 Private Function faktoriyel() Dim i As Integer faktoriyel = 1 For i = 1 To TextBox1.Text faktoriyel = faktoriyel * i Next End Function Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click MessageBox.Show(Val(TextBox1.Text) & "!=" & faktoriyel(), "Faktoriyel", MessageBoxButtons.OKCancel) End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
TextBox ta Arama Yaptırmak Formunuza 2 adet TextBox ve 1 adet Button ekleyin. Textbox2 ye yazdığımız kelimeyi TextBox1 de aratacağız. Aşağıdaki şekilleri inceleyin. Public Class Form1 Dim ArananKelime As String Dim KelimeninYeri, AramayaBasla As Integer Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click On Error GoTo hata ArananKelime = TextBox2.Text ‘textbox2 içindeki kelimeyi arayacağız AramayaBasla = TextBox1.SelectionStart + TextBox1.SelectionLength If AramayaBasla = 0 Or AramayaBasla = Len(TextBox1.Text) Then AramayaBasla = 1 ‘aranan kelime bulunmazsa başa döneceğiz KelimeninYeri = InStr(AramayaBasla, TextBox1.Text, ArananKelime, vbTextCompare) TextBox1.Focus() ‘kelime bulunduğunda işaretliyoruz TextBox1.SelectionStart = KelimeninYeri - 1 TextBox1.SelectionLength = Len(ArananKelime) Exit Sub End If hata: TextBox1.SelectionStart = 1 End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
ArrayList Sıralı Gösterim ArrayList metodu ile rastgele eklenen elemanları sıralı şekilde gösterebilirsiniz. Aşağıdaki şekli inceleyin. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TextBox1.Clear() Dim liste As ArrayList = New ArrayList liste.Add("Bahadır") liste.Add("Fatih") liste.Add("Ahmet") liste.Add("Haluk") liste.Sort() Dim isimliste As Object For Each isimliste In liste TextBox1.Text = TextBox1.Text & isimliste & vbCrLf Next End Sub Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Bilgisayar İsmini ve Kullanıcı Adını Öğrenmek Bilgisayarınızın adını ve kullanıcı adını öğrenmek için aşağıdaki kod parçasını Button un Click yordamına yazın. Şekli inceleyin. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TextBox1.Text = SystemInformation.ComputerName & "/" & SystemInformation.UserName End Sub Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
PictureBox ı Mouse İle Hareket Ettirin Formunuzun MouseMove özelliğine aşağıdaki kodları yazın. Picturebox ı çalışma anında hareket ettirin. Aşağıdaki şekilleri inceleyin. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load PictureBox1.Image = Image.FromFile("C:\pic1.jpg") PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage End Sub Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove With PictureBox1 .Top = e.Y .Left = e.X End With End Sub Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
TreeView Mesajlaşma Örnek Bu makalemizde treeview kullanarak çok basit bir mesajlaşma örneği göreceğiz. Formunuza 1 adet TreeView, TextBox, Button ve ImageList ekleyin. ImageListin Collection kısmına seçmiş olduğuz resimleri ekleyin. Public Class Form1 Private Sub btnEkle_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEkle.Click TreeView1.ImageList = ımageList1 TreeView1.Nodes.Add("Bahadır >" & txtMesaj.Text & " " & Now) txtMesaj.Clear() End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With TreeView1 .ShowRootLines = False .ShowPlusMinus = False End With End Sub Private Sub txtMesaj_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtMesaj.KeyPress If e.KeyChar = ChrW(Keys.Enter) Then e.Handled = True btnEkle_Click(sender, e) End If End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Çözünürlük Bulmak Bilgisayarınızın ekranın çözünürlüğünü ve İşletim sisteminizin kaç bit olduğunu bulan program. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim en, boy, bit en = Screen.PrimaryScreen.Bounds.Width boy = Screen.PrimaryScreen.Bounds.Height bit = Screen.PrimaryScreen.BitsPerPixel MsgBox("Ekran Çözünürlüğü: " & en & "x" & boy & vbCrLf & "Bit:" & bit) End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Ascii Kodlarını Yazdırmak Ascii kodlarını textbox a yazdıracağız. Formunuza 1 adet textbox ekleyin. Aşağıdaki şekli inceleyin. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim x, y As String Dim i As Integer TextBox1.Clear() TextBox1.Font = New System.Drawing.Font("Courier New", 12, FontStyle.Regular) For i = 32 To 255 x = i.ToString y = Chr(i) TextBox1.Text = TextBox1.Text & "chr(" & x & ")=" & y & Space(5) If (i - 31) Mod 7 = 0 Then i = i + 1 End If Next i End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Trafik Işıkları Trafik ışıkları örneğini vb.nette göreceğiz. Formunuza 1 adet timer ekleyin. Intervali 1000 olsun. kare.FillRectangle() ile kare dörtgen şekli, kirmizi.FillEllipse() ile eliptik şekli oluşturacağız. Aşağıdaki şekilleri inceleyin. Public Class Form1 Dim i As Integer = 0 Dim kirmizi As Graphics = Me.CreateGraphics Dim sari As Graphics = Me.CreateGraphics Dim yesil As Graphics = Me.CreateGraphics Dim kare As Graphics = Me.CreateGraphics Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Timer1.Interval = 1000 Timer1.Enabled = True End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Dim X As Integer X += 5 i = i + 1 If i > 0 And i <= 2 Then ‘kare şeklini oluşturuyoruz. ‘Aşağıda Brushes.Black ile şeklin arka plan rengi, X artış, 20 formda ‘ki üst kısımdaki boşluğu(top), 41 genişlik, 130 yüksekliği belirtir. kare.FillRectangle(Brushes.Black, X, 20, 41, 130) ‘yuvarlak kırmızı ışık şeklini oluşturuyorz. kirmizi.FillEllipse(Brushes.Red, X, 25, 40, 40) sari.FillEllipse(Brushes.Yellow, X, 65, 40, 40) yesil.FillEllipse(Brushes.Green, X, 105, 40, 40) ElseIf i > 2 And i <= 6 Then kare.FillRectangle(Brushes.Black, X, 20, 41, 130) kirmizi.FillEllipse(Brushes.Red, X, 25, 40, 40) sari.FillEllipse(Brushes.White, X, 65, 40, 40) yesil.FillEllipse(Brushes.White, X, 105, 40, 40) ElseIf i > 6 And i <= 7 Then kare.FillRectangle(Brushes.Black, X, 20, 41, 130) kirmizi.FillEllipse(Brushes.White, X, 25, 40, 40) sari.FillEllipse(Brushes.Yellow, X, 65, 40, 40) yesil.FillEllipse(Brushes.White, X, 105, 40, 40) ElseIf i > 7 And i <= 12 Then kare.FillRectangle(Brushes.Black, X, 20, 41, 130) kirmizi.FillEllipse(Brushes.White, X, 25, 40, 40) sari.FillEllipse(Brushes.White, X, 65, 40, 40) yesil.FillEllipse(Brushes.Green, X, 105, 40, 40) ElseIf i > 12 Then i = 3 End If End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Space Uygulaması Bu örneke space uygulamasını göreceğiz. Space ile karakter stringleri arasında istediğiniz uzunlukta boşluklar bırakabilirsiniz. Aşağıdaki şekli inceleyin. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click MsgBox("Space uygulaması..." & Space(30) & "Bahadır ŞAHİN") End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Sürükle Bırak (Drag-Drop) Bu örnekte resimlere ait dosya yollarını listbox a sürükle bırak metodu ile ekleyeceğiz. Daha sonra listbox taki seçili itemsteki image i PictureBox ta göstereceğiz. Aşağıdaki şekilleri inceleyin. Formunuza 1 adet ListBox,PictureBox ve 2 adet Label ekleyin. Public Class Form1 Private Sub Form1_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Me.DragDrop If CType(e.Data.GetData(DataFormats.FileDrop), System.Array)(0).Endswith(".bmp") = True Or CType(e.Data.GetData(DataFormats.FileDrop), System.Array)(0).Endswith(".jpg") = True Or CType(e.Data.GetData(DataFormats.FileDrop), System.Array)(0).Endswith(".jpeg") = True Or CType(e.Data.GetData(DataFormats.FileDrop), System.Array)(0).Endswith(".gif") = True Then ListBox1.SelectedIndex = ListBox1.Items.Add(CType(e.Data.GetData(DataFormats.FileDrop), System.Array)(0)) End If End Sub Private Sub Form1_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Me.DragEnter e.Effect = e.AllowedEffect End Sub Private Sub ListBox1_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles ListBox1.DragDrop If CType(e.Data.GetData(DataFormats.FileDrop), System.Array)(0).Endswith(".bmp") = True Or CType(e.Data.GetData(DataFormats.FileDrop), System.Array)(0).Endswith(".jpg") = True Or CType(e.Data.GetData(DataFormats.FileDrop), System.Array)(0).Endswith(".jpeg") = True Or CType(e.Data.GetData(DataFormats.FileDrop), System.Array)(0).Endswith(".gif") = True Then ListBox1.Items.Add(CType(e.Data.GetData(DataFormats.FileDrop), System.Array)(0)) End If End Sub Private Sub ListBox1_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles ListBox1.DragEnter e.Effect = e.AllowedEffect End Sub Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged PictureBox1.ImageLocation = ListBox1.SelectedItem.ToString End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Geçen Süreyi Hesaplama Girilen Başlangıç saatinden şu anki saate kadar geçen zamanı hesaplayacağız. Formunuza 1 adet Timer, 2 adet TextBox ve Button ekleyin. Aşağıdaki şekilleri inceleyin. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TextBox1.Text = Format(Now, "Long Time") End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Timer1.Enabled = True Timer1.Interval = 1000 End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Timer1.Enabled = False End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Dim gecensure As TimeSpan = New TimeSpan(0, 0, 0, 0, 0) Dim baslangic As String Dim bitis As Date baslangic = TextBox1.Text bitis = TimeOfDay gecensure = gecensure.Add(bitis.Subtract(baslangic)) TextBox2.Text = gecensure.ToString End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN
Label de Kayan Yazı Imports vb = Microsoft.VisualBasic i formunuza ekleyin. Bu örnekte Labeldeki yazıyı kaydıracağız. Formunuza Timer nesnesi ekleyin. Imports vb = Microsoft.VisualBasic Public Class Form1 Dim ilkharf, yazi Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Timer1.Enabled = True Timer1.Interval = 250 Label1.Text = " Bahadır ŞAHİN " End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick ilkharf = vb.Left(Label1.Text, 1) yazi = vb.Right(Label1.Text, Len(Label1.Text) - 1) Label1.Text = yazi + ilkharf End Sub End Class ‘Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Haftanın Gününe Göre Dosya Kopyalama Haftanın gününe göre seçilen dosyanın yedeğini alınmasını sağlıyacağız. Aşağıdaki şekilleri inceleyin. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim tarih As Date = Now Dim gun Dim gunadi gun = Weekday(tarih, FirstDayOfWeek.Monday) gunadi = WeekdayName(gun, False, FirstDayOfWeek.Monday) Dim gunsayi gunsayi = Weekday(tarih, FirstDayOfWeek.Monday) ‘kopyalacak text dosyası oluşturuluyor. ‘sizler istediğiniz dosyanın günlük olarak yedeğini ‘alabilirsiniz. Dim dosya As New System.IO.StreamWriter("C:\test" & gunsayi.ToString & ".txt") dosya.WriteLine("Bugün :" & tarih & " Günlerden : " & gunadi) dosya.Close() Dim i As Integer For i = 1 To 7 Step 1 ‘Ör:gün sayısı 3 ise Gün: Çarşamba ‘test3.txt dosyasını yedek3.txt olarak Çarşamba günü ‘kopyalayacaktır. If gunsayi = i Then FileCopy("C:\test" & gunsayi.ToString & ".txt", "C:\yedek" & gunsayi.ToString & ".txt") MessageBox.Show("C:\test" & gunsayi.ToString & " dosyası " & " C:\yedek" & gunsayi.ToString & ".txt" & " olarak kopyalandı") End If Next Me.Close() End Sub End Class ‘Bir sonraki makalede görüşmek üzere. Bahadır
Alan Hesaplama Üçgen, Kare, Diktdörtgen ve Kare nin alanlarının hesaplayacağız. Formunuza 1 adet ComboBox ve Button ekleyin. Public Class Form1 Dim alan As Double Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load ComboBox1.Text = "Lütfen seçiniz..." ComboBox1.Items.Add("Kare") ComboBox1.Items.Add("Dikdörtgen") ComboBox1.Items.Add("Üçgen") ComboBox1.Items.Add("Daire") End Sub Private Function alan_hesapla(ByVal kenar1 As Double, ByVal kenar2 As Double) As Double If ComboBox1.SelectedItem = "Kare" Then alan = Math.Pow(kenar1, 2) ‘veya ‘alan = kenar1 * kenar1 End If If ComboBox1.SelectedItem = "Üçgen" Then alan = (kenar1 * kenar2) / 2 End If If ComboBox1.SelectedItem = "Daire" Then alan = Math.PI * Math.Pow(kenar1, 2) ‘veya ‘alan = 3.14 * kenar1 * kenar1 End If If ComboBox1.SelectedItem = "Dikdörtgen" Then alan = kenar1 * kenar2 End If Return alan End Function Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim a1, a2 As Double If ComboBox1.SelectedItem = "Kare" Or ComboBox1.SelectedItem = "Daire" Then a1 = InputBox("1.sayı Girişi", "Mesaj") Else a1 = InputBox("1.sayı Girişi", "Mesaj") a2 = InputBox("2.sayı Girişi", "Mesaj") End If alan_hesapla(Val(a1), Val(a2)) MessageBox.Show("Alan Sonuç:" & alan_hesapla(a1, a2), ComboBox1.Text & " İşlem:", MessageBoxButtons.OK) End Sub End Class ‘Bir sonraki makalede buluşmak üzere. Bahadır
Formu Kapatırken Onay Mesajının Gelmesi Formumuzu kapatmak istediğimiz zaman, Onay mesajı gelecek ve biz Evet butonuna tıkladığımız zaman formumuz kapanacak. Public Class Form1 Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing If (MessageBox.Show("Formu Kapatmak İstiyormusunuz?", "Form Kapatma", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.Yes) Then 'Eğer MessageBoxButtons.YesNo da Evet tuşuna basarsak 'Formumuz kapatılacak. e.Cancel = False Else 'Formumuz Hayır a bastığımız zaman formumuz kapatılmayacak. e.Cancel = True End If End Sub End Class ‘Bir sonraki makalede buluşmak üzere. Bahadır
PrintDialog PrintDialog nesnesi ile TextBox taki stringi yazdıracağız. Formunuza 1 adet PrintDialog, Button ve TextBox ekleyin. Public Class Form1 Private WithEvents docToPrint As New Printing.PrintDocument Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click PrintDialog1.AllowSomePages = True PrintDialog1.ShowHelp = True PrintDialog1.Document = docToPrint Dim result As DialogResult = PrintDialog1.ShowDialog() If (result = DialogResult.OK) Then docToPrint.Print() End If End Sub Private Sub document_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles docToPrint.PrintPage Dim printFont As New System.Drawing.Font _ ("Arial", 12, System.Drawing.FontStyle.Regular) e.Graphics.DrawString(TextBox1.Text, printFont, _ System.Drawing.Brushes.Black, 10, 10) End Sub End Class Bir sonraki makalede buluşmak üzere. Bahadır
Cümledeki Karakter, Boşluk ve Kelime Sayısını Bulmak Bu örneğimizde TextBox taki cümledeki Karakter, Boşluk ve Kelime sayısını bulacağız. Formunuza 1 adet TextBox, Button ve 3 adet Label ekleyin. Aşağıdaki şekli inceleyin. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Label1.Text = "Cümledeki boşluk sayısı " Label2.Text = "Cümledeki harf sayısı " Label3.Text = "Cümledekı kelime sayısı " End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim a, f As String Dim c, I, d, w, x As Integer a = TextBox1.Text c = Len(a) LTrim(a) For I = 1 To c f = Mid(a, I, 2) If f = Strings.Space(2) Then d = d + 1 End If Next For I = 1 To c f = Mid(a, I, 1) If f = Strings.Space(1) Then w = w + 1 Else x = x + 1 End If Next Label1.Text = "Cümledeki boşluk sayısı: " & CStr(w) Label2.Text = "Cümledeki harf sayısı: " & CStr(x) Label3.Text = "Cümledekı kelime sayısı: " & CStr(w - d + 1) d = 0 w = 0 x = 0 End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır
Kapatma Tuşunu Etkisiz Hale Getirme Formun; üst menüsündeki kapatma tuşunu etkisiz hale getireceğiz. Aşağıdaki şekli inceleyin. Public Class Form1 Public Class CloseButton Private Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Integer, ByVal revert As Integer) As Integer Private Declare Function EnableMenuItem Lib "user32" (ByVal menu As Integer, ByVal ideEnableItem As Integer, ByVal enable As Integer) As Integer Private Const SC_CLOSE As Integer = &HF060 Private Const MF_BYCOMMAND As Integer = &H0 Private Const MF_GRAYED As Integer = &H1 Private Const MF_ENABLED As Integer = &H0 Public Shared Sub Disable(ByVal form As System.Windows.Forms.Form) Select Case EnableMenuItem(GetSystemMenu(form.Handle.ToInt32, 0), SC_CLOSE, MF_BYCOMMAND Or MF_GRAYED) Case MF_ENABLED Case MF_GRAYED Case &HFFFFFFFF Throw New Exception("Kapatma menüsü bulunamıyor") Case Else End Select End Sub End Class Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load CloseButton.Disable(Me) End Sub Private Sub Form1_SizeChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.SizeChanged CloseButton.Disable(Me) End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır
Harddiskinizin Boş Alanını Öğrenmek Bu makalede harddiskin kapasitesini, doluluk oranını, boş alanı getInfo methodundan yararlanarak öğreneceğiz. Formunuza 7 adet Label, 4 adet TextBox, 3 adet ProgressBar ekleyin. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim getInfo As System.IO.DriveInfo getInfo = My.Computer.FileSystem.GetDriveInfo("C:\") ‘Toplam kapasite TextBox1.Text = Format((getInfo.TotalSize / 1000000000), "#.##") & " GB." ‘Kullanılan Kapasite TextBox2.Text = Format(((getInfo.TotalSize - getInfo.TotalFreeSpace) / 1000000000), "#.##") & " GB." ‘Kalan Boş Alan TextBox3.Text = Format((getInfo.TotalFreeSpace / 1000000000), "#.##") & " GB." ‘Format TextBox4.Text = getInfo.DriveFormat ProgressBar1.Value = 100 ProgressBar2.Value = 100 * (Val(TextBox2.Text) / Val(TextBox1.Text)) ProgressBar3.Value = 100 * (Val(TextBox3.Text) / Val(TextBox1.Text)) Label5.Text = "% 100" Label6.Text = "% " & Format(100 * (Val(TextBox2.Text) / Val(TextBox1.Text)), "#.##") Label7.Text = "% " & Format(100 * (Val(TextBox3.Text) / Val(TextBox1.Text)), "#.##") End Sub
İl Adını Girip İl Trafik Kodu ve Telefon Kodunu Almak Bu örnekte İl adını yazdığımızda, o ile ait telefon kodunu alacağız. Formunuza 1 adet TextBox,ListBox ve Button ekleyin. Aşağıdaki şekilleri inceleyin. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click Dim itemIndex As Integer itemIndex = ListBox1.FindString(TextBox1.Text) ListBox1.SelectedIndex = itemIndex Dim telefon() As String = {322, 416, 272, 472, 382, 358, 312, 242, 478, 466, 256, 266, 378, 488, 458, 228, 426, 434, 374, 248, 224, 286, 376, 364, 258, 412, 380, 284, 424, 446, 442, 222, 342, 454, 456, 438, 326, 476, 246, 212, 232, 344, 370, 338, 474, 366, 352, 318, 288, 386, 348, 262, 332, 274, 422, 236, 482, 324, 252, 436, 384, 388, 452, 328, 464, 264, 362, 484, 368, 346, 414, 486, 282, 356, 462, 428, 276, 432, 226, 354, 372} Dim ilkodu() As String = {1, 2, 3, 4, 68, 5, 6, 7, 75, 8, 9, 10, 74, 72, 69, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 81, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 76, 32, 34, 35, 46, 78, 70, 36, 37, 38, 71, 39, 40, 79, 41, 42, 43, 44, 45, 47, 33, 48, 49, 50, 51, 52, 80, 53, 54, 55, 56, 57, 58, 63, 73, 59, 60, 61, 62, 64, 65, 77, 66, 67} MessageBox.Show("İl Adı:" & ListBox1.SelectedItem & vbCrLf & "Telefon Kodu:" & telefon(ListBox1.SelectedIndex) & vbCrLf & "İl Trafik Kodu:" & ilkodu(ListBox1.SelectedIndex), "İl Bilgi", MessageBoxButtons.OK) End Sub Bir sonraki makalede görüşmek üzere. Bahadır
Esc, CapsLock Tuşuna Basıldığında Uyarı Mesajının Gelmesi Bu örnekte Esc veya CapsLock gibi tuşlara basıldığı zaman uyarı mesajı alacağız. Bunu formun keydown olayına yazacağımız küçük kod parçacığı ile gerçekleştireceğiz. Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown If (e.KeyCode = Keys.Escape) Then MessageBox.Show("ESC tuşuna bastınız") ElseIf (e.KeyCode = Keys.CapsLock) Then MessageBox.Show("CapsLock tuşuna bastınız") End If End Sub Bir sonraki makalede görüşmek üzere. Bahadır
CapsLock, NumLock Açık Kapalı Kontrol Arkadaşlar bu örneğimizde CapsLock, NumLock, ScrollLock açık mı kapalı mı olduğunu kontrol edeceğiz. Formunuzu 1 adet Timer, 3 adet Label ve TextBox ekleyin. Aşağıdaki şekilleri inceleyin. Şekil 2 de de çalışma anında yapılan değişikliği görebilirsiniz. Bir sonraki makalede CapsLock, Numlock tuşuna basıldığı zaman uyarı mesajı verecek olan küçük örneğimizi göreceğiz. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Timer1.Enabled = True Timer1.Interval = 1000 End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick If (My.Computer.Keyboard.NumLock) Then TextBox1.Text = "AÇIK" Else TextBox1.Text = "KAPALI" End If If (My.Computer.Keyboard.CapsLock) Then TextBox2.Text = "AÇIK" Else TextBox2.Text = "KAPALI" End If If (My.Computer.Keyboard.ScrollLock) Then TextBox3.Text = "AÇIK" Else TextBox3.Text = "KAPALI" End If End Sub Bir sonraki makalede görüşmek üzere. Bahadır
RichTextBox ta Kelime Arama RichTextBox içinde kelimeyi aratacağız. Aradığımız kelime birden fazla RichTextBox ta tekranlansa bile hepsini aynı anda kırmızı renkte göstereceğiz. Aşağıdaki şekli inceleyin. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub setTextColor(ByVal pStr As String, ByVal pColor As Drawing.Color) End Sub Private Sub btnAra_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAra.Click renk() End Sub Sub renk() Dim pStr As String Dim pColor As Drawing.Color pColor = Color.Red pStr = txtAra.Text Dim i As Integer Dim posAnt As Integer posAnt = -1 RichTextBox1.SelectionStart = 0 RichTextBox1.SelectionLength = 0 For i = 0 To 1000 If i = 0 Then RichTextBox1.Find(pStr, 0, RichTextBoxFinds.WholeWord) Else RichTextBox1.Find(pStr, RichTextBox1.SelectionStart + 1, RichTextBoxFinds.WholeWord) End If If posAnt = RichTextBox1.SelectionStart Then Exit For End If RichTextBox1.SelectionFont = New Font("Courier New", 9, FontStyle.Regular) RichTextBox1.SelectionColor = pColor posAnt = RichTextBox1.SelectionStart Next End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır
Öğrenci Ders Notu Hesaplama Bu örnek te basit bir şekilde öğrencinin dersten aldığı notu hesaplayacağız. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim sayi(3) As Integer sayi(0) = InputBox("1. not girişi", "Not Girişi") sayi(1) = InputBox("2. not girişi", "Not Girişi") sayi(2) = (sayi(0) + sayi(1)) / 2 Select Case sayi(2) Case Is < 50 MessageBox.Show("Üzgünüz Kaldınız. Sınav Ortalamanız: " & sayi(2)) Case Is > 50 MessageBox.Show("Tebrikler dersi geçtiniz. Sınav Ortalamanız: " & sayi(2)) End Select End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır
Midi Chield Form Oluşturma Formumuzun içinde midi formlar oluşturacağız. Aşağıdaki şekli inceleyin. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim midiForm As New Form ‘Form1 in IsMdiContainer özelliğini true yapın ‘Form1 içinde 1 den fazla midiform oluşturulur. Me.IsMdiContainer = True midiForm.MdiParent = Me midiForm.Show() End Sub End Class ‘Bir sonraki makalede görüşmek üzere. Bahadır
Tarih ve Saat Fonksiyonları Visual Basic.NET de , tarihi saati , hangi gün veya hangi ayda olduğumuzu öğrenmek için bu fonksiyonları kullanırız. 1. Now() Bu fonksiyon , şu anki tarih saat bilgisini verir. Tabiki tüm tarih saat fonksiyonları sistem saatini kullandığı için , bilgisayarınızda o an hangi tarih saat geçerli ise , o değeri döndürecektir. Örnekler : Msgbox(Now()) Label1.Text = Now() 2. Day(deger) Bu fonksiyon deger olarak belirtilen tarihin gününü döndürür. Deger olarak belirtilen değişken geçerli bir tarih olmalıdır. Örnekler : Day(12.10.2006) = dönen değer 12 olacaktır. Day(Now()) = bugünün gün değeri dönecektir. 3. Weekday(date[, firstdayofweek]) Bu fonksiyon date değişkeni ile belirtilen tarihin ,haftanın kaçıncı günü olduğu değerini döndürür. İkince değişken ise isteğe bağlı olup haftanın ilk gününü ayarlamak için kullanılır. İngilizce işletim sistemine sahip bir bilgisayarda haftanın ilk günü Pazar olacaktır ama Türkçe işletim sistemine ait bir bilgisayarda haftanın ilk günü pazartesi olacaktır. Bu fonksiyon haftanın günlerini 1 den 7 ye kadar numaralandırarak seçili olan günü geri döndürür. Pazartesi 1 , Salı 2 , Çarşamba 3 ….. şeklinde devam etmektedir. Örnekler : MsgBox(Weekday(Now, FirstDayOfWeek.System)) = burada bugün Cuma olduğu için 5 değeri dönecektir. Haftanın ilk günü ayarını ise işletim sistemine bıraktım. 4. WeekdayName(weekday[, abbreviate[, firstdayofweek]]) Bu fonksiyon , weekday değişkeni ile belirtilen günün ismini döndürür. Abbreviate değişkeni ilede , gün isminin kısamı uzunmu gösterileceği ayarlanır. ( Paz, Pzt , Salı , Cuma gibi ) . Üçüncü değişken diğer fonksiyonda olduğu gibi haftanın ilk gününü ayarlamak için kullanılmaktadır. Örnekler : MsgBox(WeekdayName(5, False, FirstDayOfWeek.System)) = Dönen değer -> Cuma MsgBox(WeekdayName(5, True, FirstDayOfWeek.System)) = Dönen değer -> Cum 5. Month(date) Bu fonksiyon date değişkeni ile belirtilen tarihin ,yılın kaçıncı ayı olduğu değerini döndürür. Ocak = 1 , Şubat = 2 , Mart = 3 şeklinde , 1 den 12 ‘ye kadar integer değer döndürür. Örnekler : Month(Now()) = Dönen değer = 7 olacaktır. Temmuz yılın 7 nci ayıdır. 6. MonthName(month[, abbreviate]) Bu fonksiyon ile month ile belirtilen ( 1 den 12 ye kadar ay numaraları ) ayın ismini döndürür. İkinci değişken isteğe bağlı olup , dönen ay adının uzunmu yoksa kısamı olacağını ayarlamaya yarar. Örnekler : Msgbox(MonthName(7)) = Dönen değer Temmuz olacaktır. 7. Year(date) Bu fonksiyon , date değişkeni ile belirtilen tarihin yıl değerini döndürür. Örnekler : Msgbox(Year(Now()) = dönen değer 2006 olacaktır. 8. Hour(time) Bu fonksiyon ile , time değişkeni ile belirtilen zamanın saat değer 0 dan 24 ‘e kadar olan integer türünden bir değer döndürür. Örnekler : Now() = fonksiyonu 14.07.2006 11:28:30 değerinin döndürürken Hour(Now()) fonksiyonu = 11 değerini döndürür 9. Minute(time) Bu fonksiyon ile , time değişkeni ile belirtilen zamanın dakika değeri , 0 dan 60 a kadar olan integer türünden bir değer döndürür. Örnekler : Now() = fonksiyonu 14.07.2006 11:28:30 değerinin döndürürken Minute(Now()) fonksiyonu = 28 değerini döndürür 10. Second(time) Bu fonksiyon ile , time değişkeni ile belirtilen zamanın saniye değeri , 0 dan 60 a kadar olan integer türünden bir değer döndürür. Örnekler : Now() = fonksiyonu 14.07.2006 11:28:30 değerinin döndürürken second(Now()) fonksiyonu = 30 değerini döndürür 11. DateSerial(year, month, day) Bu fonksiyon dışarında 3 değişken ile integer türünden bir veri almakta ve girilen sayıları tarih olarak geri döndürmektedir. MsgBox(DateSerial(2005, 7, 1)) şeklinde bir fonksiyon 01.07.2005 olarak geri dönecektir. Bu fonksiyonun kullanım yeri sadece bunula sınırlı değildir. Herhangi bir yılın 90 ncı günü, hangi tarihe geliyor diye merak ediyorsanız yapmanız gereken tek şey aşağıdaki gibi bir fonksiyon kurmak ; DateSerial(1996, 1, 90) 1996 yılının 90 ncı günü nedir gibi bir fonksiyonun dönen değeri = 30.03.1996 olacaktır. Bir başka kullanım şeklide; mesela bugünden sonra 1000 nci gün hangi tarihe gelir gibi bir soruya cevabı aşağıdaki fonksiyon verecektir; MsgBox(DateSerial(Year(Now. Date), Month(Now. Date),Weekday(Now. Date) + 1000)) Eğer bugünü 14.07.2006 olarak kabul edersek dönen değer = 01.04.2009 olacaktır. Aynı şekilde yıl, ay içinde toplama ve çıkartma işlemlerini kullanarak, istediğimiz bir tarihi bulabiliriz. 12. DateValue(date) Bu fonksiyon string olarak girilen tarih değerini normal tarihe çevirir. Örnekler; DateValue(“12 Kasım 2007” ) fonksiyonu 12.10.2007 olarak geri dönecektir. Bu fonksiyonun güzel bir özelliğide, iki tarih arasında kaç gün olduğunu öğrenmek içinde kullanılabilir. Finansal programlar için DateSerial kadar iyi bir fonksiyondur. MsgBox(DateDiff(DateInterval. Day, DateValue(“25.12.1993”), DateValue(“25.12.1996”))) Bu şekilde kullanılan bir fonksiyon ile 25.12.1993 ve 25.12.1996 tarihleri arasında kaç gün olduğunu öğrenebiliriz. Dönen değer 1096 gün olacaktır. 13. TimeSerial(hours, minutes, seconds) Bu fonksiyon DateSerial fonksiyonu gibi çalışmakta ,yalnız tek farkı tarih üzerinde değil , zaman üzerinde çalışmasıdır. Dışarıdan girilen 3 değişkeni zaman olarak geri döndürür. TimeSerial(4, 10, 55) = dönen değer = 04:10:55 oalcaktır. Yine Dateserial fonksiyonunda olduğu gibi , saat dakika ve saniyede çıkartma toplama gibi işlemler yaparak ,istediğimiz bir saati bulmamız mümkündür TimeSerial(16 - 2, 13 - 15, 40 - 32) = dönen değer 13:58:08 olacaktır. 14. TimeValue(time) Bu fonksiyonda DateValue() fonksiyonu ile aynı özelliklere sahiptir. 15. DateAdd(interval, number, date) Bu fonksiyon, interval değişkeni ile belirtilen tarihe,number değişkeni ile belirtilen değeri ekler. İnterval değişkenin alabileceği değerler şunlardır; Year Quarter Month DayOfYear Day WeekDay WeekOfYear Hour Minute Second DateAdd(DateInterval.Month, 1, Now)= bu fonksiyon ile ,bir sonraki ay değeri dönecektir. 14.08.2006 11:20:00 şeklinde değer dönecektir. 16. DateDiff(interval, date1, date2[, firstdayofweek[,firstweekofyear]]) Bu fonksiyon ile , iki tarih arasındaki farkı almamız münkün. İnterval özelliği ile ( bir önceki listede var),iki tarih arasındaki hangi farkı almak istiyorsak onu ayarlarız. Date1 ve date2 değişkenleri ile tarih farkı alınacak olan değerler belirtilir. Diğer iki değişen isteğe bağlı olup system olarak seçilebilir. Örnekler ; Mesela ben doğalı kaç gün olmuş gibi bir hesap için ; Dim dogumtarihi As Date = "16.09.1979" MsgBox(DateDiff(DateInterval.Day, dogumtarihi, Now())) 17. DatePart(interval,date[,firstdayofweek[, firstweekofyear]]) Bu fonskiyon ile , date değişkeni ile belirtilen bir tarihin , istediğimi bilgisine ulaşabiliriz. İnterval değişkeni ise , aşağıdaki tabloda belirtilen şekilde kullanılmalıdır. Karakter Açıklaması : Saat , dakika , saniyeyi ayrımak için kullanılır / Gün , ay , yılı ayırmak için kullanılır. D Belirtilen günün numarasını verir. (1–31). dd Belirtilen günün numarasını verir , tek numaraların başına 0 ekler. (01–31). ddd Gün isimlerinin kısaltmalarını verir. (Paz , Sal gibi). dddd Gün isimlerinin tam adını görüntüler (Pazar , Salı gibi). w Günün haftanın kaçıncı günü olduğunu gösterir. (1- 7 arası). Ww Yılın kaçıncı haftası olduğunu gösterir. (1–54). M Belirtilen tarihin ay numarasını verir. ( 0 – 12 arası ) MM Belirtilen tarihin ay numarasını verir. Tek rakamların önüne 0 koyar( 01 – 12 arası ) MMM Kısa ay adlarını gösterir (Oca. , Şub gibi). MMMM Ayların tam adını görüntüler (Ocak , Şubat gibi). q Yılın kaçıncı çeyreğinde olduğunu gösterir. (1–4). y Yılın kaçıncı günü olduğunu gösterir. (1–366). yy Yıl numaralrının iki rakamlı gösterir. (00–99). yyyy Yıl numaralarını 4 rakamlı gösterir. (0100–9999). h Saati gösterir (0–12). Hh Saati iki rakamlı gösterir. (00–12). H 24 saat formatına göre saati gösterir. (0–24) HH 24 saat formatına göre saati 2 rakamlı gösterir. (00–24) m Dakikayı gösterir. (0–59). mm Dakikayı iki rakamlı gösterir. (00–59). s Saniyeyi gösterir. (0–59). ss Saniyeyi iki rakamlı gösterir. (00–59). Örnekler ; Dim tarih as DateTime = Now() -- > değerin 14.07.2006 12:25:50 olduğunu varsayalım DatePart(“yyyy”, tarih)) = dönen değer 2006 olacaktır DatePart(“q”, day1)) = dönen değer 3 olacaktır. Temmuz ayı yılın 3 ncü çeyreği içindedir.( Ocak-Şubat-Mart = 1 / -Nisan-Mayıs-Haziran = 2 / Temmuz-Ağustos-Eylül = 3 ……….gibi) DatePart(“m”, day1)) = dönen değer 7 olacaktır.
Doğum Gününü Bulma Hangi gün doğduğunuzu bulan program. Weekday yordamını kullanarak doğum gününüzün hangi gün olduğunu öğreniyorsunuz. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim d_tarih, gun Show() Do d_tarih = InputBox("Doğum Tarihinizi Giriniz : ") Loop While Not IsDate(d_tarih) Select Case Weekday(d_tarih) Case 1 : gun = "Pazar" Case 2 : gun = "Pazartesi" Case 3 : gun = "Salı" Case 4 : gun = "Çarşamba" Case 5 : gun = "Perşembe" Case 6 : gun = "Cuma" Case 7 : gun = "Cumartesi" End Select MsgBox(gun & " Günü Doğmuşsunuz") End Sub End Class
Matematiksel İşlemlerde Sayının Ondalık Kısmının Alınması Bu örnekte yapılan bölme işleminde elde edilen sayının ondalık kısmınında gösterimini sağlayacağız. Formunuza 3 adet TextBox, 2 adet label ve Button ekleyin. Aşağıdaki şekili inceleyin. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim sayi As Single TextBox3.Text = Val(TextBox1.Text) / Val(TextBox2.Text) sayi = Val(TextBox3.Text) sayi = Format(sayi, "#,##0.00") TextBox3.Text = sayi End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır
İl İl Namaz Vakitlerini Öğrenme Bu makalemizde http://www.webservisler.com sitesinin xml dosyasından illerin namaz vakitlerini gün gün çekeceğiz. Aşağıdaki şekli inceleyin. Formunuza 7 adet TextBox, 1 adet Combobox ve button ekleyin. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Text = "İl İl Günlük Namaz Vakitleri" .MaximizeBox = False .Size = New System.Drawing.Size(249, 289) .Location = New Point(300, 200) End With End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAl.Click If ComboBox1.Text = "" Then MsgBox("İl Seçiniz", MsgBoxStyle.OkOnly, "Namaz Vakitleri") End If Dim ds As DataSet = New DataSet ‘ds.ReadXml("http://www.webservisler.com/xml/NamazVakitleri.php?sehir=istanbul ") ‘ veya aşağıdaki gibi ds.ReadXml("http://www.webservisler.com/xml/NamazVakitleri.php?sehir=" & ComboBox1.Text) Dim namaz_vakitleri As DataRow = ds.Tables(0).Rows(0) With Me .txtTarih.Text = namaz_vakitleri(1) .txtImsak.Text = namaz_vakitleri(2) .txtGunes.Text = namaz_vakitleri(3) .txtOgle.Text = namaz_vakitleri(4) .txtIkindi.Text = namaz_vakitleri(5) .txtAksam.Text = namaz_vakitleri(6) .txtYatsi.Text = namaz_vakitleri(7) End With End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır
Dosya Kopyalama Bu örnekte FileCopy metodu ile txt, doc, xls, jpg vb. uzantıdaki dosyaları mevcut konumlarından istediğiniz konuma kopyalamayı göreceğiz. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.FormBorderStyle = Windows.Forms.FormBorderStyle.SizableToolWindow Me.Text = "Dosya Kopyalama" Me.Left = 300 Me.Top = 180 Me.Width = 205 Me.Height = 108 Button1.Size = New System.Drawing.Size(150, 30) Button1.Text = "Yeni Dizine Kopyala" End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click FileCopy("C:\dosya\deneme.txt", "C:\deneme.txt") FileCopy("C:\dosya\deneme.doc", "C:\deneme.doc") FileCopy("C:\dosya\deneme.xls", "C:\deneme.xls") FileCopy("C:\dosya\deneme.jpg", "C:\deneme.jpg") MessageBox.Show("Dosyalar yeni dizine kopyalandı") End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır
TextBox a Girilen Yazıyı Tersten Yazdırma Formunuza 1 adet Label, Textbox ve Button ekleyin. Textbox a girilecek text i tersten yazdıracağız. Aşağıdaki şekili inceleyiniz. Public Class Form1 Dim degistir As Integer = 0 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim TerstenYazdirma As String Dim Say As Integer baslangic: degistir = degistir + 1 If Len(TextBox1.Text) = 0 Then MsgBox("Lütfen Yazı Giriniz...") degistir = 0 Exit Sub End If Select Case degistir Case 1 For Say = 0 To Len(TextBox1.Text) - 1 TerstenYazdirma = TerstenYazdirma + Mid(TextBox1.Text, Len(TextBox1.Text) - Say, 1) Next Label1.Text = TerstenYazdirma Button1.Text = "Normal Yazdır" Case 2 Label1.Text = TextBox1.Text Button1.Text = "Tersten Yazdır" Case Is > 2 degistir = 0 GoTo baslangic End Select End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Text = "Ters-Düz Yazdırma" Me.MaximizeBox = False Me.Width = 180 Me.Height = 144 Me.Left = 300 Me.Top = 180 Label1.Text = "Girilen Yazıyı Tersten Yazdırma" Button1.Text = "Tersten Yazdır" Button1.Size = New System.Drawing.Size(150, 30) TextBox1.Size = New System.Drawing.Size(150, 30) End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır
Animasyon Form Formunuza 1 adet Timer ekleyin. Timer ın interval ini 10 yapın. Aşağıdaki kodları yazın. Public Class Form1 Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Dim ilkboy, sonboy, ilken, sonen Dim i, j ilkboy = 300 sonboy = 600 ilken = 300 sonen = 600 Me.Width = ilken Me.Height = ilkboy For i = ilkboy To sonboy Me.Height = i If Me.Height = sonboy Then For j = ilken To sonen Me.Width = j If j = sonen Then Timer1.Enabled = False End If Next j End If Next i End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Timer1.Interval = 10 Timer1.Enabled = True End Sub End Class Bir sonraki makalede görüşmek üzere. Bahadır
İki Sayı Arasındaki Tek Sayı, Çift Sayı İşlemleri Bu örneğimizde InputBoxtan girilen sayı aralığındaki tek sayı, çift sayıların toplamını alacağız. Formunuza 3 adet RadioButton 1 adet Button ekleyin. Aşağıdaki resimleri inceleyin. Public Class Form1 Function sayi_kontrol(ByVal n As Integer) As Boolean sayi_kontrol = True If n And 1 Then sayi_kontrol = False End Function Private Sub btnGiris_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGiris.Click If rb1.Checked = False And rb2.Checked = False And rb3.Checked = False Then MsgBox("Seçiminizi yapınız", MsgBoxStyle.OkOnly, "Bahadirsa Seç") Exit Sub End If Dim i, bas, son, l, m As Integer For i = 1 To 2 Step 1 If i = 1 Then bas = InputBox(i & ". sayı girişi", "Sayı Girişi", 0) End If If i = 2 Then son = InputBox(i & ". sayı girişi", "Sayı Girişi", 0) End If Next If rb1.Checked Then For l = bas To son m = (son) * (son + 1) / 2 - ((bas) * (bas + 1) / 2) Next MsgBox(bas & "-" & son & " aralığındaki sayıların toplamı: " & m, MsgBoxStyle.OkOnly, "Sayı Toplamı...Bahadirsa") End If If rb2.Checked Then If sayi_kontrol(bas) Then bas = bas + 1 Else bas = bas End If If sayi_kontrol(son) Then son = son - 1 Else son = son End If For l = bas To son Step 2 m = ((son + 1) / 2) ^ 2 - ((bas + 1) / 2) ^ 2 Next MsgBox(bas & "-" & son & " aralığındaki tek sayıların toplamı: " & m, MsgBoxStyle.OkOnly, "Sayı Toplamı...Bahadirsa") End If If rb3.Checked Then If sayi_kontrol(bas) Then bas = bas Else bas = bas + 1 End If If sayi_kontrol(son) Then son = son Else son = son - 1 End If For l = bas To son Step 2 m = ((son) / 2) * (((son) / 2) + 1) - ((bas) / 2) * (((bas) / 2) + 1) Next MsgBox(bas & "-" & son & " aralığındaki çift sayıların toplamı: " & m, MsgBoxStyle.OkOnly, "Sayı Toplamı...Bahadirsa") End If End Sub Private Sub rb1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles rb1.MouseMove rb1.Cursor = Cursors.Hand End Sub Private Sub rb2_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles rb2.MouseMove rb2.Cursor = Cursors.Hand End Sub Private Sub rb3_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles rb3.MouseMove rb3.Cursor = Cursors.Hand End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Text = "Tek ve Çift Sayı Toplama...Bahadirsa" .MaximizeBox = False .Size = New System.Drawing.Size(328, 147) .Location = New Point(250, 250) End With End Sub End Class Bir sonraki makalede buluşmak üzere...Bahadır
InputBox tan Girilen Sayıları Büyükten Küçüğe Sıralama Bu örneğimizde InputBox tan girilen sayıları ListBox ta büyükten küçüğe sıralamayı göreceğiz. Public Class Form1 Private Sub btnGir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGir.Click Dim i, j, k, yedek As Integer Dim sayi(10) As Long ‘sayi(10) indisli değişkendir For i = 1 To 10 sayi(i) = InputBox(i & ".Sayıyı Giriniz...") ‘sayıları alıyoruz Next For i = 1 To 10 For j = 1 To 10 If sayi(i) > sayi(j) Then yedek = sayi(j) sayi(j) = sayi(i) sayi(i) = yedek End If Next j Next i ‘Buyukten Kucuge Siralama For k = 1 To 10 ListBox1.Items.Add(sayi(k)) Next ‘Kucukten Buyuge Siralama ‘For k = 10 To 1 Step -1 ‘ListBox1.Items.Add(sayi(k)) ‘Next End Sub End Class
İnternet Bağlantısını Kontrol Etmek Formunuza 1 adet Button ekleyin ve aşağıdaki kodu yazın. Public Class Form1 Private Sub btnKontrol_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnKontrol.Click If My.Computer.Network.IsAvailable = True Then MsgBox("Bilgisayarınız İnternete Bağlı.") Else MsgBox("Bilgisayarınız İnternete Bağlı Değil.") End If End Sub End Class Bir sonraki makalede buluşmak üzere.Bahadır
Geri Sayım-Timer Uygulaması Bu makalemizde Rapidshare deki gibi geri sayım uygulaması yapacağız. Combobox nesnesinden seçilen dakika ve saniyeden geriye doğru saydıracağız. Ayrıca timer ın interval değerini, formun rengini vb... işlemleri çalışma anında yapabileceğiz. Aşağıdaki şekilleri inceleyin. Formunuza 1 adet Timer, 3 adet Label ve 4 adet Combobox nesnesi ekleyin. Public Class Form1 Dim i As Integer = 5 Dim j As Integer = 59 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Timer1.Enabled = False Timer1.Interval = 1000 Label1.Text = "0" & i Label2.Text = "00" Label3.Text = ":" cmb1.Text = "59" cmb2.Text = "0" cmb3.Text = "Timer Hızını Ayarla" cmb1.Enabled = False cmb2.Enabled = False cmb3.Enabled = False cmb4.Text = "Renk Ayarla" With Me .Text = "Geri Sayım" .Location = New Point(250, 150) .MaximizeBox = False .MinimizeBox = False End With End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick If j = 59 Then i = i - 1 If i < 9 Then Label1.Text = "0" & i Else Label1.Text = i End If ElseIf j = -1 Then If i > 9 Then i = i - 1 Label1.Text = i j = 59 ElseIf i > 0 And i <= 9 Then i = i - 1 Label1.Text = "0" & i j = 59 ElseIf i <= 0 Then j = 0 i = 0 Label3.Text = ":" Timer1.Enabled = False End If End If If Label3.Text = ":" Then Label3.Text = "" Else Label3.Text = ":" End If If j > 9 Then Label2.Text = j Else Label2.Text = "0" & j End If If i = 0 And j = 0 Then Label3.Text = ":" btnBaslat.Text = "Baslat" Timer1.Enabled = False MsgBox("Süre Bitti", MsgBoxStyle.OkOnly, "Bahadirsa Mesaj") Exit Sub End If j = j - 1 End Sub Private Sub btnBaslat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnBaslat.Click If Timer1.Enabled = False Then Timer1.Enabled = True btnBaslat.Text = "Durdur" Else Timer1.Enabled = False btnBaslat.Text = "Başlat" End If End Sub Private Sub cbox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cbox1.CheckedChanged Label3.Text = ":" If cbox1.Checked Then cmb1.Enabled = True cmb2.Enabled = True cmb3.Enabled = True i = cmb1.Text j = cmb2.Text Label1.Text = i If i <= 9 Then Label1.Text = "0" & i End If If j > 9 Then Label2.Text = j Else Label2.Text = "0" & j End If Else i = 5 j = 0 Label1.Text = "0" & i Label2.Text = "0" & j Label3.Text = ":" Timer1.Enabled = False cmb1.Enabled = False cmb2.Enabled = False cmb3.Enabled = False btnBaslat.Text = "Başlat" End If End Sub Private Sub cmb3_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmb3.SelectedIndexChanged Timer1.Interval = cmb3.Text End Sub Private Sub cmb1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmb1.SelectedIndexChanged cbox1_CheckedChanged(sender, e) End Sub Private Sub cmb2_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmb2.SelectedIndexChanged cbox1_CheckedChanged(sender, e) End Sub Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmb4.SelectedIndexChanged If ColorDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then If cmb4.SelectedIndex = 0 Then Label1.ForeColor = ColorDialog1.Color Label2.ForeColor = ColorDialog1.Color Label3.ForeColor = ColorDialog1.Color ElseIf cmb4.SelectedIndex = 1 Then Label1.BackColor = ColorDialog1.Color Label2.BackColor = ColorDialog1.Color Label3.BackColor = ColorDialog1.Color ElseIf cmb4.SelectedIndex = 2 Then Me.BackColor = ColorDialog1.Color End If End If End Sub End Class Bir sonraki makalede buluşmak üzere...Bahadır
Linklabel Kullanımı Bu örnekte linklabel kullanımını göreceğiz. Forma 1 adet Linklabel ekleyin. Linklabel ile formunuzdan istediğiniz web sitesine veya mail adresine link verebilirsiniz...Bahadirsa ublic Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Size = New System.Drawing.Size(380, 114) .Location = New Point(200, 150) .Text = "LinkLabel...Bahadirsa" .MaximizeBox = False End With LinkLabel1.Text = "http://bahadirsam.somee.com" LinkLabel1.Font = New Font("Verdana", 12, FontStyle.Regular) LinkLabel1.Links.Add(0, LinkLabel1.Text.Length, "http://bahadirsam.somee.com") End Sub Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked System.Diagnostics.Process.Start(e.Link.LinkData) End Sub End Class Bir sonraki makalede buluşmak üzere... Bahadirsa
Sayı İçinde Harf Olduğunu Anlama Bu makalemizde TextBox içinde harf olup olmadığını, girilen harfleri ve Textbox ta kaçıncı sırada olduğunu tespit edeceğiz. Aşağıdaki şekili inceleyin. Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Label1.Text = "" Label2.Text = "" Label3.Text = "" End Sub Private Sub btnTikla_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTikla.Click Label2.Text = "" Label3.Text = "" Dim a, i As Integer, b As Integer, c As String a = Len(txtGiris.Text) i = 0 For b = 1 To a c = Mid(txtGiris.Text, b, 1) Select Case c Case "a" To "z" i = i + 1 Label1.Text = "Girdiğiniz sayı içinde " & i & " harf var" If i = 1 Then Label2.Text = Label2.Text & txtGiris.Text.Substring(b - 1, 1) Label3.Text = Label3.Text & b Else Label2.Text = Label2.Text & "," & txtGiris.Text.Substring(b - 1, 1) Label3.Text = Label3.Text & "," & b End If End Select Next Label2.Text = "Harfler: " & Label2.Text Label3.Text = "Harflerin Sırası: " & Label3.Text End Sub End Class Bir sonraki makalede buluşmak üzere...Bahadirsa
Bilgisayarın Mac Adresini Öğrenmek Bir önceki makalede Mac adresleri ile ilgili bilgi verilmişti. Bu makalemizde kod yazarak mac adresini öğrenmeye çalışacağız. Bilgisayarın mac adresini alabilmek için ilk önce yapmamız gereken; Project kısmından Add Reference den System.Management i formumuza eklemek. Daha sonra aşağıdaki kodları formunuza yazmak. Aşağıdaki şekil i inceleyin. Imports System Imports System.Management Public Class Form1 Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click GetMACAddress() End Sub Public Function GetMACAddress() As String Dim mc As New ManagementClass("Win32_NetworkAdapterConfiguration") Dim moc As ManagementObjectCollection = mc.GetInstances() Dim MACAddress As String = [String].Empty For Each mo As ManagementObject In moc If MACAddress = [String].Empty Then If CBool(mo("IPEnabled")) = True Then MACAddress = mo("MacAddress").ToString() TextBox5.Text = MACAddress End If End If mo.Dispose() Next MACAddress = MACAddress.Replace(":", "") Return MACAddress End Function End Class Bir sonraki makalemizde görüşmek üzere...Bahadirsa
Mac Adresi ile İlgili Kısa Bilgiler Mac Adresi Nedir ? Ethernet, Token Ring, Wi-Fi, Bluetooth, FDDI, SCSI gibi protokollerde kullanılmak üzere, herhangi bir bilgisayar ağında, bir cihazın ağ donanımını tanımaya yarar. MAC kelimesi Ortam Erişim Yönetimi anlamına gelir ve kısaltma terimini de İngilizce olarak yazılan anlamının yani Media Access Control baş harflerinden almıştır.. MAC adresleri 48 bitlik şifrelere yazılır ve her donanımın ayrı bir MAC adresi vardır, yani şu anda kullandığımız bilgisayarın ağ kartında ve modeminde kendine özel bir MAC numarası vardir.. Bu yüzden bir ağ kartları bir diğer ağ kartına veriyi yollarken alıcıyı diğerlerinden ayırmak için MAC adresinden faydalanır. Her ne kadar birbirine denk gelmesi muhtemel iki donanım olsa da, 48 bit çatısı altında üretilen numara, 2 üzeri 48 değerinde yani = 281,474,976,710,656 çeşit ağ kartını tanımlamak mümkündür ve bu kadar değer arasında birbirine denk gelmesi muhtemel görülmemektedir. MAC adreslerinde ilk 3 değer dağıtıcı bilgilerini, son 5 değer de üretici firmayı belirtmektedir. Bu sebeple bu değerlere bakarak donanımın hangi şirketler tarafından üretildiği kestirilebilir. Donanımı üreten firmalar IEEE yani Institue of Electrical and Electronics Engineers ‘a başvurur ve 24 bit’lik üretici kodu alırlar, geriye kalan 24 bitlik kod da rast gele (algoritmaya göre) belirlenir. Örnek vermek gerekirse, 123456789123456789123456 kadarlık bölümü üretici kodu, geri kalan 123456789123456789123123456 bitlik bölümü ise sonradan belirlenen koddur. MAC adresleri 16’lık tabanla yazılır ve : veya - işareti ile ayrılarak gösterilirler. 16 lık tabanda bir değer, 10 luk tabanda 4 değere karşılık geldiği için yine 48 bitlik bütünlük korunmuş olmaktadır, örnek olara 16’lık tabanda A harfi, 10’luk tabanda 4 haneli bir değere karşılık gelmektedir. Bir Mac adresi 01-23-45-67-89-ab olarak gösterilebilir.. Bunlarla beraber bazı MAC adresleri özelleşmiş adreslerdir, mesela ; * FF:FF:FF:FF:FF:FF adresi tüm cihazlara yayın yapmak (broadcast) için kullanılır. * İlk bitleri 01 olan adresler, Ethernet ve FDDI de birçok cihaza yayın (multicast) için kullanılır. * Yerel olarak atanmış MAC adresleri 02 ile başlarlar. MAC adresinizi, Başlat > Çalıştır > cmd yazarak ve çıkan command satirinda arp yazarak öğrenebilirsiniz. Mac Adresini Öğrenme: Mac adresini birden farklı metodla öğrenebiliriz. Bunlardan 1. si MS Dos komut satırındayken; nbtstat -A x.x.x.x yazarak öğrenmek Örnek: nbstat -A 192.168.1.33 Not:Dikkat ederseniz mac adresini öğrenmek istediğimiz bilgisayarın Ip sini yazıyoruz. 2.metod: Komut satırındayken; ipconfig/all yazarak mac adresini görüntüleyebiliriz. 3. yöntem de kod yazarak mac adresini öğrenmek. Bir sonraki makalemizin konusu bu olacak. Görüşmek dileğiyle...Bahadirsa
Harddiskin Seri Numarasını ve Modelini Öğrenmek Bu makalemizde harddiskin seri no su ve modelini öğrenilmesini anlatacağız. Sizler bu uygulamamızı; yapacağınız programlarda programınızın tanımlı harddisk seri no larına göre çalışması, tanımsız hdd seri no larında çalışmaması gibi uygulamalar geliştirebilirsiniz.(Aşağıdaki şekli inceleyin.) Önemli Not: İlk önce Project kısmından Add Reference den System.Management ı projenize ekleyin. Imports System Imports System.Management Public Class Form1 Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click ‘Harddiskin seri numarasının alınması Dim disk As New ManagementClass("Win32_PhysicalMedia") For Each Hdisk As ManagementObject In disk.GetInstances() If Hdisk("SerialNumber") <> Nothing Then TextBox3.Text = CStr(Hdisk("SerialNumber")) End If Next Hdisk End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click ‘Harddisk modelini bulmak Dim searcher As New Management.ManagementObjectSearcher("select * from Win32_PhysicalMedia") Dim wmi_HD As Management.ManagementObject searcher = New System.Management.ManagementObjectSearcher("select * from Win32_DiskDrive") For Each wmi_HD In searcher.Get() TextBox4.Text = wmi_HD("Model") Next End Sub End Class ‘Bir sonraki makalemizde Mac adresleri ile ilgili bilgi vereceğiz. Görüşmek dileğiyle...Bahadirsa
Ip Adresini Öğrenme Bu örnekte Bilgisayarımızın Ağa ve İnternete bağlandığı IP adresini öğreneceğiz. Aşağıdaki şekil de örneğimizi inceleyebilirsiniz. Forma yazılacak kodlar: Imports System Public Class Form1 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click GetIPAddress() End Sub Public Sub GetIPAddress() Dim myIPAddress, x As Net.IPAddress Dim myIPHostEntry As New Net.IPHostEntry() myIPHostEntry = Net.Dns.GetHostByName(Net.Dns.GetHostName()) For Each x In myIPHostEntry.AddressList TextBox2.Text = x.ToString Next End Class Bir sonraki makalemizde Hardisk Seri No sunu ve Modelini öğrenmeyi göreceğiz. Görüşmek dileğiyle...Bahadirsa
Bilgisayar Adının Alınması Bu makalemizde bilgisayar adını öğreneceğiz. Aşağıdaki şekli inceleyin. Forma yazılacak kodlar: Imports System Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click IPAddress() End Sub Private Sub IPAddress() Dim LocalHostName As String Dim i As Integer LocalHostName = Net.Dns.GetHostName() Dim ipEnter As Net.IPHostEntry = Net.Dns.GetHostByName(LocalHostName) TextBox1.Text = LocalHostName.ToString() End Class Bir sonraki makalemizde Bilgisayarın IP adresini öğrenme konusunu inceleyeğiz. Bir sonraki makalemizde görüşmek üzere...Bahadirsa
Bilgisayarınız Konuşsun Evet arkadaşlar. Text kutusuna yazdığınız kelimeleri, bilgisayarınız sizin için söylesin. Formunuza 1 adet TextBox, 1 adet Button ekleyin. İlk yapmanız gereken Project > Add Reference > System.Speech özelliğini Ok tuşuna basarak getirmek. Daha sonra aşağıdaki kodları formunuza yazın. Bilgisayarınız sizin yerinize konuşsun :) Forma yazılacak kodlar: Public Class Form1 Dim i As New SpeechLib.SpVoice Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Text = "Voice Örnek...Bahadirsa" .MaximizeBox = False .Size = New System.Drawing.Size(237, 144) .Location = New Point(250, 170) End With Button1.Text = "Bilgisayarı Konuştur" End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If TextBox1.Text = "" Then i.Speak("Yazı Giriniz. Bahadirsa") MsgBox("Yazı Giriniz. Bahadirsa", MsgBoxStyle.OkOnly, "bahadirsa voice ") End If i.Speak(TextBox1.Text) End Sub End Class Bir sonraki makalede buluşmak üzere...Bahadirsa
Form Başlığında Kayan Yazı Bu örneğimizde formumuzun başlığı kaydıracağız. İlk önce yapmamız< gereken formumujza 1 adet Timer eklemek. Timer ın interval değerini 100 yapın. Timer_Tick olayına aşağıdaki kodları yazın. Forma yazılacak kodlar: Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Text = "Kayan Yazı Örnek...Bahadirsa " Timer1.Interval = 100 Timer1.Enabled = True End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Dim str As String Dim i As Integer str = "" For i = 1 To Me.Text.Length - 1 str = str + Me.Text(i) Next Me.Text = str + Me.Text(0) End Sub End Class ‘Bir sonraki makalede görüşmek üzere...Bahadirsa
ListBox Drag Drop (Sürükle-Bırak) Bu makalemizde Listbox ta drag drop yani sürükle bırak konusunun inceleyeceğiz. Bunun için formumuza 2 adet listbox ekleyin. Aşağıdaki şekildeki gibi dizayn ediniz. Listbox1 deki istenilen bilgileri sürükle bırak metodu ile Listbox2 ye ekleyeceğiz ve Listbox1 den sileceğiz. Not: Sürükle bırakı gerçekleştirebilmemiz için; Listbox1 ve Listbox2 de AllowDrop özelliğini True yapın. Forma yazılacak kodlar: Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Text = "Listbox Drag Drop" .MaximizeBox = False End With End Sub Private Sub ListBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseDown Dim snoktalar As Point = New Point(e.X, e.Y) Dim item_indis As Integer = ListBox1.IndexFromPoint(snoktalar) If item_indis = -1 Then MessageBox.Show("Boş bir alana tıkladınız. Boş alanda drag & drop gerçekleştiremezsiniz.") End If If (e.Button = Windows.Forms.MouseButtons.Left) Then ListBox1.DoDragDrop(ListBox1.Items(item_indis), DragDropEffects.All) End If End Sub Private Sub ListBox2_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles ListBox2.DragDrop ‘Listbox2 ye ekliyoruz ListBox2.Items.Add(e.Data.GetData(DataFormats.Text)) ‘Listbox2 ye eklenen item i Listbox1 den kaldırıyoruz ListBox1.Items.Remove(e.Data.GetData(DataFormats.Text)) End Sub Private Sub ListBox2_DragOver(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles ListBox2.DragOver If e.KeyState = 1 Then e.Effect = DragDropEffects.All End If End Sub End Class ‘Faydalı olması dileğiyle. Bir sonraki makalede buluşmask üzere...Bahadirsa
İşlemci Seri Numarası ve Özet Bilgilerin Alınması Bu makalede işlemcinin seri numarasını, özet bilgileri ve DeviceID numarasını alınmasını göreceğiz. WMI Class dan Win32_Processor ünü kullanacağız. Formunuza 3 adet Button ve 1 adet Label ekleyin. Aşağıdaki şekil 1 deki gibi formunuzu hazırlayın. Forma yazılacak kodlar: Public Class Form1 Private Sub btnID_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnID.Click Dim Nesnemiz Nesnemiz = GetObject("winmgmts:root\cimv2:Win32_Processor=‘cpu0‘") Label1.Text = "CPU Seri No: " & Nesnemiz.ProcessorID End Sub Private Sub btnBilgi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnBilgi.Click Dim Nesnemiz Nesnemiz = GetObject("winmgmts:root\cimv2:Win32_Processor=‘cpu0‘") Label1.Text = "CPU Özet: " & Nesnemiz.Caption End Sub Private Sub btnDId_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDId.Click Dim Nesnemiz Nesnemiz = GetObject("winmgmts:root\cimv2:Win32_Processor=‘cpu0‘") Label1.Text = "DeviceId No: " & Nesnemiz.DeviceID End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Text = "İşlemci Bilgileri" .MaximizeBox = False End With End Sub End Class ‘Faydalı olması dileğiyle. Bir sonraki makalede görüşmek üzere...Bahadirsa
Normal Veriyi Hexadecimal e Çevirme Bu örneğimizde TextBox a girilen normal karakterleri hexadecimal karşılığı veriye çevireceğiz. Formunuza 2 adet TextBox ve 2 adet Label yerleştirin.Aşağıdaki Şekil 1 deki gibi formunuzu tasarlayın...Bahadirsa Forma yazılacak kodlar: Public Class Form1 Private Sub btnCevir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCevir.Click TextBox2.Text = "" Dim i As Integer For i = 1 To Len(TextBox1.Text) Dim j As String j = Mid$(TextBox1.Text, i, 1) TextBox2.Text = TextBox2.Text + Hex(Asc(j)) + " " Next End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Text = "Hexadecimal e Çevirme...Bahadirsa" .MaximizeBox = False End With End Sub End Class ‘Faydalı olması dileğiyle. Bir sonraki makalede buluşmak üzere...Bahadirsa
Veri Tabanı Programlama-II Byte dergisinin, veritabanı programlaması ile ilgili 65 sayfalık pdf dosyası. Dosya winrar ile sıkıştırıldı şifre:bahadirsa dosya boyutu:4.87 MB. Dökümanın faydalı olması dileğiyle... Bahadır ŞAHİN ........................................
TextBox a Girilen Rakamı Yazıya Çevirme Bu örneğimizde TextBox a girilecek olan rakamaların, yazı olarak karşılığını yazdıracağız. Aşağıdaki şekli inceleyin. Forma yazılacak kodlar: Imports VB = Microsoft.VisualBasic Public Class Form1 Private Sub btnCevir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCevir.Click RichTextBox1.Text = GetSayilar((txtsayi.Text)) End Sub Private Sub txtsayi_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtsayi.KeyPress Dim KeyAscii As Short = Asc(e.KeyChar) KeyAscii = IIf(IsNumeric(Chr(KeyAscii)) Or (InStr(txtsayi.Text, ".") = 0 And KeyAscii = 46) Or KeyAscii = 8, KeyAscii, 0) If KeyAscii = 0 Then e.Handled = True End If End Sub Function GetSayilar(ByRef x As String) As String Dim bir(10) As String Dim iki(10) As String Dim Uc(10) As String Dim Yüz As String Dim Bin As String Dim yüzbin As String Dim Onmilyon As String Dim Milyar As String Dim Milyon As String Dim Trilyon As String bir(0) = "Sıfır" : bir(1) = "Bir" : bir(2) = "İki" : bir(3) = "Üç" : bir(4) = "Dört" : bir(5) = "Beş" : bir(6) = "Altı" : bir(7) = "Yedi" : bir(8) = "Sekiz" : bir(9) = "Dokuz" iki(0) = "On" : iki(1) = "Onbir" : iki(2) = "Oniki" : iki(3) = "Onüç" : iki(4) = "Ondört" : iki(5) = "Onbeş" : iki(6) = "Onaltı" : iki(7) = "Onyedi" : iki(8) = "Onsekiz" : iki(9) = "Ondokuz" Uc(2) = "Yirmi" : Uc(3) = "Otuz" : Uc(4) = "Kırk" : Uc(5) = "Elli" : Uc(6) = "Altmış" : Uc(7) = "Yetmiş" : Uc(8) = "Seksen" : Uc(9) = "Doksan" Yüz = "Yüz" : Bin = "Bin" : yüzbin = "Yüz Bin" : Onmilyon = "On Milyon" : Milyar = "Milyar" Milyon = "Milyon" : Trilyon = "Trilyon" Dim inp, RetVal As String inp = CStr(Val(x)) Select Case Len(inp) Case 1 RetVal = bir(CInt(x)) Case 2 If Int(CDbl(VB.Right(inp, 1))) > 0 And CDbl(VB.Left(inp, 1)) > 1 Then RetVal = GetSayilar(CStr(Int(CDbl(VB.Right(inp, 1))))) ‘ 20 den 90 adım 10 If CDbl(VB.Left(inp, 1)) > 1 Then RetVal = Uc(CInt(VB.Left(inp, 1))) & RetVal ‘ 20-99 If CDbl(VB.Left(inp, 1)) = 1 Then RetVal = iki(CInt(VB.Right(inp, 1))) ‘11-19 Case 3 If Int(CDbl(VB.Right(inp, 2))) > 0 Then RetVal = GetSayilar(CStr(Int(CDbl(VB.Right(inp, 2))))) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 1)))) & Yüz & RetVal Case 4 If Int(CDbl(VB.Right(inp, 3))) > 0 Then RetVal = GetSayilar(CStr(Int(CDbl(VB.Right(inp, 3))))) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 1)))) & Bin & RetVal Case 5 If Int(CDbl(VB.Right(inp, 3))) > 0 Then RetVal = GetSayilar(CStr(Int(CDbl(VB.Right(inp, 3))))) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 2)))) & Bin & RetVal Case 6 If CInt(VB.Right(inp, 5)) > 0 Then RetVal = GetSayilar(CStr(CInt(VB.Right(inp, 5)))) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 1)))) & yüzbin & RetVal Case 7 If CInt(VB.Right(inp, 5)) > 0 Then RetVal = GetSayilar(CStr(CInt(VB.Right(inp, 5)))) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 2)))) & yüzbin & RetVal Case 8 If CInt(VB.Right(inp, 7)) > 0 Then RetVal = GetSayilar(CStr(CInt(VB.Right(inp, 7)))) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 1)))) & Onmilyon & RetVal Case 9 If CInt(VB.Right(inp, 7)) > 0 Then RetVal = GetSayilar(CStr(CInt(VB.Right(inp, 7)))) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 2)))) & Onmilyon & RetVal Case 10 If CInt(VB.Right(inp, 9)) > 0 Then RetVal = GetSayilar(CStr(CInt(VB.Right(inp, 9)))) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 1)))) & Milyar & RetVal Case 11 If CInt(VB.Right(inp, 9)) > 0 Then RetVal = GetSayilar(CStr(CInt(VB.Right(inp, 9)))) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 2)))) & Milyar & RetVal Case 12 If Val(VB.Right(inp, 11)) > 0 Then RetVal = GetSayilar(VB.Right(inp, 11)) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 1)))) & Milyon & RetVal Case 13 If Val(VB.Right(inp, 11)) > 0 Then RetVal = GetSayilar(VB.Right(inp, 11)) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 2)))) & Milyon & RetVal Case 14 If Val(VB.Right(inp, 13)) > 0 Then RetVal = GetSayilar(VB.Right(inp, 13)) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 1)))) & Trilyon & RetVal Case 15 If Val(VB.Right(inp, 13)) > 0 Then RetVal = GetSayilar(VB.Right(inp, 13)) RetVal = GetSayilar(Int(CDbl(VB.Left(inp, 2)))) & Trilyon & RetVal End Select GetSayilar = " " & RetVal & " " GetSayilar = Replace(GetSayilar, " ", " ") End Function Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Text = "Rakam ı Yazıya Çeviren Program" .MaximizeBox = False End With RichTextBox1.ReadOnly = True End Sub End Class ‘Faydalı olması dileğiyle. Bir sonraki makalede görüşmek üzere...Bahadirsa
Otomatik Key Olusturma Bu örneğimizde otomatik olarak key numaraları oluşturacağız. Ayrıca oluşturacağımız key numaralarını text dosyasına kaydedip, daha sonra text dosyasındanda yükleyebilirsiniz. Bunun için formunuza 5 adet Textbox, 4 adet Button ve 1 adet RichTextBox ekleyin. Aşağıdaki şekil gibi formunuzu oluşturun...Bahadirsa Forma yazılacak kodlar: Public Class Form1 Dim i As Integer = 0, j As Integer = 0 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Text = "Bahadirsa Otomatik Key Oluşturma" Me.Width = 296 Me.Height = 327 Me.Left = 200 Me.Top = 130 Me.MaximizeBox = False RichTextBox1.Width = 247 RichTextBox1.Height = 135 RichTextBox1.ReadOnly = True TextBox1.MaxLength = 5 TextBox2.MaxLength = 5 TextBox3.MaxLength = 5 TextBox4.MaxLength = 5 TextBox5.MaxLength = 5 TextBox1.ReadOnly = True TextBox2.ReadOnly = True TextBox3.ReadOnly = True TextBox4.ReadOnly = True TextBox5.ReadOnly = True Label1.Text = "Otomatik Key Oluşturma " Label2.Text = "Oluşturduğunuz Key Sayısı:" + CStr(0) Timer1.Enabled = True Timer1.Interval = 10 Button1.Text = "Key Oluştur" Button2.Text = "Text Olarak Kaydet" Button3.Text = "Dosyadan Key Yükle" Button4.Text = "İçeriği Temizle" End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim dizi() As String = {"A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "R", "S", "T", "U", "V", "W", "X", "Y", "Z", "a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "r", "s", "t", "u", "v", "w", "x", "y", "z", 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, "?", "+"} Dim sayı() As Double = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25} sayı(0) = (i * 300) Mod 62 sayı(1) = ((i + 5) * 20) Mod 62 sayı(2) = ((i * 2323) + 44) Mod 62 sayı(3) = ((i * 15) - 23) Mod 62 sayı(4) = ((3 * i + 45) * 4) Mod 62 TextBox1.Text = CStr(dizi(sayı(0))) & CStr(dizi(sayı(1))) & CStr(dizi(sayı(2))) & CStr(dizi(sayı(3))) & CStr(dizi(sayı(4))) sayı(5) = (i + 1234) Mod 62 sayı(6) = ((i + 44) * 20) Mod 62 sayı(7) = ((i * 23) + 34) Mod 62 sayı(8) = ((i * 55) - 23) Mod 62 sayı(9) = ((88 * i + 45) * 4) Mod 62 TextBox2.Text = CStr(dizi(sayı(5))) & CStr(dizi(sayı(6))) & CStr(dizi(sayı(7))) & CStr(dizi(sayı(8))) & CStr(dizi(sayı(9))) sayı(10) = (i) Mod 62 sayı(11) = ((i * 12) + 40) Mod 62 sayı(12) = ((i * 999) + 1234) Mod 62 sayı(13) = ((i * 155) - 12) Mod 62 sayı(14) = ((i * 100 + 20) / 10) Mod 62 TextBox3.Text = CStr(dizi(sayı(10))) & CStr(dizi(sayı(11))) & CStr(dizi(sayı(12))) & CStr(dizi(sayı(13))) & CStr(dizi(sayı(14))) sayı(15) = (i * 88) Mod 62 sayı(16) = ((i * 2 + 125) * 2) Mod 62 sayı(17) = (((i * 23) - 23) + 44) Mod 62 sayı(18) = ((i * i) + 38) Mod 62 sayı(19) = ((34 * i + 45 - i)) Mod 62 TextBox4.Text = CStr(dizi(sayı(15))) & CStr(dizi(sayı(16))) & CStr(dizi(sayı(17))) & CStr(dizi(sayı(18))) & CStr(dizi(sayı(19))) sayı(20) = ((i * 23) + 4) Mod 62 sayı(21) = ((i * 150) - 34) Mod 62 sayı(22) = ((2 * i) + 44) Mod 62 sayı(23) = ((i * 12) - 12) Mod 62 sayı(24) = ((10 * i + 45) * 4) Mod 62 TextBox5.Text = CStr(dizi(sayı(20))) & CStr(dizi(sayı(21))) & CStr(dizi(sayı(22))) & CStr(dizi(sayı(23))) & CStr(dizi(sayı(24))) RichTextBox1.AppendText((TextBox1.Text & "-" & TextBox2.Text & "-" + TextBox3.Text & "-" & TextBox4.Text & "-" & TextBox5.Text) & " ") j = j + 1 Label2.Text = "Oluşturduğunuz Key Sayısı:" & CStr(j) End Sub Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged ‘TextBox1.MaxLength = 5 End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick i = i + 1 End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Label1.Text = "Dosya C:\bahadirsa.txt Adresine Kaydedildi..." RichTextBox1.SaveFile("c:\bahadirsa.txt") End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Label1.Text = "Dosya Yükleme İşlemi" RichTextBox1.LoadFile("C:\bahadirsa.txt") End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click RichTextBox1.Clear() End Sub End Class ‘ Bir sonraki makalemizde buluşmak üzere...Bahadirsa
Digital Saat Örneği Bu uygulamamızda Digital Saat ve Tarih göreceğiz. İlk önce yapılması gereken digital rakamları oluşturmak. Ben bu örnekte, bin/Debug içinde digit klasörü oluşturdum ve rakamlara dicit00... gibi adlandırdım. Yine Şekil 2 de görüldüğü gibi Sadece Digital Saati Göster linkine tıklayarak, saatin görülmesini sağlayabilirsiniz. Ayrıca Digital Saati Gizle linkine tıklayarak System Tray‘de ikon şeklinde gösterebilirsiniz. Bu ikona sağ tıklayıp, Programı Göster linkinden tekrardan Saatimizi aktif görebiliriz. Son olarak uygulamamız türkçe tarihe göre gg/aa/yyyy şeklinde yapıldı. (Ör: =06/04/2007) Alternatif Kısmında; eğer tarih kısmı a/g/yyyy şeklinde olan (Ör: 4/6/2007) sitemlerde ufak bir kod ile bu sorunu çözüyoruz. Bahadirsa Forma Yazılacak Kodlar: (gg/aa/yyyy için) Public Class Form1 Dim str As String Dim str2(15) As String Dim i As Integer = 0 Dim tarih As Date = Date.Now.Date Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load btnYenile.Text = "Tarih ve Gün Yenile" & vbCrLf & "(Date and Day Refresh)" btnSaat.Text = "Durdur" & vbCrLf & "(Stop)" Timer1.Enabled = True Timer1.Interval = 1000 ‘saat str = Format(Now, "Long Time") str2(0) = str.Substring(0, 1) str2(1) = str.Substring(1, 1) str2(2) = str.Substring(2, 1) str2(3) = str.Substring(3, 1) str2(4) = str.Substring(4, 1) str2(5) = str.Substring(5, 1) str2(6) = str.Substring(6, 1) str2(7) = str.Substring(7, 1) If str(2) = "" Then pb3.Image = Image.FromFile("digit\yok.bmp") pb6.Image = Image.FromFile("digit\yok.bmp") Else pb3.Image = Image.FromFile("digit\ikinokta.bmp") pb6.Image = Image.FromFile("digit\ikinokta.bmp") End If pb1.Image = Image.FromFile("digit\dicit0" & str2(0) & ".bmp") pb2.Image = Image.FromFile("digit\dicit0" & str2(1) & ".bmp") ‘pb3.Image = Image.FromFile("digit\ikinokta.bmp") pb4.Image = Image.FromFile("digit\dicit0" & str2(3) & ".bmp") pb5.Image = Image.FromFile("digit\dicit0" & str2(4) & ".bmp") ‘pb6.Image = Image.FromFile("digit\ikinokta.bmp") pb7.Image = Image.FromFile("digit\dicit0" & str2(6) & ".bmp") pb8.Image = Image.FromFile("digit\dicit0" & str2(7) & ".bmp") ‘Tarih str2(8) = tarih.ToString.Substring(0, 1) str2(9) = tarih.ToString.Substring(1, 1) str2(10) = tarih.ToString.Substring(3, 1) str2(11) = tarih.ToString.Substring(4, 1) str2(12) = tarih.ToString.Substring(6, 1) str2(13) = tarih.ToString.Substring(7, 1) str2(14) = tarih.ToString.Substring(8, 1) str2(15) = tarih.ToString.Substring(9, 1) pb9.Image = Image.FromFile("digit\dicit0" & str2(8) & ".bmp") pb10.Image = Image.FromFile("digit\dicit0" & str2(9) & ".bmp") pb11.Image = Image.FromFile("digit\teknokta.bmp") pb12.Image = Image.FromFile("digit\dicit0" & str2(10) & ".bmp") pb13.Image = Image.FromFile("digit\dicit0" & str2(11) & ".bmp") pb14.Image = Image.FromFile("digit\teknokta.bmp") pb15.Image = Image.FromFile("digit\dicit0" & str2(12) & ".bmp") pb16.Image = Image.FromFile("digit\dicit0" & str2(13) & ".bmp") pb17.Image = Image.FromFile("digit\dicit0" & str2(14) & ".bmp") pb18.Image = Image.FromFile("digit\dicit0" & str2(15) & ".bmp") ‘gun Label3.Text = tarih.Date.DayOfWeek.ToString If Label3.Text = DayOfWeek.Sunday.ToString Then Label3.Text = DayOfWeek.Sunday.ToString & "-" & "Pazar" ElseIf Label3.Text = DayOfWeek.Monday.ToString Then Label3.Text = DayOfWeek.Monday.ToString & "-" & "Pazartesi" ElseIf Label3.Text = DayOfWeek.Tuesday.ToString Then Label3.Text = DayOfWeek.Tuesday.ToString & "-" & "Salı" ElseIf Label3.Text = DayOfWeek.Wednesday.ToString Then Label3.Text = DayOfWeek.Wednesday.ToString & "-" & "Çarşamba" ElseIf Label3.Text = DayOfWeek.Thursday.ToString Then Label3.Text = DayOfWeek.Thursday.ToString & "-" & "Perşembe" ElseIf Label3.Text = DayOfWeek.Friday.ToString Then Label3.Text = DayOfWeek.Friday.ToString & "-" & "Cuma" ElseIf Label3.Text = DayOfWeek.Saturday.ToString Then Label3.Text = DayOfWeek.Saturday.ToString & "-" & "Cumartesi" End If With Me .Text = "Digital Hours of Application & Dig. Saat Uygulaması.Programmer by Bahadirsa" .ControlBox = False .Location = New Point(350, 0) .MaximizeBox = False End With LinkLabel1.Text = "Uygulamadan Çık (Exit of Application)" LinkLabel2.Text = "Digital Saati Gizle (Hide)" LinkLabel3.Text = "Sadece Digital Saati Göster ( To Show of Only Digital Hour ) " NotifyIcon1.ContextMenuStrip = ContextMenuStrip1 End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick i = i + 1 str = Format(Now, "Long Time") str2(0) = str.Substring(0, 1) str2(1) = str.Substring(1, 1) str2(2) = str.Substring(2, 1) str2(3) = str.Substring(3, 1) str2(4) = str.Substring(4, 1) str2(5) = str.Substring(5, 1) str2(6) = str.Substring(6, 1) str2(7) = str.Substring(7, 1) pb1.Image = Image.FromFile("digit\dicit0" & str2(0) & ".bmp") pb2.Image = Image.FromFile("digit\dicit0" & str2(1) & ".bmp") ‘pb3.Image = Image.FromFile("digit\dicit0" & str2(2) & ".bmp") pb4.Image = Image.FromFile("digit\dicit0" & str2(3) & ".bmp") pb5.Image = Image.FromFile("digit\dicit0" & str2(4) & ".bmp") ‘pb6.Image = Image.FromFile("digit\dicit0" & str2(4) & ".bmp") pb7.Image = Image.FromFile("digit\dicit0" & str2(6) & ".bmp") pb8.Image = Image.FromFile("digit\dicit0" & str2(7) & ".bmp") If i = 1 Then pb3.Image = Image.FromFile("digit\yok.bmp") pb6.Image = Image.FromFile("digit\yok.bmp") ElseIf i = 2 Then pb3.Image = Image.FromFile("digit\ikinokta.bmp") pb6.Image = Image.FromFile("digit\ikinokta.bmp") ElseIf i > 2 Then i = 0 End If ‘gün, tarih yenile ‘Tarih tarih = Date.Now.Date str2(8) = tarih.ToString.Substring(0, 1) str2(9) = tarih.ToString.Substring(1, 1) str2(10) = tarih.ToString.Substring(3, 1) str2(11) = tarih.ToString.Substring(4, 1) str2(12) = tarih.ToString.Substring(6, 1) str2(13) = tarih.ToString.Substring(7, 1) str2(14) = tarih.ToString.Substring(8, 1) str2(15) = tarih.ToString.Substring(9, 1) pb9.Image = Image.FromFile("digit\dicit0" & str2(8) & ".bmp") pb10.Image = Image.FromFile("digit\dicit0" & str2(9) & ".bmp") pb11.Image = Image.FromFile("digit\teknokta.bmp") pb12.Image = Image.FromFile("digit\dicit0" & str2(10) & ".bmp") pb13.Image = Image.FromFile("digit\dicit0" & str2(11) & ".bmp") pb14.Image = Image.FromFile("digit\teknokta.bmp") pb15.Image = Image.FromFile("digit\dicit0" & str2(12) & ".bmp") pb16.Image = Image.FromFile("digit\dicit0" & str2(13) & ".bmp") pb17.Image = Image.FromFile("digit\dicit0" & str2(14) & ".bmp") pb18.Image = Image.FromFile("digit\dicit0" & str2(15) & ".bmp") ‘gun Label3.Text = tarih.Date.DayOfWeek.ToString If Label3.Text = DayOfWeek.Sunday.ToString Then Label3.Text = DayOfWeek.Sunday.ToString & "-" & "Pazar" ElseIf Label3.Text = DayOfWeek.Monday.ToString Then Label3.Text = DayOfWeek.Monday.ToString & "-" & "Pazartesi" ElseIf Label3.Text = DayOfWeek.Tuesday.ToString Then Label3.Text = DayOfWeek.Tuesday.ToString & "-" & "Salı" ElseIf Label3.Text = DayOfWeek.Wednesday.ToString Then Label3.Text = DayOfWeek.Wednesday.ToString & "-" & "Çarşamba" ElseIf Label3.Text = DayOfWeek.Thursday.ToString Then Label3.Text = DayOfWeek.Thursday.ToString & "-" & "Perşembe" ElseIf Label3.Text = DayOfWeek.Friday.ToString Then Label3.Text = DayOfWeek.Friday.ToString & "-" & "Cuma" ElseIf Label3.Text = DayOfWeek.Saturday.ToString Then Label3.Text = DayOfWeek.Saturday.ToString & "-" & "Cumartesi" End If End Sub Private Sub btnSaat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSaat.Click If btnSaat.Text = "Durdur" & vbCrLf & "(Stop)" Then btnSaat.Text = "Başlat" & vbCrLf & "(Begin)" Timer1.Enabled = False Else btnSaat.Text = "Durdur" & vbCrLf & "(Stop)" Timer1.Enabled = True End If End Sub Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked Me.Close() End Sub Private Sub LinkLabel1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles LinkLabel1.MouseLeave LinkLabel1.LinkColor = Color.Blue End Sub Private Sub LinkLabel1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles LinkLabel1.MouseMove LinkLabel1.LinkColor = Color.Red End Sub Private Sub LinkLabel2_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel2.LinkClicked pgizle_Click(sender, e) End Sub Private Sub LinkLabel2_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles LinkLabel2.MouseLeave LinkLabel2.LinkColor = Color.Blue End Sub Private Sub LinkLabel2_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles LinkLabel2.MouseMove LinkLabel2.LinkColor = Color.Red End Sub Private Sub pgizle_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pgizle.Click Me.Hide() End Sub Private Sub pexit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pexit.Click Me.Close() End Sub Private Sub pgoster_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pgoster.Click Me.Show() End Sub Private Sub btnYenile_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnYenile.Click Timer1_Tick(sender, e) End Sub Private Sub LinkLabel3_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel3.LinkClicked If LinkLabel3.Text = "Sadece Digital Saati Göster ( To Show of Only Digital Hour ) " Then LinkLabel3.Text = "Tüm Uygulamayı Göster ( To Show of All Application ) " Me.Size = New System.Drawing.Size(496, 130) Label2.Visible = False Else LinkLabel3.Text = "Sadece Digital Saati Göster ( To Show of Only Digital Hour ) " Me.Size = New System.Drawing.Size(496, 264) Label2.Visible = True End If End Sub Private Sub LinkLabel3_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles LinkLabel3.MouseLeave LinkLabel3.LinkColor = Color.Blue End Sub Private Sub LinkLabel3_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles LinkLabel3.MouseMove LinkLabel3.LinkColor = Color.Red End Sub End Class
Xml Dosyasına Kayıt Bu örneğimizde Northwind.mdb veritabanındaki alanlardan çektiğimiz bilgileri, Xml olarak kaydedeceğiz...Bahadirsa Forma yazılacak kodlar: Imports System.Xml Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim baglan As OleDb.OleDbConnection = New Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Northwind.mdb") Dim adp As New OleDb.OleDbDataAdapter Dim str As String = "Select * From " & cmb.Text adp.SelectCommand = New OleDb.OleDbCommand(str, baglan) baglan.Open() Dim ds As New Data.DataSet adp.Fill(ds) Dim xreader As Xml.XmlReader ‘bu xmlreader executereader dan farklı olarak sonucu xml olarak üretiyor. ds.ReadXml(xreader) ‘datasetimize xml mizi okutuyoruz. ds.WriteXml("C:\test.xml") ‘ve harddiskimize dataseti yazdırıyoruz. baglan.Close() End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load cmb.Text = "Customers" With Me .Text = "XML Olarak Kayıt...Bahadirsa" .MaximizeBox = False .MinimizeBox = False .Location = New Point(350, 200) End With End Sub End Class ‘Bir sonraki makalede görüşmek dileğiyle...Bahadirsa
Xml Dosyasından Kayıt Okuma Arkadaşlar bu örneğimizde, hazır bulunan xml dosyamızdan, oluşturduğumuz textboxlara veri ve picturebox ımıza resim çekeceğiz. İlk önce yapmanız gereken Xml dosyanızı oluşturmak. Bunun için Microsoftun sitesinden xmlnotepad programından yararlanabilirsiniz. Örnektede görüldüğü gibi, XmlReader metodu kullanarak bilgilerimizi xml dosyasından çekeceğiz...Bahadirsa Forma yazılacak kodlar: Imports System.XML Public Class Form1 Dim i As Integer = 0 Private Sub btnVeriAl_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnVeriAl.Click i = i + 1 btnVeriAl.Text = "Kayıt İleri" Dim reader As Xml.XmlReader = New System.Xml.XmlTextReader("bahadirsa_bilgi.xml") While (reader.Read()) If i = 1 Then If (reader.NodeType = XmlNodeType.Element) Then If (reader.Name.Equals("id")) Then TextBox1.Text = reader.ReadString() ElseIf (reader.Name.Equals("ad")) Then TextBox2.Text = reader.ReadString() ElseIf (reader.Name.Equals("soyad")) Then TextBox3.Text = reader.ReadString() ElseIf (reader.Name.Equals("ogrenim")) Then TextBox4.Text = reader.ReadString() ElseIf (reader.Name.Equals("meslek")) Then TextBox5.Text = reader.ReadString() ElseIf (reader.Name.Equals("il")) Then TextBox6.Text = reader.ReadString() ElseIf (reader.Name.Equals("image1")) Then PictureBox1.Image = Image.FromFile(reader.ReadString()) End If End If End If If i = 2 Then If (reader.NodeType = XmlNodeType.Element) Then If (reader.Name.Equals("id2")) Then TextBox1.Text = reader.ReadString() ElseIf (reader.Name.Equals("ad2")) Then TextBox2.Text = reader.ReadString() ElseIf (reader.Name.Equals("soyad2")) Then TextBox3.Text = reader.ReadString() ElseIf (reader.Name.Equals("ogrenim2")) Then TextBox4.Text = reader.ReadString() ElseIf (reader.Name.Equals("meslek2")) Then TextBox5.Text = reader.ReadString() ElseIf (reader.Name.Equals("il2")) Then TextBox6.Text = reader.ReadString() ElseIf (reader.Name.Equals("image2")) Then PictureBox1.Image = Image.FromFile(reader.ReadString()) End If End If End If If i = 3 Then If (reader.NodeType = XmlNodeType.Element) Then If (reader.Name.Equals("id3")) Then TextBox1.Text = reader.ReadString() ElseIf (reader.Name.Equals("ad3")) Then TextBox2.Text = reader.ReadString() ElseIf (reader.Name.Equals("soyad3")) Then TextBox3.Text = reader.ReadString() ElseIf (reader.Name.Equals("ogrenim3")) Then TextBox4.Text = reader.ReadString() ElseIf (reader.Name.Equals("meslek3")) Then TextBox5.Text = reader.ReadString() ElseIf (reader.Name.Equals("il3")) Then TextBox6.Text = reader.ReadString() ElseIf (reader.Name.Equals("image3")) Then PictureBox1.Image = Image.FromFile(reader.ReadString()) End If End If End If If i > 3 Then i = 1 End If End While reader.Close() End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Text = "Xml Dosyadan Veri Okuma...Bahadirsa" .MaximizeBox = False .Location = New Point(250, 200) End With End Sub End Class ‘Bir sonraki makalede görüşmek dileğiyle...Bahadirsa
TextBox a Sadece Rakam ve Virgül Girme TextBox ın KeyPress yordamına aşağıdaki kodları yazacağız. Bu şekilde Textbox a sadece rakam ve virgül girişini sağlıyacağız. Klavyeden harf girildiği zaman herhangi bir işlem yapmayıp, bizi uyaracak. Forma yazılacak kodlar: Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Text = "Formunuza Sadece Sayı ve Bir Virgül Girme...Bahadirsa" .MaximizeBox = False .Size = New System.Drawing.Size(248, 99) .Location = New Point(250, 190) End With End Sub Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress Dim i As Integer Dim k As String Dim j As Char Dim dizi As String dizi = "1234567890," j = Chr(Asc(e.KeyChar)) k = TextBox1.Text & j i = InStr(1, k, ",") If InStr(i + 1, k, ",") > 0 Then MsgBox("Sadece Bir Virgül İçerebilir") e.KeyChar = ChrW(0) TextBox1.Focus() Exit Sub End If If (Val(e.KeyChar) <> 8) Then If (InStr(dizi, CStr(j)) = 0) Then e.KeyChar = ChrW(0) MsgBox("Sadece Rakam ve Bir Virgül Girilebilir...") Exit Sub End If End If End Sub End Class ‘ Bir sonraki makalede buluşmak üzere...Bahadirsa
TextBox ta Replace Olayı Bu örneğimizde TextBox a girilen text te, değiştirilmek istenilen kelimeleri Replace metodu ile değiştirebiliriz. Daha iyi anlamak için asağıdaki Şekil 1 ve Şekil 2 örnek resimlere bakınız ..Bahadirsa Forma yazılacak kodlar: Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Text = "Kelime Değiştirme" .MaximizeBox = False End With TextBox1.Text = "Merhaba Bahadirsa. Hello World." End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TextBox1.Text = TextBox1.Text.Replace("Hello World", "Merhaba Dünya") End Sub End Class ‘Bir sonraki makalede buluşmak üzere... Bahadirsa
Tablodan Veri Okuma Bu örneğimizde oluşturacağımız tablodan veri okuyacağız. Forma yazılacak kodlar: Imports System Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnVeriAl.Click With Me.DataGridView1.RowTemplate .DefaultCellStyle.BackColor = Color.LightYellow .DefaultCellStyle.ForeColor = Color.Navy .DefaultCellStyle.Font = New Font("Verdana", 10, FontStyle.Regular) End With Dim columnHeaderStyle As New DataGridViewCellStyle columnHeaderStyle.BackColor = Color.Aqua columnHeaderStyle.ForeColor = Color.AliceBlue columnHeaderStyle.Font = New Font("Verdana", 10, FontStyle.Bold) DataGridView1.ColumnHeadersDefaultCellStyle = columnHeaderStyle DataGridView1.GridColor = Color.Black Dim Table1 As DataTable Table1 = New DataTable("Customers") Dim str1 As String() = {"Bahadirsa", "xxxxx", "Muhendis", "Master", "Istanbul"} Dim str2 As String() = {"Fatih", "Koç", "Muhendis", "Üniversite", "Istanbul"} Dim str3 As String() = {"Haluk", "Akman", "Muhendis", "Üniversite", "Istanbul"} Dim str4 As String() = {"Ahmet", "Aydın", "Muhendis", "Üniversite", "Istanbul"} Dim str5 As String() = {"Kürşat", "Şahin", "Muhendis", "Üniversite", "Istanbul"} Try Dim ad As DataColumn = New DataColumn("Ad") ad.DataType = System.Type.GetType("System.String") Table1.Columns.Add(ad) Dim soyad As DataColumn = New DataColumn("Soyad") soyad.DataType = System.Type.GetType("System.String") Table1.Columns.Add(soyad) Dim meslek As DataColumn = New DataColumn("Meslek") meslek.DataType = System.Type.GetType("System.String") Table1.Columns.Add(meslek) Dim ogrenim As DataColumn = New DataColumn("Öğrenim") ogrenim.DataType = System.Type.GetType("System.String") Table1.Columns.Add(ogrenim) Dim il As DataColumn = New DataColumn("İl") il.DataType = System.Type.GetType("System.String") Table1.Columns.Add(il)
Bilgisayarınızın Ağa Bağlı Olup Olmadığını Kontrol Etme Bilgisayarınızın ağa bağlı olup olmadığını bir kaç kod parçası yazarak öğrenebilirsiniz...Bahadirsa Forma yazılacak kodlar: Public Class Form1 Private Sub btnKontrol_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnKontrol.Click Dim host As System.Net.IPHostEntry Try Label1.Text = Environment.GetEnvironmentVariable("LOGONSERVER") host = System.Net.Dns.GetHostByName(Label1.Text.Substring(2)) Label1.Text = Label1.Text & vbCrLf & " Adıyla ağa bağlısınız. " Return Catch ex As Exception Label1.Text = "Ağ Bağlantınız Bulunmamaktadır." End Try End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Label1.Text = "" End Sub End Class
Yön Tuşları ve F Tuşları Kullanımı Bu örneğimizde Formumuzun Keyup yordamına aşağıdaki kodları yazarak, yön tuşları, F tuşları veya herhangi bir tuşa basıldığı zaman hangi tuşa basıldığını mesaj veren bir program yapacağız. Forma yazılacak kodlar: Public Class Form1 Private Sub Form1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp ‘Yön tuşları If e.KeyCode = Keys.Left Then MessageBox.Show("Sol ok tuşuna bastınız") If e.KeyCode = Keys.Right Then MessageBox.Show("Sağ ok tuşuna bastınız") If e.KeyCode = Keys.Up Then MessageBox.Show("Yukarı ok tuşuna bastınız") If e.KeyCode = Keys.Down Then MessageBox.Show("Aşağı ok tuşuna bastınız") ‘F tuşları If e.KeyCode = Keys.F1 Then MessageBox.Show("F1 tuşuna bastınız") If e.KeyCode = Keys.F2 Then MessageBox.Show("F2 tuşuna bastınız") ‘Harf tuşları If e.KeyCode = Keys.A Then MessageBox.Show("A tuşuna bastınız") ‘... ornekleri istediginiz kadar cogaltabilirsiniz End Sub ‘Bir sonraki makalede görüşmek üzere...Bahadirsa
Text Dosyasından Okuma ve Text Dosyasına Kayıt Bu makalemizde oluşturduğumuz text dosyasından bilgi okuyacağız. Ayrıca text dosyamıza kayıt gerçekleştireceğiz. Bu örneğimizde text dosyamızı C:\test.txt olarak oluşturduk. Aşağıdaki şekilden örneğimizi görebilirsiniz. Forma yazılacak kodlar: Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Text = "Text Dosyaya Kayıt...Bahadirsa" .MaximizeBox = False .Location = New Point(300, 200) End With End Sub ‘Text dosyaya kayıt StreamWriter ‘metodu ile olmaktadır. Private Sub btnkaydet_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkaydet.Click Dim dosya As New System.IO.StreamWriter("C:\test.txt") dosya.WriteLine(txtyaz.Text) dosya.Close() End Sub ‘ Text dosyadan okuma StreamReader ‘metodu ile yapılıyor. Private Sub btnoku_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnoku.Click Dim dosya As New System.IO.StreamReader("C:\test.txt") Dim str As String = dosya.ReadToEnd() txtyaz.Text = str dosya.Close() End Sub End Class
VB 6 ve VB.NET Arasındaki Önemli Söz Dizim Farklılıklar VB 6 ve VB.NET Arasındaki Önemli Söz Dizim Farklılıklar VB 6 ile VB .NET arasında birçok fark vardır. Bazı yönlerden en önemli farklar,söz dizimi ya da dile ilgili değil kavramsaldır. Tablo değişen progam öğelerinin çoğunu ve VB .NET te bunların yerine geçenlerin (eğer varsa) bir listesini vermektedir. VB 6 Programlama Öğesi...................................VB .NET Eşdeğeri Abs fonksiyonu............................................Abs metodu AscB fonksiyonu..........................................Asc fonksiyonu As Any anahtar kelime cümlesi.....................Option Strict özelliğini devre dışı bırakın ya da fonksiyonların aşırı yüklenmesini kullananın Atn fonksiyonu............................................Atan metodu Calendar özelliği.........................................CurrentCulture özelliği ChDir ifadesi..............................................ChDir fonksiyonu ChDrive ifadesi...........................................ChDrive fonksiyonu Chr$ ve ChrB fonksiyonları..........................Chr fonksiyonu Close ifadesi..............................................FileClose fonksiyonu Cos fonksiyonu..........................................Cos metodu Currency veri tipi.......................................Decimal veri tipi CVDate fonksiyonu.....................................DateValue fonksiyonu CVError fnsiyonu.......................................Error ifadesi Date fonksiyonu ve Date ifadesi..................Now ve Today özelikleri Date$ fonksiyonu.......................................DateString özelliği Debug.Assert metodu.................................Assert ve Fail metotları Debug.Print metodu...................................Write,WriteIf,WriteLine ve WriteLineIf metotları Deftype ifadeleri........................................VB .NET içinde desteklenmez DeleteSetting ifadesi..................................DeleteSetting fonksiyonu DoEvents fonksiyonu..................................DoEvents metodu Empty anahtar kelimesi..............................Nothing anahtar kelimesi Eqv operatörü............................................= operatörü Exp fonksiyonu...........................................Exp metodu FileCopy ifadesi..........................................FileCopy fonksiyonu Get ifadesi ................................................FileGet fonksiyonu GoSub ifadesi............................................VB .NET içinde desteklenmez Initialize olayı............................................Sub New ifadesi Imp operatörü...........................................Boolean mantıkta, X = A Imp B ifadesi, sadece A True ve B False ise True döndürür;bu VB .NET te X = ( Not A ) or şeklinde yazılır Input# ve Input$ ifadeleri;.........................Input fonksiyonu Input$, InputB ve InputB$ fonksiyonları Instancing özelliği.....VB 6 da, bir sınıfın Instancing özelliğine GlobalMultiUse verebilirdiniz;VB .NET ile, aynı işlem için statik metotlar kullanılır InStrB fonksiyonu.......................................Instr fonksiyonu IsEmpty fonksiyonu.....................................IsNothing fonksiyonu IsMissing fonksiyonu ...................................VB .NET içinde desteklenmez;isteğe bağlı tüm argümanların varsayılan değerleri olmalıdır;dolayısıyla""eksik"" olmaları mümkün değildir. IsNull fonksiyonu.........................................IsDbNull fonksiyonu IsObject fonksiyonu.....................................IsReference fonksiyonu Kill ifadesi Kill fonksiyonu Lcase$ fonksiyonu.......................................LCase fonksiyonu Left$, LeftB, ve LeftB$ fonksiyonları..............Left fonksiyonu LenB fonsiyonu...........................................Len fonksiyonu Let ve Set alma ifadeleri..............................VB .NET içinde gerek yoktur;yeni Set ifadesi VB 6 dakiyle ilgili değildir Line Input# ifadesi......................................LineInput fonksiyonu Lock ifadesi................................................Lock ve Unlock fonksiyonları Log fonksiyonu...........................................Log metodu LSet ve RSet ifadeleri LSet fonksiyonu, PadRight, ve PadLeft fonksiyonları LTrim$ fonksiyonu......................................LTrim fonksiyonu MidB ifadesi...............................................Mid ifadesi MkDir ifadesi.............................................MkDir fonksiyonu Name ifadesi.............................................Rename fonksiyonu Now fonksiyonu.........................................Now özelliği Nul anahtar kelimesi..................................Nothing anahtar kelimesi Oct$ fonksiyonu........................................Oct fonksiyonu On ... GoSub............................................VB .NET içinde desteklenmez;Select Case ifadesini kullanın On ... GoTo yapısı.....................................VB .NET içinde desteklenmez;Select Case ifadesini kullanın Open ifadesi.............................................FileOpen fonksiyonu Option Base ifadesi....................................VB .NET içinde desteklenmez;tüm VB .NET dizleri sıfır tabanlıdır Option Private Module ifadesi.....................VB .NET içinde desteklenemez;Module ifadesini kullanın Prnt# ifardesi............................................Print ve PrintLine fonksiyonları Property Get, Property Let, ve Property Set ifadeleri....................................................Property prosedürleri için VB .NET farklı bir söz dizimi vardır Put ifadesi.................................................LinePut fonksiyonu Reset ifadesi..............................................Reset fonksiyonu Right$ ve RihghtB fonksiyonları...................Right fonksiyonu RmDir ifadesi.............................................RmDir fonksiyonu Round fonksiyonu.......................................Round metodu RSet ve LSet ifadeleri.................................RSet fonksiyonu RTrim$ fonksiyonu.....................................RTrim fonksiyonu SaveSettng ifadesi.....................................SaveSetting fonksiyonu Scale metodu............................................VB .NET içinde desteklenmez (VB .NET twip kullanmaz;her şey piksel cinsindedir) Set ve Let atama ifadeleri..........................VB .NET içinde gerek yoktur;yeni Set ifadesi VB6 dakiyle ilgili eğildir SetAttr ifadesi...........................................SetAttr fonksiyonu Sgn fonksiyonu.........................................Sign fonksiyonu Sin fonksiyonu..........................................Sin metodu Sqr fonksiyonu..........................................Sqrt fonksiyonu String fonksiyonu......................................String yapılandırıcısı String($) fonksiyonları...............................VB .NET içinde gerek yoktur Terminate olayı.........................................VB .NET iinde desteklenmez;Su Dispose ve Sub Finalize ifadelerini kulanın Time fonksiyonu ve Time ifadesi................TimeOfDay özelliği;DateTime yapısına ve Date veri tipine bakın Time$ fonksiyonu.....................................TimeString özelliği Timer fonksiyonu.....................................Timer özelliği Trim$ fonksiyonu.....................................LTrim,Rtrim, ve Trim fonksiyonları Type ifadesi.............................................Structure ifadesi UCase$ fonksiyonu...................................UCase fonksiyonu Unlock ifadesi...........................................Lock ve Unlock fonksiyonları Variant veri tipi........................................Object veri tipi Wend anahtar ifadesi................................While...End While ifadeleri ve End ifadesi Width# ifadesi..........................................FileWidth fonksiyonu Write# ifadesi..........................................Write ve WriteLine fonksiyonları"
VB Net te Access VB Net te Access Veritabanına Bağlantı Verilerimiz kayıt ederken DataAdaptet nesnesinin Update methodunu kullanacağız. Ado.net içerisinde verilerimizi bir veri kaynağından çekerken DataAdapter nesnesini sıkça kullanmaktayız. DataAdapter nesnesin SelectCommand nesnesine gerekli sql komutlarını bildirerek Istediğimiz verileri veritabanından çekebiliriz. İlk önce makalenin altında görebileceğiniz Şekil 1 deki gibi Access Veritabanını oluşturun. Bu örnekte Veritabanına Db1 ismi verildi. Tablonun ismi Musteri. Yine örnekte Veritabanın Bulunduğu Path C:\Db1. Access Veritabanı oluşturduktan sonra Şimdi sıra geldi Şekil 2 deki formumuzu oluşturmaya. Toolbox tan Labelleri, ComboBoxları, TextBoxları, DataGridView nesnelerini formunuza ekleyin. Bu örnekte kolaylık olması açısından Nesnelerin Name leri cmb1,v1,... yapıldı. Örnekte veritabany bağlantısı birkaç yordam da bulunmaktadır. Bunun sebebi formumuz yüklenirken veya Veritabanından kayıt silerken güncel şekilde ekrandan görmektir. İsterseniz bu kısımdaki bağlantıları kaldırabilirsiniz... Forma yazılacak kodlar: Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim baglan As OleDb.OleDbConnection = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Db1.mdb;") ‘Veritabanı konumu belirtildi. Dim adp As New OleDb.OleDbDataAdapter() ‘Yeni bir OledbDataDapter nesnesi oluşturuldu ‘ DataAdapter nesnesiyle verilerin çekilmesi için gerekli komutlar adp.SelectCommand = New OleDb.OleDbCommand("Select * From Musteri", baglan) Dim CB As OleDb.OleDbCommandBuilder = New OleDb.OleDbCommandBuilder(adp) baglan.Open() ‘Bağlantımızı açıyoruz Dim ds1 As New DataSet() ‘Verilerimizi çekeçeğimiz dataset oluşturuldu. adp.Fill(ds1) ‘ Verilerimizi Fill metodu ile oluşturduğumuz Datasetimize aktarıyoruz Dim rw1 As DataRow rw1 = ds1.Tables(0).NewRow ‘Datasetimiz için yeni bir satır tanımlıyoruz Dim x1 As Integer x1 = ds1.Tables(0).Rows.Count ‘Veritabanımızdaki kayıt sayısı Dim s1, s2, s3 As String s1 = cmb2.Text + cmb3.Text + v8.Text s2 = cmb4.Text + cmb5.Text + v22.Text + "" + cmb6.Text + cmb7.Text s3 = cmb8.Text + cmb9.Text + v22.Text + "" + cmb10.Text + cmb11.Text rw1.Item("TCKimlikNo") = v2.Text rw1.Item("Adi") = v3.Text rw1.Item("Soyadi") = v4.Text rw1.Item("BabaAdi") = v5.Text rw1.Item("AnaAdi") = v6.Text rw1.Item("DogumYeri") = v7.Text rw1.Item("DogumTarihi") = s1.ToString rw1.Item("Uyrugu") = v9.Text rw1.Item("KimlikBelgesiTuru") = v11.Text rw1.Item("KimlikSeriNo") = v12.Text rw1.Item("NufusaKayitliOlduguIl") = v13.Text rw1.Item("NufusaKayitliOlduguIlce") = v14.Text rw1.Item("NufusaKayitliOlduguMahalle") = v15.Text rw1.Item("NufusCilt") = v14.Text rw1.Item("NufusAileSiraNo") = v17.Text rw1.Item("NufusSiraNo") = v25.Text rw1.Item("Cinsiyet") = v20.Text rw1.Item("MedeniHali") = v21.Text rw1.Item("Isi") = v18.Text rw1.Item("IkametAdresi") = v24.Text rw1.Item("GelisTarihi") = s2.ToString rw1.Item("AyrilisTarihi") = s3.ToString rw1.Item("VerilenOdaNo") = cmb1.Text rw1.Item("AracPlakaNo") = v19.Text rw1.Item("TelefonNo") = v26.Text ds1.Tables(0).Rows.InsertAt(rw1, x1 + 1) adp.Update(ds1) DataGridView1.DataSource = ds1.Tables(0) baglan.Close() ‘Veritabanı bağlantımızı kapatıyoruz. End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load With Me .Text = "Access Veritabanı Kayıt...Bahadirsa" .MaximizeBox = False .Size = New System.Drawing.Size(619, 575) .Location = New Point(140, 0) End With Dim baglan As OleDb.OleDbConnection = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Db1.mdb;") Dim adp As New OleDb.OleDbDataAdapter() adp.SelectCommand = New OleDb.OleDbCommand("Select * From Musteri", baglan) Dim CB As OleDb.OleDbCommandBuilder = New OleDb.OleDbCommandBuilder(adp) baglan.Open() Dim ds1 As New DataSet() adp.Fill(ds1) Dim rw1 As DataRow rw1 = ds1.Tables(0).NewRow DataGridView1.DataSource = ds1.Tables(0) baglan.Close() End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click v2.Text = "" v3.Text = "" v4.Text = "" v5.Text = "" v6.Text = "" v7.Text = "" v8.Text = "" v9.Text = "" v11.Text = "" v12.Text = "" v13.Text = "" v14.Text = "" v15.Text = "" v16.Text = "" v17.Text = "" v18.Text = "" v19.Text = "" v20.Text = "" v21.Text = "" v22.Text = "" v23.Text = "" v24.Text = "" v25.Text = "" v26.Text = "" cmb1.Text = "" cmb2.Text = "" cmb3.Text = "" cmb4.Text = "" cmb5.Text = "" cmb6.Text = "" cmb7.Text = "" cmb8.Text = "" cmb9.Text = "" cmb10.Text = "" cmb11.Text = "" End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim baglan As OleDb.OleDbConnection = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Db1.mdb;") Dim x As Integer = DataGridView1.CurrentRow.Index ‘Dim tcNo As String = DataGridView1.Item(x, 0).ToString Dim cmd As New OleDb.OleDbCommand cmd.Connection = baglan cmd.CommandText = "Delete * From Musteri Where TCKimlikNo=‘" & v2.Text & "‘" baglan.Close() baglan.Open() cmd.ExecuteNonQuery() Dim adp As New OleDb.OleDbDataAdapter() adp.SelectCommand = New OleDb.OleDbCommand("Select * From Musteri", baglan) Dim CB As OleDb.OleDbCommandBuilder = New OleDb.OleDbCommandBuilder(adp) Dim ds1 As New DataSet() adp.Fill(ds1) Dim rw1 As DataRow rw1 = ds1.Tables(0).NewRow DataGridView1.DataSource = ds1.Tables(0) baglan.Close() End Sub Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click End End Sub End Class ‘------------------------------------------------------------------------------------- ‘Faydalı Olması dileğiyle...Bahadirsa ‘İleriki Makalelerimizde Veritabanı anlatımına, Sql bağlantılara devam edeceğiz... ‘Bizi takip etmeye devam edin. ‘Bilgi paylaşıldıkça güzeldir...Bahadirsa
Repeater Nesnesinde Veritabanındaki Kayıtları Göstermek Project sayfasınıza 1 adet Repeater ekleyin. Default.aspx i Şekil 2 deki gibi oluşturun. Bu örneğimizde Northwind access veritabanındaki Customers tablosundaki verilerin gösterimini sağlayacağız.
DataView ile Veritabanındaki Kayıtları Filtreleme DataView in RowFilter metodunu kullanarak veritabanındaki kayıtlarımızı filtreleyeceğiz. Sonra filtrelediğimiz şekilde GridView nesnesinde verilerin gösterimi sağlayacağız.
Adrotator ile Güvenli Giriş Uygulaması Bu makalemizde veri tabanında kayıtlı image ları Adrotator nesnesinde göstereceğiz. Adrotator daki image da yazılan rakamları Textbox a girilen karakterlerle karşılaştırma yaptırıp; doğru giriş yapılmışsa giris.aspx sayfasına, karakter eşlemesi tutmuyorsa uyarı mesajı yazdırıp, kullanıcının yeniden giriş yapmasını sağlayacağız.
Ajax Timer Kontrolü Bu makalemizde Asp.Net te ajax timer kontrolünün örneğini göreceğiz. Button un text in de 1 den 10 a kadar sayı saydırdıktan sonra, HyperLink imizi görünür yaparak, belirtiğimiz siteye link verdireceğiz.
Xml Dosyaya Kayıt ve Xml Dosyadan Okuma Yeni bir web projesi acalım. Çalışma sayfamıza iki buton ve bir gridview koyalım.Sql deki kisibilgi tablosundaki verileri C:\deneme.xml dosyası oluşturup bu xml dosyasına yazdıracağız.
Çalışma Anında LinkButton Oluşturmak Bu örneğimizde çalışma anında linkbutton oluşturup, oluşturulan linke tıklanıldığı zaman, önceden belirtilen sayfaya gitmesini sağlıyacağız.
Çalışma Anında HyperLink Oluşturmak Bu örneğimizde çalışma anında hyperlink oluşturup, oluşturulan linke tıklanıldığı zaman, önceden belirtilen web sitesine gitmesini sağlıyacağız.
FileUpload-2 Bu makalemizde c# kullanılarak biraz daha değişik fileupload uygulaması göreceğiz. Bu kez filtre uygulayarak sadece exe dosyalarının yüklenmesini sağlayacağız.
FileUpload-1 Bu makalemizde fileupload nesnesi ile sitemize dosya yüklemeyi göreceğiz. İlk önce Default.aspx sayfasına 1 adet FileUpload ve Button ekleyin.
Web Sitesinden Resim Download Etmek Bir önceki makalede text dosyanın indirilmesini incelemiştik. Bu öernektede sitedeki resimlerin nasıl indirileceğini göreceğiz. Sayfaya 1 adet button ekleyin.
Text Dosya Download Etmek Aşağıdaki küçük kod parçası ile, text dosyayı bilgisayarımıza indireceğiz. Aşağıdaki şekilleri inceleyin.
Girilen Stringi Word Belgesine Aktarma Girmiş olduğumuz Stringi Word belgesine aktaracağız. İlk önce Web Site -->Add Reference -->Com dan Microsoft 12.0 Word Object Library i ekleyin.(Şekil 1)
Bilgisayarınızın Ekran Çözünürlüğünü Bulun Bu makalemizde bilgisayarımızın ekran çözünürlüğünü bulacağız. Projectimizde Default.aspx ve bul.aspx isimli sayfalarımız olacak.
Sitenizi Ziyaret Edenlerin IP Numaralarını Kaydetme Arkadaşlar bu makalemizde sitenize giriş yapan ziyaretçilerin Ip numarasını gösterip, Access veritabanına kaydedeceğiz.
Mail Adresine Şifre Gönderme Bu örneğimizde mail adresine şifre göndereceğiz. TextBox a girilen mail adresi ve gizli cevabın doğru olması durumunda; girilen mail adresine üyenin şifresini göndereceğiz.
Session ile Kullanıcı Girişi Kontrol Session metodu ile Kullanıcı adı ve şifresi kontrolü yaptıracağız. Girilen kullanıcı adı ve şifresi doğru ise giris.aspx sayfasına, yanlış ise hata.aspx sayfasına yönlendirme yapacağız.
Sanal Klavye Arkadaşlar bu makalede bankaların internet sitelerinde kullandığı, sanal klavye konusunu göreceğiz. Sanal klavye yi kullanarak, şifre girişi yapacağız. Seçime bağlı sanal klavyedeki rakamların yerinin sürekli değiştireceğiz.
Kullanıcı Girişi ve Denetimi Bu örnekte login.aspx sayfasında kullanıcı denetimi yapacağız. Kullanıcı adı ve şifresini web. config dosyasına yazacağız. Doğru giriş yapıldığında, default.aspx sayfasına yönlendirme yapacağız.
Session Kullanımı Bu örneğimizde Session un nasıl kullanıldığını göreceğiz. Session özelliği genellikle bir sayfadan diğer sayfaya veri aktarımında kullanılan bir metod dur.
Xml Dosyasındaki Bilgileri GridView Nesnesinde Gösterme Arkadaşlar bu makalemizde xml dosyası oluşturacağız(Şekil 1). Daha sonra xml dosyamızdaki bilgileri GridView nesnemizde göstereceğiz. İlk önce sayfanıza GridView nesnesi ile XmlDataSource nesnesi ekleyin.(Şekil 2).
GridView da Hücre Biçimlendirme-2 Bu makalemizde de GridView da seçilen herhangi bir sütundaki bir verinin, geçtiği satırların arka plan rengini değiştireceğiz.(Şekil 1)
GridView da Hücre Biçimlendirme-1 Bu makalemizde GridView nesnemizdeki sütunları biçimlendireceğiz. Default.aspx sayfasında GridView nesnesine OnRowDataBound="GridView1_RowDataBound" u muhakkak ekleyin.
Metin Dosyasındaki Verileri GridView da Gösterme Bu makalemizde App_Data mızdaki kayitlar.txt metin dosyamızdaki verileri, GridView nesnemize aktarıp, gösterimini sağlayacağız. Aşağıdaki şekilleri inceleyin.
Çalışma Anında Menu Oluşturma Bu makalede çalışma anında Menu oluşturmayı göreceğiz. Default.aspx sayfasına 1 adet Button ve Panel ekleyin. Access veritabanındaki tablodan verileri çekip,
ASP.NET 3.5 ile Gelen Yenilikler Bu yazımızda ASP.NET 3.5 ile gelen yeniliklere hızlı şekilde göz atıyoruz. Yine geçtiğimiz günlerde resmen duyurulan ASP.NET 3.5 Extensions paketiyle gelen yenilikleri de inceliyor olacağız.
GridView daki Verileri Metin Dosyasına Kaydetme Önceki makalelerde Excel dosyasına aktarmayı gördük. Şimdi Gridview nesnemizdeki verileri Metin dosyasına aktaracağız. Ayrıca Sil ve Güncelle butonları ekleyeceğiz.
GridView daki Verileri Excel Dosyasına Kaydetme-2.Metod Bu makalede Northwind.mdb Customers alanındaki verileri Gridview nesnesinde gösterimini sağlayıp, daha sonra Excel dosyasına kaydetmeyi göreceğiz.
GridView Kontrolünde Update, Delete İşlemleri Bu makalemizde GridView Kontrolünde Update, Delete İşlemlerini göreceğiz.İlk önce şekil1 deki gibi formunuza Gridview ve AccessDatasource ekleyin
GridView daki Verileri Tablo Yöntemi İle Excel Dosyasına Kaydetme-Metod1 Bu makalede Sql veritabanındaki verileri SqlDataSource ile GridView nesnesine aktarıp, daha sonra GridView daki verileri tablo ya aktaracağız.
VC# - Excel Dosyasından GridView a Veri Okuma Bu makalemizde GridView nesnemizde Excel dosyamızdan alacağımız verileri göstereceğiz. Bilgiler.xls excel dosyası oluşturup, aşağıdaki kodları formunuza yazın. Aşağıdaki şekilleri inceleyin...
GridView (VC#) Nesnesine Resim Ekleme Bir önceki makalede Access Veritabanından GridView nesnesine veri çekimi konusunu işlemiştik. Bu makalemizde de GridView nesnemize resim ekleme konusunu göreceğiz.
Asp.Net (VC#) GridView Nesnesinde Veri Gösterimi Bu makalemizde Access veritabanımızdaki dataları, GridView nesnemizde gösterimi konusunu anlatacağız. Formunuza 1 adet GridView nesnesi ekleyin. Aşağıdaki şekil1 i inceleyin.
Ajax ta Update Panel Kullanımı Bu makalemizde Ajax ta Update Panel uygulamasını göreceğiz. Update Panel kullanarak sayfamızın tamamını güncelleştirmeden sadece panel içindeki nesnelerimizi güncelleştirebiliriz.
GridView Içinde Hyperlink Kullanımı Bu makalemizde GridView nesnemizin içinde Hyperlink kullanacağız. Hyperlink e tıkladığınız zaman veritabanından ilgili personelin bilgilerini getirecek. Makalenin en altındaki Şekilleri inceleyin.
Response Redirect Uygulaması Response Redirect metodunu kullanarak web sitenizin sayfa adresini sanal değiştirebilirsiniz. Ör:default.aspx olan sayfa adını default.aspx?ABCDEid_no=1 gibi yapabilirsiniz. Aşağıda Default.aspx kodlarının şekli verilmiştir.
FileUpload ile Sitenize Dosya Yükleyin-C# Evet arkadaşlar. FileUpLoad metodu ile sitenize istediğiniz dosyaları yükleyebilirsiniz. Bu örneğimizde resim dosyalarını sitemize yükleyeceğiz. Aşağıdaki örnek şekillerden uygulamayı görebilirsiniz.
Site içi Arama Veritabanındaki bilgileri belli kriterlere göre aratıp GridView nesnesinde gösterebilirisiniz. Bu örnekte Sql veritabanimizda kayitli olan bilgileri göstermeye çalıştık.
Asp Nesneleri Asp‘de Nesneler Objeler, Özellilleri, Metodları ve Nesne Temelli Programlama Günlük yaşamımızda kullandığımız, dokunabildiğimiz her şey obje olarak adlandırılır
DetailsView Nesnesi ile Veritabanına Bağlantı Bu makalemizde DetailsView nesnesi ile Access veritabanımıza bağlanacağız. DetailsView nesnesi seçili iken sağ tıklayın. Auto Format kısmından DetailsView nesnenizin görünümünü değiştirin...
Text Kayıt Örneği Bunun için ilk önce c:\kayit.txt dosyası oluşturun (isterseniz başka isimde de oluşturabilirsiniz). Form1 ve Form2 oluşturun.
Çalışma Anında LinkButton Oluşturma Arkadaşlar bu örneğimizde çalışma anında istediğimiz kadar link oluşturacağız. Daha doğrusu Access veritabanımızdaki kayıtlı veri kadar link oluşturup, linke gidilmesini sağlıyacağız...Bahadirsa
Veritabanı İşlemleri ---------- Soru-1 \| Nasıl Veritabanı Oluşturabilirim ? ---------- Önce Microsoft Access i açtık ve bir kayitlar adında bir tablo Oluşturduk.
ASP de Sık Karşılaşılan Hata Mesajları ASP ile yapılan işlemlerde çoğu zaman karşılaştığımız hatalar, sebepleri ve çözümleri Hata : Microsoft OLE DB Provider for ODBC Drivers
Asp Net te Mesaj Gönderme Bu örneğimizde asp.net te mesaj gönderme konusuna değineceğiz. Formunuza 3 adet TextBox,2 adet Button, 1 adet Linkbutton ekleyin. Aşağıda Şekil 1 de gösterildiği gibi formunuzu oluşturun.
File Upload Uygulaması-1 Bu makalemizde FileUpLoad nesnesiyle bir örnek yapacağız. İlerki makalelerimizde daha detaylı uygulamalar yapacağız. İlk önce formunuza 1 adet FileUpLoad, 1 adet Label, 1 adet Image yükleyin.
ASP.NET nedir? ASP.NET yani Active Server Pages .Net ; Microsoft’un yeni vizyonu .Net ile duyurmuş olduğu internet uygulamaları ve web servisleri için sunucu taraflı yazılım geliştirmeyi kolay, güvenli ve genişleyebilir yapıda sağlayan teknolojidir.
Veritabanı Bağlantı Kontrol Bu makalemizde veritabanına bağlantımız olup olmadığını kontrol edeceğiz. Formunuza 2 adet button ekleyin. Aşağıdaki şekilleri inceleyin.
Datareader ile Kayıt Kontrolü Bu makalemizde Access veritabanındaki kayıtlar arasında Ada göre sorgulama yapıp, aynı isimde kaç kayıtın bulunduğunu göreceğiz. Formunuza 1 adet DataGridview ve Button ekleyin.
Veritabanındaki Kayıt Sayısını Öğrenmek Bu örnekte Northwind.mdb Access veritabanındaki Customers tablosunda kayıtlı olan kayıt sayısını öğreneceğiz.
Veritabanındaki Kayıtlar Arasında Gezinmek (DataBind Navigate) Bu makalemizde Access veritabanına bağlanarak, formumuzdaki İleri Geri Butonlarına tıklayarak veritabanındaki kayıtları Textbox larda göstereceğiz.
Veritabanında Kayıtlı Kullanıcı Adı ve Şifrelerini Eşleştirme Bu makalemizde veritabanında kayıtlı kullanıcı adı ve şifreler ile txtKullanici ve txtSifre isimli textboxlara girilen verilerin eşleştirmesini, sorgulamasını yapacağız. Formunuza 21 adet textBox, Label ve 1 adet Button ekleyin. Aşağıdaki şekilleri inceleyin.
Excel Dosyasındaki Bilgileri DataGridView da Göstermek Herhangi bir Excel dosyasını(Office 2007 Excel 12.0 sürümü Ör: deneme.xlsx) açıp, dataGridView da göstereceğiz.
Sql de Kayıtlı Kullanıcı Adı Sorgulama Bu makalemizde; sql veritabanına yeni kullanıcı adı girişi yapılmadan önce, veritabanında kayıtlı adları sorgulatıyoruz. Eğer girmek istediğimiz Ad veritabanında kayıtlı ise, Şekil 2 deki gibi Girmiş olduğunuz ad veritabanında kayıtlı. Lütfen başka ad giriniz uyarısı alıyoruz.
DataGridViewdaki Sütun İsimlerini Değiştirmek Bu örnekte veritabanımızdaki tabloda yer alan sütunların isimleri yerine kendi belirlediğimiz sütun isimlerini dataGridView nesnesinde kullanacağız. Aşağıdakı şekilleri inceleyin.
Sql Bağlantı Kontrol Bu makalemizde sql veritabanı bağlantısının açık olup olmadığını yani veritabanına bağlantımızı kontrol edeceğiz.
Sql Veritabanında Kayıt Arama Bu makalede sql veritabanımızdaki bir kayıtı, tablomuzdaki sütundaki alanlardaki kriterlere göre aratarak bulunan kayıtı, dataGridView nesnesinde göstereceğiz. Aşağıdaki şekilleri inceleyin.
DataGridView daki Kayıtları Diğer DataGridView a Kopyalama Bu örnekte DataGridView1 deki kayıtları DataGridView2 e kopyalayacağız. Aşağıdaki şekilleri inceleyin.
DataGridView Nesnesinde Seçili Satırın İndeksinin Alınması DataGridView nesnesinde seçili satırın indeksini mesaj olarak alacağız. İlk önce formunuza 1 adet dataGridView ve button nesnesi ekleyin. Aşağıdaki şekli inceleyin.
DataGridView Nesnesinde Seçili Satır Sayısını ve Satır Nosunu Gösterme Arkadaşlar, dataGridView nesnesinde seçili satır sayılarını ve no larını mesaj olarak göstereceğiz. Aşağıdaki şekilleri inceleyin. Formunuza 1 adet dataGridView nesnesi ve button ekleyin.
DataGridView daki Verileri Excel e Kaydetme ve Excel den Veri Okuma Öncelikle yapılması gereken; 1- Solution Explorer a sağ tıklayın. Add Reference kısmından COM sekmesini seçin. Bu kısımdan Microsoft Excel Library nesnesini Ok butonuna tıklayarak projenize ekleyin.
DataGridView da Seçili CheckBox taki Satırı Silme Bu makalede DataGridView nesnesine checkbox sütunu ekleyeceğiz. Ayrıca sql veritabanımıza bağlanıp bilgileri dataGridView nesnesinde göstereceğiz. Son olarak checkbox ı seçili satırı sileceğiz.
DataGridView da Seçili Satırı Kopyalama Bu makalemizde DataGridView da seçili satırı diğer DataGridView a kopyalayacağız. Formunuza 2 adet DataGridView ekleyin. Aşağıdaki şekilleri inceleyin.
ListView da Checkbox, Resim ve Veri Gösterimi Bu makalemizde ListView nesnesinde resim, checkbox ve veri gösterimini anlatacağız. Formunuza 1 adet ListView ve ImageList nesneleri ekleyin. ImageListe göstermek istediğiniz resimleri item olarak ekleyin. Aşağıdaki şekli inceleyin.
VC#.Net Sql Veritabanındaki Bilgileri ListBox ta Gösterme Bu makalemizde Sql veritabanımızdaki verileri Ad sütununa göre sorgulayıp, bulunan kayıtları listbox nesnemizde göstereceğiz. Formunuza 1 adet textBox, button,dataGridView ve listBox nesnesi ekleyin. Aşağıdaki şekilleri inceleyin...
VC#.Net te dataGridView a Satır Sutun Ekleme Bu makalemizde veritabanına bağlanmaksızın dataGridView nesnemize satır ve sütun ekleyip, veri girişini sağlıyacağız. Aşağıdaki şekilleri inceleyin. Formunuza 1 adet button ve dataGridView nesnesi ekleyin...
VC#.Net te id no ya Göre Kayıt Arama Bu makalemizde Sql veritabanımızda kayıtlı id no ya göre verilerimizi ve kayıtlı resimlerimizi textboxlara ve pictureBox ımımıza getireceğiz. İlk önce sql veritabanınızı oluşturun.
VC#.Net ile Sql Veritabanı Bağlantısı Bu makalemizde vc#.nette sql veritabanına bağlanıp, verilerimizi dataGridView nesnemizde göstereceğiz. İlk önce formunuza 1 adet button ve dataGridView nesnesi ekleyin. Formunuza aşağıdaki şekildeki gibi tasarlayın.
DataGridView da Dosya Boyutunun Gösterilmesi Bu makalemizde DataGridView nesnesinde dosyanın konumu ve boyutunu göstereceğiz. İlk önce formumuza 1 adet OpenFile Dialog, 1 adet DataGridView ve Button ekliyelim. Formumuzu aşağıdaki şekildeki gibi oluşturalım...
DataGridView Sütunundaki Verileri Kritere Bağlı Sıralama Bu örneğimizde Sql veritabanımızdaki verileri DataGridView nesnemizde gösterip, belli kriterlere göre verimizi sıralayarak göstereceğiz. İlk önce sql veritabanınızı oluşturun. Bu örneğimizde veritabanımızın ismi bilgiler.mdf, table ın ismi kisibilgi.
DataGridView da Tarih Aralığına Göre Kayıt Sıralama Sql veritabanımızdaki kayıtları TextBox1 ve Textbox2 ye girmiş olduğumuz tarih aralıklarına göre sıralayacağız. Bunun için sql komutu between den yararlanacağız.
Sql Veritabanına Kayıt Ekleme Bu makalemizde SQL veritabanımıza kayıt ekleme konusunu inceleyeceğiz. SQL veritabanının nasıl oluşturulacağı konusunu önceki makaleler de anlatmıştım.
Excel Dosyasından Veri Okumak-VB.NET İlk önce C:\Bilgiler.xls şeklindeki gibi excel dosyanızı oluşturun. Daha sonra formunuza 1 adet Label, Button ve DataGridView nesnesi ekleyin.
Kayıt Silme-VB.NET Bu örnekte Access veritabanımızdan, T. C. Kimlik No‘ya göre Kayıt Silme işlemi yapacağız. Sizler kendi parametrelerinize göre kayıt silme işlemini gerçekleştirebilirsiniz.
Access Veritabanına Kayıt Ekleme Bu örneğimizde Access Veritabanımıza kayıt eklemeyi göreceğiz. İlk önce C:\p_takip.mdb şeklinde veritabanımızı tanımlayalım.
Tablodan Veri Okuma Bu örneğimizde oluşturacağımız tablodan veri okuyacağız.
Xml Dosyasından Kayıt Okuma Arkadaşlar bu örneğimizde, hazır bulunan xml dosyamızdan, oluşturduğumuz textboxlara veri ve picturebox ımıza resim çekeceğiz.
Xml Dosyasına Kayıt Bu örneğimizde Northwind.mdb veritabanındaki alanlardan çektiğimiz bilgileri, Xml olarak kaydedeceğiz...
VB Net te Access Veritabanına Bağlantı Verilerimiz kayıt ederken DataAdaptet nesnesinin Update methodunu kullanacağız.
DataReader ile TextBox a Veri Çekme Evet arkadaşlar Datareader kullanarak Serverımızdaki sql veritabanımızdan Textbox ımıza veri çekeceğiz. Unutmadan TextBox ımızın MultiLine özelliğini True yapın...Bahadirsa Aşağıdaki şekildeki gibi formunuzu tasarlayın. Formunuza 1 adet TextBox ve Button ekleyin.
Veritabanı İşlemleri Bu makalemizde Access veritabanımızdaki bilgileri comboboxta seçtiğimiz kriterlere göre listbox ta gösterimini sağlıyacağız. Bu örnekte veritabanımızı C:\bahadirsa.mdb de oluşturduk...

Online:	742
Bugün:	1241
Dün:	3080
Toplam:	2.420.912
Ip No:	18.117.186.125

Makale Toplam:	757
Download:	7
Güncel Haber:	6

	akd27
	haycom
	haycom
	army19
	xcvzczxz
	picasso777
	zaebb
	yavuz
	marnovo
	fd35

Bahadır ŞAHİN Programlama Sitesi

Menu:

Sitede hangi programlama dillerini görmek istersiniz.

Kullanıcı Giriş

Tags-Etiketler

Bu kısımda sitemizde etiketlenmiş makaleleri toplu olarak bulabilirsiniz...

Delphi de DrawColumnCell Örneği

Formda Mesaj Gösterimi

Label ve TextBox Nesnelerinde TrackBar Kullanımı

Xml Dosyasından ListBox a Veri Ekleme

SqLite Database Bağlanmak ve Verileri TreeView da Göstermek

dataGridView da List Metodu Kullanımı Örneği

UniTable da My Sql Veritabanındaki Tablodaki Verilerin Gösterimi

Repeater da Hashtable Kullanımı

MS Access Veritabanına Bağlanmak ve TreeView da Verileri Göstermek

Asp.Net te Çalışma Anında Sayfadaki Nesnelerin Ekrandaki Gösteriminin Gizlenmesi

Pythonda Grafik Gösterimi

C++ maskedTextBox İle Formatlı Yazmak

Excel de Kayıt Aramak

CSV Dosyasındaki Verileri SQL Veritabanı Tablosuna Kaydetmek

StringGrid Sütun Genişliğini Otomatik Ayarlamak

DropDownList te ArrayList Kullanımı

DataGridView da CheckBox Sütunda Seçili Olan Satırları Başka Bir DataGridView da Gösterimini Sağlamak

My Sql Veritabanında Arama Yapmak ve Arama Sonucunu DBGrid de Göstermek

C++ ListViewda Arama Yapmak ve Aranan Kayıt Bilgilerini TextBoxta Göstermek

İki Tablo İle İlişkili Bir DataSet Oluşturmak

Python da MessageBox

MySql Veritabanında Arama Yapmak ve Arama Sonucunu GridView da Göstermek

FireDAC Kismindan MS Sql Veritabanina Baglanmak

ListBoxta Mysql Veritabanına Bağlanmak

GridView da Seçili Satırdaki Karakterleri Küçük Yazdırmak

ListBox ta Arama Yapmak ve Seçili Itemin Yazı ve Arka Plan Rengini Değiştirmek

Asp.Net te Javascript Kullanarak GridView daki Satır Rengini Değiştirmek

MySql Veritabanındaki Verileri ComboBox ta Göstermek

ADOQuery da InsertRecord Metoduyla Kayıt Girişi

Pytonda Forma Resim Ekleme

Metin İçinde Arama Yapmak

Server Metodunu Çağırarak Sayfada Mesaj Vermek

Host Adı ve Ip Adresini Almak ve Console da Göstermek

ADOTable Ile Filtreleme İşlemi

Python da Ekran Görüntüsü Almak

GridView a Scroll Ekleme ve Seçili Satır Bilgilerini Label de Göstermek

Case Kullanımı

Text Dosyasındaki Metini Güncelleştirmek

DataGridView da BindingNavigator Kullanimi ve Kayitlar Arasinda Dolasmak

Text Dosyasindaki Bilgileri ListBox’da Gostermek

C++ Xml Dosyasindaki Verileri ListView Nesnesinde Gosterimini Saglamak

Entry e Girilen Icerigi Text Dosyasina Kaydetmek

Xml Dosyasina Kayit Ekleme, Kayit Duzenleme ve Kayit Silme Islemleri

GridView da Java Kullanarak Arama Yapmak ve GridView HighLight Gosterimi

Text Dosyadan Okumak

ADOTable Insert, Update ve Delete Islemleri

MySql Veritabanina Kayit Ekleme ve GridView de Kayitlari Gostermek

DataTable da List Kullanimi ve DataGridView da Gosterimi

C++ My Sql Veritabanina Baglanmak ve dataGridView Nesnesinde Seçili Satir Bilgilerini MessageBoxta Gösterimini Saglamak

Faktoriyel Hesaplama

Image’larda BallonHint Kullanımı

MessageBox

GridView da Satır Üzerindeyken Satır Detaylarını Tooltip Olarak Göstermek

Verileri CSV Dosyasına Aktarmak

DBCtrlGrid de MySql Veritabanındaki Verileri Sıralı Göstermek

C# da Trim Kullanımı

dropDownList Nesnesinde Seçili Itemi Label de Göstermek

C++ da Konsol Ekranında MSSql Veritabanına Bağlanarak Kayıtları Göstermek

Delphide Txt Dosyasındaki Kayıtlar Arasında Gezinmek

CSV Dosyasından Okuma

Console Uygulaması

FileUpload Ile Sadece Image Dosyası Yüklemek

Delphide DBGrid Nesnesindeki Verileri Excel Dosyasına Aktarmak

Python da RadioButton Kullanımı

dataGridView da CheckBox İle Satır Seçmek, Seçili Satırın Yazı ve Arka Plan Rengini Değiştirmek

Delphide Progressbar Kullanımı

C++ da dataGridView Nesnesine TextBox, Button, CheckBox, ComboBox ve Image Alanları Eklemek

CSV Dosyasında Arama Yapmak

dataGridView da XML Dosyasindaki Country ve City Verilerini Gostermek

Local (İç) ve External (Dış) Ip Adresini Öğrenmek

Python’da Label Kullanımı

Cookie Oluşturmak ve Cookie Değerlerini Almak

Delphi de MediaPlayer Uygulaması

Web Sayfasında Javascript İle Birlikte Session Kullanımı