coder

  1. N

    [Vb.net] Otomatik Sayı Artırma

    Button'a gelin ve şunu yazın labeltext = label.text + 1 böylece her butona bastığında +1 arttırcak .
  2. N

    [Vb.net] Yazıyı Sese Çevirmek

    sizlere yazıyı sese çeviren kısa ama güzel bir konu anlatmaya çalışacağım, dilerseniz vakit kaybetmeden konuya geçelim Öncelikle VB.NET yeni bir proje açıyoruz, açtıktan sonra bize gereken 6 adet tools var sayalım bunları 1 Adet TextBox 2 Adet Button 1 Adet Background Worker 2 Adet Button...
  3. N

    [Vb.net]Basit Tasarım Efektleri Kodlama

    Basit tasarım efektleri nasıl yapılır birkaçını göstereceğim. 1) Yükleniyor yazısı: 1 Timer 1 Label ekleyiniz. Timer1'in ınterval'ini 1 enabled'ini true yapınız. Timer1'e girilmesi gereken kodlar If Label1.Text = "Yükleniyor" Then 'Eğer labelin yazısı "Yükleniyor" ise yazıyı...
  4. N

    [Vb.net]Butona Şefaflık verme

    Visual Basic'de butona şeffaflık vermek için gereken kod Dim alpha As Int16 ' <--- number between 0 - 255 alpha = 60 Button1.BackColor = Color.FromArgb(alpha, SystemColors.Control)
  5. N

    [Vb.net]-CAPTCHA- Doğrulaması

    1-) Vermiş olduğum vb uzantılı dosyayı tema eklermiş gibi CTRL + D ile ekleyin. 2-) ToolBox'a Gelen ReCAPTCHA'yı form'a ekleyin if reCAPTHCHA1.Cevap = TextBox1.Text Then ''Kod Doğru Girilirse Ne Yapılsın else ''Kod Yanlış Girilirse Ne Yapılsın end if EKLENENLER 1-) Rasgele Metin ile Doğrulama...
  6. N

    [Vb.net]Bilgisayar Kaç Saattir Açık

    Public Class Form1 Public Function PC_Kac_Saat_Acik() As String Dim RealityCheats As String = String.Empty RealityCheats += Math.Round(Environment.TickCount / 86400000) & " gün, " RealityCheats += Math.Round(Environment.TickCount / 3600000 Mod 24) & " saat, "...
  7. N

    [Vb.net]Chrome Bir site açtığında şu işlemi yap mantığı

    Private Sub Timer1_Tick_1(sender As Object, e As EventArgs) Handles Timer1.Tick If note = "a" Then Dim myProcess As Process() = Process.GetProcesses 'Çalışan uygulamaları Process ile tanımlayalım. myProcess kendi uygulamalarımız. For Each uyg As Process In...
  8. N

    [Vb.net]İndex Çalıcı

    Bugün sizlere VB.NET ile index çalıcı yapmayı göstereceğim. Kullanılacak malzemeler : 1 Textbox 1 Button 1 RichTextBox Yapımı : İlk önce buttona çift tıklıyoruz ve kod bölümüne şu kodları yazıyoruz : Dim indir As New Net.WebClient 'indir adında bir değişken tanımladık.Bu değişken web serverler...
  9. Rooster

    C# FAKTORİYEL BULMA

    int sayi,i,f=1; Console.WriteLine("Faktoriyeli alınacak sayı girin"); sayi = Convert.ToInt16(Console.ReadLine()); for (i=1; i <= sayi; i++) { f= i * f; } Console.WriteLine("Cevap : " + f); Console.ReadLine();
  10. N

    [Vb.net] Üye Olma Programı

    Tasarımı size bırakıyorum zaten çok basit yapmanız gereken kayıt olma yerini tasarlamak ve giriş yap bu kadar basit tabi kodlara uygun olmasında fayda var Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click If TextBox1.Text = My.Settings.id And...
  11. 1Jeff

    Python Geometrik Şekil Çizdirme Programı

    tekrar = int(input("Kaç şekil çizmek istersin ? -> ")) i=0 while(i<tekrar): print("1- Dik Üçgen\n2- Eşkenar Üçgen\n3- Kare\n4- Dikdörtgen\n5- Daire") print() tur = input("Hangi şekli çizmemi istiyorsun? -> ") if tur == "1": i+=1 satir = int(input("üçgen satır sayısını giriniz ->...
  12. 1Jeff

    Python String Methods

    mesaj = 'Heyy oradakiler merhaba. Benim ismim Jeff' #mesaj.upper tüm cümleyi büyük harfle yazmanızı sağlar. mesaj = mesaj.upper() print(mesaj) ///////// mesaj = 'Heyy oradakiler merhaba. Benim ismim Jeff' #mesaj.lower() tüm kelimeleri küçültmeye yarar. mesaj = mesaj.lower() print(mesaj)...
  13. 1Jeff

    Python Negatif - Pozitif Programı

    print("*** Jeff'in Negatif - Pozitif Programına Hoşgeldiniz!***") print("-----------------------------------------------------------") sayi1 = int(input("Birinci Sayi :")) sayi2 = int(input("İkinci Sayi :")) sayi3 = int(input("Üçüncü Sayi :")) if sayi1 > 0: print("Sayi1 Pozitiftir.") if...
  14. N

    VB.NET Basit Bir Saat Yapımı

    Gerekenler; 1 Timer ve 1Label Yapılışı Öncelikle Timera Gelip Enabled özelliğini True Olarak Değiştiriyoruz. İnterval Özelliğinide 1000 Yapıyoruz Timera Yazılacak Kodlar; Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick Label1.Text = TimeOfDay End Sub
Üst