Arama sonuçlarınız

Bunu yapmak için, Bir adet command click koyun ve daha sonra kendisi gelicek diğer tuşlar. Private Sub Command1_Click() Dim d_tarih, gun 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 =...

Menu Bar VB program menüsü Tool Bar Menü kısayol tuşları Project Explorer Projede yer alan form, module gibi elemanları listeler Properties WindowKontrol ve formların özelliklerini gösterir Form Layout Window Formun ekran üzerinde bulunduğu yeri gösterir ToolBox Arayüz tasarımında...

Visual Basic'te label animasyonu yapmayı görelim. Public Class Form1 Dim r, g, b As Integer Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick r = Int(Rnd() * 256) g = Int(Rnd() * 256) b = Int(Rnd() * 256) Label1.ForeColor =...

Private Function TelFormat(TelNo As String) As String If Len(Trim(TelNo)) <= 7 Then TelFormat = "" '7725410 -> 772 54 10 If Len(Trim(TelNo)) = 7 Then _ TelFormat = Mid(TelNo, 1, 3) + " " + Mid(TelNo, 4, 2) + " " + _ Mid(TelNo, 6, 2) ' 2667725410 -> (266) 772 54 10 If Len(Trim(TelNo)) = 10...

uygulamamıza standart exe ile başlayıp 1 picture box 7 adet textbox ve 1 adet command button ekleyelim uygulama başladığında textboks 1 ve 2 de fare koordinatları görünür mausu ilk tıkladığımız yer çizgimizin 1. koordinatı 2. tıkladığımız yer 2. koordinatı olur ve çizgi çizilir 3. tıklamadan...

İlk önce böyle bir form oluşturalım 2 label 2 text1 1 command ekleyin ve kendinize göre forma yerleştirin Private Sub Command1_Click() Select Case Text1.Text 'Bu kısımda kullanıcı adı kısmını tanıtıyoruz Case Is = "" 'Burada ise kullanıcı kısmı boş olduğunda ne yapmak istediğiniz seçersiniz...

Aşağıdaki kodları kullanarak seçilen pencereyi kapatan bir program yapabilirsiniz. Form kodları --------------------- VERSION 5.00 Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomctl.ocx" Begin VB.Form Form1 Caption = "Form1" ClientHeight = 5340 ClientLeft = 60...

Visual Basıc'de Dosya Açmak -------------------------------------------------------------------------------- Open Deyimi Visual Basıc'de dosya açma komutu olarak open komutu kullanılır. Eğer dosya varsa dosyayı açar. Eğer dosya yoksa dosyayı yeniden oluşturur ve açar. Open Deyimiyle dosya...

Bunu yapmak için, Bir adet textbox ve command click koyun. Dim speech As SpVoice Private Sub Command1_Click() speech.Speak Text1 End Sub Private Sub Form_Load() Set speech = New SpVoice End Sub

'İlk önce açtığınız forma 7 tane label 2 tane text 1 tanede command butonu koyun ve başlayalım 'ilk önce burda değişkenleri tanımlıyoruz.. dim müsteriver as integer dim müsteritutar as integer 've burda tanımladığımız değişkenleri textlere tanıtıyoruz müsteriver = text1 müsteritutar = text2...

KONU : API Windows Bilgileri Sub listele(adres As String) Dim valuename As String Dim valuelen As Long Dim datatype As Long Dim data(0 To 254) As Byte Dim datalen As Long Dim datastring As String Dim hKey As Long Dim index As Long Dim c As Long Dim retval As Long retval =...

KONU : Veritabanına Kayıt Girmek - 1 Mevcut veritabanını açmak: Var olan bir veritabanını random access olarak açmak için yukarıda verilen (Open ...) kod bloğu kullanılır. Zaten bu kod ile var ise bir dosya açılır yok ise yeni bir dosya yaratılır. Yeni bir kayıt eklemek Bir veritabanı açtınız...

KONU : Veritabanına Kayıt Girmek - 2 İyi programcılar form üzerine yerleştirdikleri nesnelerin adlarını da uygun şekilde değiştirirler, bu şekilde o nesneler çok daha kolay hatırlanır. Textbox lara değişik adlar verelim: With dbKayit .Ad = txtAd .Adres = txtAdres .Tel = txtTel End With...

Yeni bir veritabanı açmak: 1. Type ... ile kayıt yapısını belirle 2. Dim .. As ile kayıt bilgisini deklere et 3. Bir kayıt ile tutulması gereken alan uzunluğunu Len(dbKayıt) ile belirle Yukarıda anlatılan işlemler sıra ile yapıldığı taktirde artık yeni bir veritabanı açabiliriz. Yeni bir...

KONU : Aktif Yazıcının Değiştirilmesi Bu kodlar Windows'un varsayılan yazıcısını değiştirmez. O an çalışan programın içindeki aktif yazıcıyı değiştirir. Private Sub Form_Load() prnlist MsgBox ("Şu anki aktif yaziciniz : " & Printer.DeviceName & " ") End Sub Private Sub prnlist() Dim X As...

Gerekenler ; 1 Tane Timer(enabled :true ; Interval = 10) 2 Tane Label Formun Labelim Backcolor rengini siyah Yapalım Forecolor Rengini Beyaz Yapalım.Formumuzun Genişliğide Aşağıdaki Gibi Olsun veya Kodlarla Sabit tutabilirsiniz Ama Elle Şekil Vermek Daha Kolay şekli verdikten sonra Formun...

Evet arkadaşlar 2.Dersimize geldik.Sıradaki konumuz Listbox'a Düzenli Veri Aktarmak (Vb.6). Hemen konuya girelim ; Gerekli olacaklar ; 1-1 adet listbox 2-3 adet (Ekle, Sil, Temizle) butonları 3-2 adet textbox (Ad ve Soyad yazıcaz ) bu gerekli olacaklar ile ilgili size bir açıklama yapayım ...

Merhaba arkadaşlar şimdi sizlere vısual basic'deki araçlar ve onların anlamlarını açıklıyacağım çoğu konuda veya derste bunun ne işe yaradığı anlatılmadığı için bu konuyu açma gereği duydum. Araçlar; 1. PictureBox, 2. Label, 3. TextBox, 4. CheckBox, 5. OptionBox, 6. Combo/Select, 7...

Evet Arkadaşlar Zor Bulunan Bi Kod Paylaşıcam Fakat İlk Önce; - Formunuzun Boyutuna Uygun Photoshop'tan png resim yapınız.. - Ve Son Olarak FormBorderStyle'yi None Olarak Seçili Hale Getirelim.. - Ve Aşağıdaki Kodu Form_Load'ın İçerisine Yazalım.. PHP- Kodu: private void Form1_Load(object...

Visual Basic .Net'te nasıl renkli yazı yazılır bir göz atalım. 1 label Ekleyiniz.... 1 Timer Ekleyiniz... Timer - Tick olayına 255 yazan yeri - istediğiniz gibi yapabilirsiniz.. Kod: label1.forecolor=color.fromargb(255,rnd*255,rnd*255,rnd*255)