Arşiv

Posts Tagged ‘vb’

VB6 ile heceleme yapmak

07/09/2016 Yorum bırakın

VB6 ile heceleme yapmak:
Daha fazlasını oku…

Reklamlar
Kategoriler:Kodlar Etiketler:, ,

VB6 ile metin şifrelemek & çözmek

14/08/2012 1 yorum

https://i0.wp.com/img805.imageshack.us/img805/1543/sifrele.jpg

Text1(multiline=true), text2(multiline=true), command1, command2 ekliyoruz

Daha fazlasını oku...

Kategoriler:Kodlar Etiketler:, , , , , , , , ,

Visual Basic ile Facebook’da otomatik dürtme kodları

30/01/2012 1 yorum

Otomatik dürtme, geri dürtme kodları
Daha fazlasını oku…

Visual Basic ile bruteforce programı yapmak

29/01/2012 1 yorum

Wordlist için, programın çalıştığı klasörde sifreler.txt dosyası oluşturun
Daha fazlasını oku…

VB6 String fonksiyonları

02/12/2011 Yorum bırakın

Len fonksiyonu:

Girilen değerin uzunluğunu verir

Kullanımı:

Msgbox Len("tdsoftware") 'Dönen veri 10 olacaktır

 

 

Mid fonksiyonu:

Girilen değerin, istenilen kısmını ayıklamanızı sağlar

Kullanımı:

Msgbox Mid$("tdsoftware",1,2) 'Sonuç 'td' olacaktır, 1. karakterden 2. karaktere kadar al demektir

 

Left fonkisyonu:

Girilen değerin sol tarafını alır

Kullanımı:

msgbox Left$("tdsoftware",2) 'Sonuç 'td', girilenin sol tarafındaki 2 karakteri alır

 

Right fonkisyonu:

Girilen değerin sağ tarafını alır

Kullanımı:

msgbox Right$("tdsoftware",8) 'Sonuç 'software',sağ taraftaki 8 karakteri alır

 

Ucase fonksiyonu:

Girilen değerin tüm harflerini büyük yapar

Kullanımı:

msgbox ucase$("tdsoftware") ' Sonuç 'TDSOFTWARE'

 

Lcase fonkisyonu:

Girilen değerin tüm harflerini küçük yapar

Kullanımı:

msgbox lcase$("TDSoftware") ' Sonuç 'tdsoftware'

 

InStr fonksiyonu:

Girilen değerde karakter kontrolü yapar

Kullanımı:

MsgBox InStr("tdsoftware", "x") 'Dönen veri 0, yani x karakteri yok
MsgBox InStr("tdsoftware", "s") 'Dönen veri 3, çünkü 3. karakterimiz s
MsgBox InStr(4, "tdsoftware", "s") 'Dönen veri 0, çünkü 4. karakterden itibaren kontrole başlar
MsgBox InStr("tdsoftware", "S") 'Dönen veri 0, büyük-küçük harf algılamadı
MsgBox InStr("tdsoftware", "S", 1) 'Dönen veri 0, büyük-küçük harf algıladı
MsgBox InStr(1, "tdsoftware", "S", 1) 'Dönen veri 3, büyük-küçük algılamadı

String Fonksiyonu:
Girilen değeri istenilen kadar tekrarlar
Kullanmı:
MsgBox String$(3, "t") 'Dönen veri 'ttt'
MsgBox String$(3, 13) 'Dönen veri 3 tane enter, 13 ün asciideki karşılığı enter tuşudur

Space fonksiyonu:
Belirttiğiniz kadar boşluk koymanızı sağlar
Kullanımı:
MsgBox "TD" & Space$(1) & "Software" ' Dönen veri 'TD Software'

Replace fonksiyonu:

Girilen değeri değiştirmenizi sağlar

Kullanımı:

MsgBox Replace$("tdsoftware", "tds", "TD S") 'Sonuna 1 veya 0 koyarsanız büyük-küçük harf algılama değerini değiştirir

 

StrReverse fonksiyonu:

Girilen değeri tersten verir

Kullanımı:

MsgBox StrReverse$("xc.rt.erawtfoSDT") 'Dönen veri TDSoftware.tr.cx

 

Trim Fonksiyonu

Boşlukları siler

Kullanımı:

Girilen değerdeki tüm boşlukları siler

Msgbox Trim$(" TD Software ") 'Dönen veri 'TDSoftware'

 

Ltrim fonksiyonu:

En sol tarafta boşluk varsa siler

Kullanımı:

MsgBox LTrim$(" TD Software") 'Dönen veri 'TD Software'

 

Rtrim fonksiyonu:

En sağ tarafta boşluk varsa siler

Kullanımı:

MsgBox LTrim$("TD Software ") 'Dönen veri 'TD Software'

 

Asc fonksiyonu:

Girilen değeri ascii numarasına çevirir

MsgBox Asc("T") & "," & Asc("D") ' Dönen veri 84,68

 

Chr fonksiyonu:

Girilen ascii değerini, karaktere çevrir

Kullanılımı:

Msgbox chr("84") & "," & chr("68") 'Dönen veri T,D

Visual Basic 6 ile verileri şifrelemek

24/12/2010 Yorum bırakın

Visual Basic 6 ile işçi kayıt programı

24/12/2010 1 yorum

Fabrikadakı işçi kaydı yapan program 4 tan elabel 1.labela işçi yaka no 2 . labela adı 3.labela soyadı ve 4. labela çalıstıgı brim yazın daha sonra bu labelların karsısına label1 e text1 label 2 ye text2 label 3 e text 3 label 4 e text dört gelecek biçimde ayarlayınız sonra 4 tane buton ekleyin forma 1 butonakaydet 2. butona ara 3. butonatemizle 4. butonaçıkıs yazın sonra formun altına4 tane list ekleyin ayrı ayrı 1 listin adı işçi yaka no  2. list adı ad 3. list adı soyad 4. list adı çalıstıgı brim olsun

en başa bunları ekleyınız……
Daha fazlasını oku…