'VB.net de butonları XP yapmak icin'(form1 in ustundeki button1 icin)'oncelikle vb.net in drawing clasını import etmeliyiz,'bunun icin formun en ustune;Imports System.Drawing.Drawing2'bundan sonra windows form designer...
formunuza 1 adet tımer 1 adet progressbar koyun.progressbarın properties ayarından value yi 100 yapın.timerin interval özelliğini 1000 yapın.enabled özelliğinide ture yapın.1 adet label koyup içine...
Formlar unload edilsede bellekte halen yer kaplar demiştim yazdığım ipuçlarından birinde.Projenizdeki bütün formları bir anda yok etmek istediniz. tek tek unload form... mu diyeceksiniz. Aşağıdaki...
'Formunuzda txEmail adlı bir text box olsun. Bu text boxtan email adres'girişi yapılıyor. Bu kod hem küçük harfe çevirir hemde türkçe karakterleri halleder.Private Sub txEmail_change()txEmail...
TextBox Yada Label Ikisinden Birini Iki Tane OlusturFormLoad Bölümüne;Text1.date = True(Text1 Labelde Olabilir,Tarihi Gösterir)Text2.time = True(Text2 Labelde Olabilir,Saati Gösterir)
DDL komutlari Create, Drop, Alter komutlari ile baslar. ve obje tipi ve adi ile devam eder. bu komutlardan baska özel komutlarda mevcuttur. Örnegin bir kullanici...
Dim hWnd1 As LongPrivate Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As LongPrivate Declare Function SetWindowPos Lib...
Yeni Başlayanlara--------------------------------------------------------------------------------Programlama'ya Başlamak İsteyenlerMerhaba bu yazımda sizlere temel konulardan bahsetmek ve programlamaya yeni adım atacak arkadaşlar için yol gösterici olacak bir kaç fikirden söz etmek...
Bunu komutu kullanmayanınız yoktur herhalde. karşılaştırma komutudur kendileri. belirtilen şartı/şartların doğruluğunu,yanlışlığını,eşitliğini,eşitsizliğini,büyüklüğünü,küçüklüğünü vb. birçok karşılaştırma bu komutla yapılır. Genel olarak 2 türlü kullanımı vardır.1) IF (şart)...
'İ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 integerdim müsteritutar...
Dim a As StringPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickDim d() As String, i, f, j, g, ff, gg As...
Private Function TelFormat(TelNo As String) As StringIf Len(Trim(TelNo)) <= 7 Then TelFormat = ""'7725410 -> 772 54 10If Len(Trim(TelNo)) = 7 Then _TelFormat = Mid(TelNo,...
İlk önce böyle bir form oluşturalım2 label2 text11 commandekleyin ve kendinize göre forma yerleştirinPrivate Sub Command1_Click()Select Case Text1.Text 'Bu kısımda kullanıcı adı kısmını tanıtıyoruzCase Is...
bu api'yi kullanmak için önce api çağrısını yapmalıyız.general declaration bölümüne api çağrımızı yazıyoruz.ancak siz bu apiyi tek bir satırda yazın ve..................................................option explicitPrivate Declare Sub Sleep...
Private Declare Function GetTickCount_ Lib "kernel32" () As LongPrivate Sub Timer1_Timer()Dim tt = GetTickCount&Caption = (t 1440000) & ":"t = t Mod (60000 *...