Çok eski bir web tarayıcısı kullanıyorsunuz. Bu veya diğer siteleri görüntülemekte sorunlar yaşayabilirsiniz.. Tarayıcınızı güncellemeli veya alternatif bir tarayıcı kullanmalısınız.
'Visual Basic ile gelen kurulum programı yarrattığınız uygulamayı sabit diske 'kopyaladıktan sonra onun için Program Yöneticisinde bir grup yaratabilir.
'Kurulum programı VB ile yazıldığına göre biz de bunu basit bir DDE (Dynamic Data 'Exchange / Dinamik Veri Alışverişi) bağlantısı kurarak...
Private Declare Function ShowCursor& Lib "user32" (ByVal bshow As Long)
Private Sub Button1_Click()
ShowCursor (False)
End Sub
Private Sub Button2_Click()
ShowCursor (True)
End Sub
Private Sub Form_Load()
MsgBox "SADECE FORM ÜZERİNDE ÇALIŞIR", vbCritical + vbOKOnly, "DİKKAT"
End Sub...
Option base 1
Dim sayı(5) , s As String '5 adet sayı olsun
sayı(1)=10
sayı(2)=15
sayı(3)=1
sayı(4)=5
sayı(5)=8
" bu sayıları küçükten büyüğe sırama yapacagız
For y=1 To 5
For l=1 To 4
If sayı(l)>sayı(l+1) Then s=sayı(l):sayı(l)=sayı(l+1):sayı(l+1)=s
Next l,x
'bu şekilde sayılarımızı bir...
'Formumuza Bir timer1 koyunuz.
'Formumuzun GENERAL kısmına aşağıdaki kodları yapıştırınız.
Option Explicit
Private Sub DrawRotatedText(ByVal txt As String, _
ByVal X As Single, ByVal Y As Single, _
ByVal font_name As String, ByVal size As Long, _
ByVal weight As Long, ByVal...
ActiveX Kontrol nesneleri programların daha kolay yapılabilmesini, daha esnek olmasını ve daha işlevsel olmasını sağlar. Bu kontrol nesnelerinin özellikleri, metotları ve olayları kendi belirlediğimiz durumları karşılayacak şekilde tasarlandığı için programın bize özgü yapı taşları görevini...
:yoAlın Bu Kodu Cod Kısmına Yapıştırın ..!:yo
( Cod Bölümünde Herşey Silinik Olsun )
'forma bir tane "picturebox" ve 2 timer ekleyin bu arada boyutu 'siz ayarlayın..!
Private Sub Form_Load()
Timer1.Interval = 100
Timer2.Interval = 200
Picture1.Width = 1400
Picture1.Height = 900
Picture1.Top...