[ vb ] /
Makaleler-Article(s)
vb ile ilgili toplam 3 makale bulundu ! (A total of 3 article(s) about vb was(were) found in all of articles!)
| Article |
|---|
MySql Veritabanındaki Tabloları Kullanarak TreeView da Parent, Child TreeNode lar Oluşturmak
Merhaba arkadaşlar bu makalemizde TreeView da açılabilen parent, child node lar oluşturacağız. Oluşturacağımız parent ve child Treenode ların bilgilerini Mysql veritabanımızdaki tablolardan alacağız. | VB 6 ve VB.NET Arasındaki Önemli Söz Dizim Farklılıklar
VB 6 ve VB.NET Arasındaki Önemli Söz Dizim Farklılıklar
VB 6 ile VB .NET arasında birçok fark vardır. Bazı yönlerden en önemli farklar,söz dizimi ya da dile ilgili değil kavramsaldır. Tablo değişen progam öğelerinin çoğunu ve VB .NET te bunların yerine geçenlerin (eğer varsa) bir listesini vermektedir.
VB 6 Programlama Öğesi...................................VB .NET Eşdeğeri
Abs fonksiyonu............................................Abs metodu
AscB fonksiyonu..........................................Asc fonksiyonu
As Any anahtar kelime cümlesi.....................Option Strict özelliğini devre dışı bırakın ya da fonksiyonların aşırı yüklenmesini kullananın
Atn fonksiyonu............................................Atan metodu
Calendar özelliği.........................................CurrentCulture özelliği
ChDir ifadesi..............................................ChDir fonksiyonu
ChDrive ifadesi...........................................ChDrive fonksiyonu
Chr$ ve ChrB fonksiyonları..........................Chr fonksiyonu
Close ifadesi..............................................FileClose fonksiyonu
Cos fonksiyonu..........................................Cos metodu
Currency veri tipi.......................................Decimal veri tipi
CVDate fonksiyonu.....................................DateValue fonksiyonu
CVError fnsiyonu.......................................Error ifadesi
Date fonksiyonu ve Date ifadesi..................Now ve Today özelikleri
Date$ fonksiyonu.......................................DateString özelliği
Debug.Assert metodu.................................Assert ve Fail metotları
Debug.Print metodu...................................Write,WriteIf,WriteLine ve WriteLineIf metotları
Deftype ifadeleri........................................VB .NET içinde desteklenmez
DeleteSetting ifadesi..................................DeleteSetting fonksiyonu
DoEvents fonksiyonu..................................DoEvents metodu
Empty anahtar kelimesi..............................Nothing anahtar kelimesi
Eqv operatörü............................................= operatörü
Exp fonksiyonu...........................................Exp metodu
FileCopy ifadesi..........................................FileCopy fonksiyonu
Get ifadesi ................................................FileGet fonksiyonu
GoSub ifadesi............................................VB .NET içinde desteklenmez
Initialize olayı............................................Sub New ifadesi
Imp operatörü...........................................Boolean mantıkta, X = A Imp B ifadesi, sadece A True ve B False ise True döndürür;bu VB .NET te X = ( Not A ) or şeklinde yazılır
Input# ve Input$ ifadeleri;.........................Input fonksiyonu
Input$, InputB ve InputB$ fonksiyonları Instancing özelliği.....VB 6 da, bir sınıfın Instancing özelliğine GlobalMultiUse verebilirdiniz;VB .NET ile, aynı işlem için statik metotlar kullanılır
InStrB fonksiyonu.......................................Instr fonksiyonu
IsEmpty fonksiyonu.....................................IsNothing fonksiyonu
IsMissing fonksiyonu ...................................VB .NET içinde desteklenmez;isteğe bağlı tüm argümanların varsayılan değerleri olmalıdır;dolayısıyla""eksik"" olmaları mümkün değildir.
IsNull fonksiyonu.........................................IsDbNull fonksiyonu
IsObject fonksiyonu.....................................IsReference fonksiyonu
Kill ifadesi Kill fonksiyonu
Lcase$ fonksiyonu.......................................LCase fonksiyonu
Left$, LeftB, ve LeftB$ fonksiyonları..............Left fonksiyonu
LenB fonsiyonu...........................................Len fonksiyonu
Let ve Set alma ifadeleri..............................VB .NET içinde gerek yoktur;yeni Set ifadesi VB 6 dakiyle ilgili değildir
Line Input# ifadesi......................................LineInput fonksiyonu
Lock ifadesi................................................Lock ve Unlock fonksiyonları
Log fonksiyonu...........................................Log metodu
LSet ve RSet ifadeleri LSet fonksiyonu, PadRight, ve PadLeft fonksiyonları
LTrim$ fonksiyonu......................................LTrim fonksiyonu
MidB ifadesi...............................................Mid ifadesi
MkDir ifadesi.............................................MkDir fonksiyonu
Name ifadesi.............................................Rename fonksiyonu
Now fonksiyonu.........................................Now özelliği
Nul anahtar kelimesi..................................Nothing anahtar kelimesi
Oct$ fonksiyonu........................................Oct fonksiyonu
On ... GoSub............................................VB .NET içinde desteklenmez;Select Case ifadesini kullanın
On ... GoTo yapısı.....................................VB .NET içinde desteklenmez;Select Case ifadesini kullanın
Open ifadesi.............................................FileOpen fonksiyonu
Option Base ifadesi....................................VB .NET içinde desteklenmez;tüm VB .NET dizleri sıfır tabanlıdır
Option Private Module ifadesi.....................VB .NET içinde desteklenemez;Module ifadesini kullanın
Prnt# ifardesi............................................Print ve PrintLine fonksiyonları
Property Get, Property Let, ve Property Set ifadeleri....................................................Property prosedürleri için VB .NET farklı bir söz dizimi vardır
Put ifadesi.................................................LinePut fonksiyonu
Reset ifadesi..............................................Reset fonksiyonu
Right$ ve RihghtB fonksiyonları...................Right fonksiyonu
RmDir ifadesi.............................................RmDir fonksiyonu
Round fonksiyonu.......................................Round metodu
RSet ve LSet ifadeleri.................................RSet fonksiyonu
RTrim$ fonksiyonu.....................................RTrim fonksiyonu
SaveSettng ifadesi.....................................SaveSetting fonksiyonu
Scale metodu............................................VB .NET içinde desteklenmez (VB .NET twip kullanmaz;her şey piksel cinsindedir)
Set ve Let atama ifadeleri..........................VB .NET içinde gerek yoktur;yeni Set ifadesi VB6 dakiyle ilgili eğildir
SetAttr ifadesi...........................................SetAttr fonksiyonu
Sgn fonksiyonu.........................................Sign fonksiyonu
Sin fonksiyonu..........................................Sin metodu
Sqr fonksiyonu..........................................Sqrt fonksiyonu
String fonksiyonu......................................String yapılandırıcısı
String($) fonksiyonları...............................VB .NET içinde gerek yoktur
Terminate olayı.........................................VB .NET iinde desteklenmez;Su Dispose ve Sub Finalize ifadelerini kulanın
Time fonksiyonu ve Time ifadesi................TimeOfDay özelliği;DateTime yapısına ve Date veri tipine bakın
Time$ fonksiyonu.....................................TimeString özelliği
Timer fonksiyonu.....................................Timer özelliği
Trim$ fonksiyonu.....................................LTrim,Rtrim, ve Trim fonksiyonları
Type ifadesi.............................................Structure ifadesi
UCase$ fonksiyonu...................................UCase fonksiyonu
Unlock ifadesi...........................................Lock ve Unlock fonksiyonları
Variant veri tipi........................................Object veri tipi
Wend anahtar ifadesi................................While...End While ifadeleri ve End ifadesi
Width# ifadesi..........................................FileWidth fonksiyonu
Write# ifadesi..........................................Write ve WriteLine fonksiyonları" | VB Net te Access VB Net te Access Veritabanına Bağlantı
Verilerimiz kayıt ederken DataAdaptet nesnesinin Update methodunu kullanacağız.
Ado.net içerisinde verilerimizi bir veri kaynağından çekerken DataAdapter nesnesini sıkça kullanmaktayız. DataAdapter nesnesin SelectCommand nesnesine gerekli sql komutlarını bildirerek Istediğimiz verileri veritabanından çekebiliriz.
İlk önce makalenin altında görebileceğiniz Şekil 1 deki gibi Access Veritabanını oluşturun. Bu örnekte Veritabanına Db1 ismi verildi. Tablonun ismi Musteri. Yine örnekte Veritabanın Bulunduğu Path C:\Db1.
Access Veritabanı oluşturduktan sonra Şimdi sıra geldi Şekil 2 deki formumuzu oluşturmaya. Toolbox tan Labelleri, ComboBoxları, TextBoxları, DataGridView nesnelerini formunuza ekleyin.
Bu örnekte kolaylık olması açısından Nesnelerin Name leri cmb1,v1,...
yapıldı.
Örnekte veritabany bağlantısı birkaç yordam da bulunmaktadır. Bunun sebebi formumuz yüklenirken veya Veritabanından
kayıt silerken güncel şekilde ekrandan görmektir. İsterseniz bu kısımdaki
bağlantıları kaldırabilirsiniz...
Forma yazılacak kodlar:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim baglan As OleDb.OleDbConnection = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Db1.mdb;")
‘Veritabanı konumu belirtildi.
Dim adp As New OleDb.OleDbDataAdapter()
‘Yeni bir OledbDataDapter nesnesi oluşturuldu
‘ DataAdapter nesnesiyle verilerin çekilmesi için gerekli komutlar
adp.SelectCommand = New OleDb.OleDbCommand("Select * From Musteri", baglan)
Dim CB As OleDb.OleDbCommandBuilder = New OleDb.OleDbCommandBuilder(adp)
baglan.Open() ‘Bağlantımızı açıyoruz
Dim ds1 As New DataSet() ‘Verilerimizi çekeçeğimiz dataset oluşturuldu.
adp.Fill(ds1) ‘ Verilerimizi Fill metodu ile oluşturduğumuz Datasetimize aktarıyoruz
Dim rw1 As DataRow
rw1 = ds1.Tables(0).NewRow
‘Datasetimiz için yeni bir satır tanımlıyoruz
Dim x1 As Integer
x1 = ds1.Tables(0).Rows.Count ‘Veritabanımızdaki kayıt sayısı
Dim s1, s2, s3 As String
s1 = cmb2.Text + cmb3.Text + v8.Text
s2 = cmb4.Text + cmb5.Text + v22.Text + "" + cmb6.Text + cmb7.Text
s3 = cmb8.Text + cmb9.Text + v22.Text + "" + cmb10.Text + cmb11.Text
rw1.Item("TCKimlikNo") = v2.Text
rw1.Item("Adi") = v3.Text
rw1.Item("Soyadi") = v4.Text
rw1.Item("BabaAdi") = v5.Text
rw1.Item("AnaAdi") = v6.Text
rw1.Item("DogumYeri") = v7.Text
rw1.Item("DogumTarihi") = s1.ToString
rw1.Item("Uyrugu") = v9.Text
rw1.Item("KimlikBelgesiTuru") = v11.Text
rw1.Item("KimlikSeriNo") = v12.Text
rw1.Item("NufusaKayitliOlduguIl") = v13.Text
rw1.Item("NufusaKayitliOlduguIlce") = v14.Text
rw1.Item("NufusaKayitliOlduguMahalle") = v15.Text
rw1.Item("NufusCilt") = v14.Text
rw1.Item("NufusAileSiraNo") = v17.Text
rw1.Item("NufusSiraNo") = v25.Text
rw1.Item("Cinsiyet") = v20.Text
rw1.Item("MedeniHali") = v21.Text
rw1.Item("Isi") = v18.Text
rw1.Item("IkametAdresi") = v24.Text
rw1.Item("GelisTarihi") = s2.ToString
rw1.Item("AyrilisTarihi") = s3.ToString
rw1.Item("VerilenOdaNo") = cmb1.Text
rw1.Item("AracPlakaNo") = v19.Text
rw1.Item("TelefonNo") = v26.Text
ds1.Tables(0).Rows.InsertAt(rw1, x1 + 1)
adp.Update(ds1)
DataGridView1.DataSource = ds1.Tables(0)
baglan.Close() ‘Veritabanı bağlantımızı kapatıyoruz.
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
With Me
.Text = "Access Veritabanı Kayıt...Bahadirsa"
.MaximizeBox = False
.Size = New System.Drawing.Size(619, 575)
.Location = New Point(140, 0)
End With
Dim baglan As OleDb.OleDbConnection = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Db1.mdb;")
Dim adp As New OleDb.OleDbDataAdapter()
adp.SelectCommand = New OleDb.OleDbCommand("Select * From Musteri", baglan)
Dim CB As OleDb.OleDbCommandBuilder = New OleDb.OleDbCommandBuilder(adp)
baglan.Open()
Dim ds1 As New DataSet()
adp.Fill(ds1)
Dim rw1 As DataRow
rw1 = ds1.Tables(0).NewRow
DataGridView1.DataSource = ds1.Tables(0)
baglan.Close()
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
v2.Text = ""
v3.Text = ""
v4.Text = ""
v5.Text = ""
v6.Text = ""
v7.Text = ""
v8.Text = ""
v9.Text = ""
v11.Text = ""
v12.Text = ""
v13.Text = ""
v14.Text = ""
v15.Text = ""
v16.Text = ""
v17.Text = ""
v18.Text = ""
v19.Text = ""
v20.Text = ""
v21.Text = ""
v22.Text = ""
v23.Text = ""
v24.Text = ""
v25.Text = ""
v26.Text = ""
cmb1.Text = ""
cmb2.Text = ""
cmb3.Text = ""
cmb4.Text = ""
cmb5.Text = ""
cmb6.Text = ""
cmb7.Text = ""
cmb8.Text = ""
cmb9.Text = ""
cmb10.Text = ""
cmb11.Text = ""
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim baglan As OleDb.OleDbConnection = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Db1.mdb;")
Dim x As Integer = DataGridView1.CurrentRow.Index
‘Dim tcNo As String = DataGridView1.Item(x, 0).ToString
Dim cmd As New OleDb.OleDbCommand
cmd.Connection = baglan
cmd.CommandText = "Delete * From Musteri Where TCKimlikNo=‘" & v2.Text & "‘"
baglan.Close()
baglan.Open()
cmd.ExecuteNonQuery()
Dim adp As New OleDb.OleDbDataAdapter()
adp.SelectCommand = New OleDb.OleDbCommand("Select * From Musteri", baglan)
Dim CB As OleDb.OleDbCommandBuilder = New OleDb.OleDbCommandBuilder(adp)
Dim ds1 As New DataSet()
adp.Fill(ds1)
Dim rw1 As DataRow
rw1 = ds1.Tables(0).NewRow
DataGridView1.DataSource = ds1.Tables(0)
baglan.Close()
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
End
End Sub
End Class
‘-------------------------------------------------------------------------------------
‘Faydalı Olması dileğiyle...Bahadirsa
‘İleriki Makalelerimizde Veritabanı anlatımına, Sql bağlantılara devam edeceğiz...
‘Bizi takip etmeye devam edin.
‘Bilgi paylaşıldıkça güzeldir...Bahadirsa |
|