VİSUAL BASİC DERS NOTLARI

VİSUAL BASİC DERS NOTLARI

Bugün ki yazımızda size Visual Basic Ders Notlarından Sınıf oluşturmayı göreceğiz.

VİSUAL BASİC SINIF OLUŞTURMA

Nesne yönelimli programlama dilinin büyük yararı, kendi nesneleri oluşturabilmemizdir.

Biz çok basit bir sınıf oluştururken, şimdi nasıl gördüğümüzü ve daha sonra bir nesne haline edeceğiz.

Bizim yaratacağımız sınıf çok basittir ve o zaman bir nesne oluşturma, bir sınıf kurma temel tekniği göstermek için tasarlanmıştır.Yaratacağımız Sınıf büyük harfe bir posta kodu harflerini dönüştürür. Biz bir form üzerinde bir metin kutusu posta kodu alırsınız. Kapalı biz sonra gidin. 

• Yeni bir VB. NET proje başlatın
• Formunuza bir metin kutusu ekleyin ve Metinkutusu1, varsayılan Adı bırakın
• Ts1 4JH (bizim nesne dönüştürür çünkü harf, küçük ve üst olmadığından emin olun.) Için MetinÖzellik değiştirin
• Formunuza bir Butonu Ekle

Bir kez bir metin kutusu ile yeni bir form var ve üzerinde bir düğme, bir sınıf eklemeniz gerekir. Bu oldukça kolaydır. Sadece gibi bir modül ekleyerek . Aslında tam olarak aynı görünüyor!

• Yani VB menü çubuğundan, Proje tıklayın
• Menü açılır menüden, Add Class tıklayın
• Bu sürümü 2008 yılında iletişim kutusu alırsınız:

(Sürüm 2.012 aşağıdaki birinin daha az renkli versiyonu olacaktır) sürümü 2010 yılında, diyalog kutusu böyle görünüyor:

Sağdaki Sınıf Şablon zaten seçilmiş olur. Değiştirmek için gereken şey altındaki adı olduğunu.Varsayılan adı Class1.vb olduğunu. Bu korkunç açıklayıcı değil ve birkaç ay satır aşağı, bu sınıf ne yaptığını çalışan büyük sorun olacak.

Class1.vb gelen ConvertPostcode.vb için Ad değiştirin. Daha sonra Aç düğmesini tıklatın.

Sınıf için kod penceresi açıldığında, bu gibi görünecektir:

Gördüğünüz gibi, bakmak için büyük bir anlaşma değil! Elimizdeki tüm Public Class ... End Classkodu taslaktır. Bizim Sınıf adı da var. Ancak kod ayrı bir pencerede ve kendisine tüm bir sekme vardır.Bu yeniden ve bir nesne haline kod dolu bu sekme var.

Bizim posta kodu dönüştürür - Bizim şimdi yapmamız gereken iş yapan kod ekleyin. Ama biz sadece bu yazdık:

As String ConvertPostcode Dim
= StrConv (TextBox1.Text, VbStrConv.UpperCase) ConvertPostcode
ConvertPostcode TextBox1.Text =

Bu bizim Form Düğmemiz için iyi olacaktır. Ama bizim sınıf için tamam değil. Bir Sınıf tasarlarken, kodunuzu Fonksiyonlar ve Subs gibi şeyler içinde gitmek zorunda. Ayrıca nesneler için kendi özelliklerini nasıl oluşturulacağını göreceksiniz.

Bir işlev veya alt kurduğunuzda, gerçekte nesneler için Yöntemler (Bir Yöntem aslında bir eylem. Bizim durumumuzda bir posta kodu dönüştürür yapar bir şey, yok koddur.) Oluştururken Biz bir sonraki nasıl göreceksiniz .

Visual Basic Tarih ve Saat Fonksiyonlar

Visual Basic Tarih ve Saat FonksiyonlarBugün sizlere Visual Basic programında Tarih ve Saat Fonksiyonları'nı anlatacağım..

Visual Basic Tarih Fonksiyonu: 

Geçerli tarih ve / veya saat başvurmak için VB anahtar kelimeleri hatırlayalım:

Tarih Geçerli tarihi döndürür

Saat Geçerli zamanını döndürür

Aşağıdaki örneklerde, geçerli Tarih / Saat (Şimdi), 31 Ağustos 2001 Cuma varsayalım 09:15:20 de.

Aşağıdaki fonksiyonları bir Tarih / Saat değeri, sırasıyla, tarih bölümü ve saat bölümünü göreceğiz.

Fonksiyon	Tanımlama
DateValue	Saat bölümünün "sıfırlanmasını" ile, Tarih / Saat değerinden tarih kısmını verir.(Not: Bir tarih / saat değişkenin vb6 saat bölümü "sıfırlanmasını" demek, zaman 12:00 olarak yorumlanır.) Örnek: Tarihi Dim dtmTest dtmTest = DateValue (Şimdi) Bu noktada, dtmTest tarihinden kısmı 0 bir saat bölümü (12:00 AM,, 2001/08/31 olduğu gece yarısı).
TimeValue	Tarih bölümünün "sıfırlanmasını" ile, Tarih / Saat değeri kısmından zamanı verir. (Not: Bir tarih / saat değişken "sıfırlanmasını" demek, tarihin aslında 30 Aralık 1899 olarak yorumlanır.) Örnek: Tarihi Dim dtmTest dtmTest = TimeValue (Şimdi) Bu noktada, dtmTest saat bölümünü 0 (12/30/1899) bir tarih bölümü ile, 09:15:20 olduğunu.

Aşağıdaki fonksiyonları bir VB6 tarih belirli bir kısmını izole etmek için kullanılır:

Fonksiyon	Tanımlama
Iş günü	1 1 Pazar ve 7 Cumartesi olan belirli bir tarih haftanın gününü gösteren 7, bir sayı döndürür. Örnek: intDOW = Hafta içi (Şimdi) 'intDOW = 6 Not: Kod haftanın bir günü başvurmak için gerektiğinde, VB kodlanmış değerleri 1-7 yerine kullanılabilir sabitleri yerleşik bir dizi vardır: Sabit Değer vbSunday 1 vbMonday 2 vbTuesday 3 vbWednesday 4 vbThursday 5 vbFriday 6 vbSaturday 7

Fonksiyon	Tanımlama
WeekdayName	7 ile değeri 1 ile bir sayısal argüman verilen gün ismi ("Sunday" thru "Cumartesi") içeren bir dizeye döndürür. Örnek: strDOW = WeekdayName (6) 'strDOW = "Cuma" WeekdayName fonksiyonu hafta içi adını kısaltmak için olup olmadığını gösteren isteğe bağlı, ikinci argüman (Boolean) alır. Varsayılan olarak, ikinci argüman kısaltmak ve tam adı dönmeyen, yani False olan. Gerçek ise(True), gün ismi ilk üç harfi iade edilecektir: Örnek: strDOW = WeekdayName (6, Gerçek) 'strDOW = "Cum" Belirli bir tarih gün ismi almak için WeekdayName işlev içinde iç içe Hafta içi fonksiyonu olabilir: Örnek: strDOW = WeekdayName (Hafta içi (Şimdi)) 'strDOW = "Cuma"
Ay	Belirli bir tarihi ayı kısmı gösteren 1 ile 12 arasında bir sayı verir. Örnek: intMonth = Ay (Şimdi) 'intMonth = 8
MonthName	12 ile değeri 1 ile bir sayısal argüman verilen ay adı ("January" thru "Aralık"), içeren bir diziye döndürür. Örnek: strMoName = MonthName (8) 'strMoName = "Ağustos" MonthName fonksiyonu ay adını kısaltmak için olup olmadığını gösteren isteğe bağlı, ikinci argüman (Boolean) alır. Varsayılan olarak, ikinci argüman kısaltma ve tam adı dönmeyen, yani False. Gerçek ise, ayın adının ilk üç harfini iade edilecektir: Örnek: strMoName = MonthName (8, Gerçek) 'strMoName = "üzerine, Ağu" Sen MonthName işlev içinde Ay işlevi, belirli tarih ay adı almak için yuva yapabilirsin Örnek: strMoName = MonthName (Ay (Şimdi)) 'strMoName = "Ağustos"
Gün	Belirli bir tarihin gün kısmını gösteren 1 ile 31 arası bir sayı verir. Örnek: intDay = Gün (Şimdi) 'intDay = 31
Yıl	100, belirli bir tarih yıl kısmı gösteren 9999'a kadar bir sayı verir. Örnek: intYear = Yıl (Şimdi) 'intYear 2001 =

Aşağıdaki fonksiyonları bir zamanın belirli bir kısmını izole etmek için kullanılır:

Fonksiyon	Tanımlama
Saat	Günün saati temsil eden 0 ile 23 arasında bir tam sayı belirten bir tamsayı döndürür. Örnek: intHour = Saat (Şimdi) 'intHour = 21 (9 pm için)
Dakika	Saat dakika temsil eden 0 ile 59 arasında bir tam sayı belirten bir tamsayı döndürür. Örnek: intMinute = Dakika (Şimdi) 'intMinute = 15
Ikinci	Dakika, ikinci temsil eden 0 ile 59 arasında bir tam sayı belirten bir tamsayı döndürür. Örnek: intSecond = İkinci (Şimdi) 'intSecond = 20

Şimdiye kadar gösterilen tarih fonksiyonları göstermek için, bir "Deneyin" projesi kuralım ve cmdTryIt_Click olay aşağıdaki kodu yerleştirelim

Private Sub cmdTryIt_Click ()

Sekme (30),, Şimdi: "Şimdi" Yazdır

(Şimdi) DateValue; Tab (30),: "DateValue kullanma" Yazdır

(Şimdi) TimeValue; Tab (30),: "TimeValue kullanma" Yazdır

(Şimdi) Hafta içi; Tab (30),: "Hafta içi kullanma" Yazdır

(Hafta içi (Üye)) WeekdayName; Tab (30),: "WeekdayName kullanma" Yazdır

Sekme (30),, WeekdayName (Hafta içi (Şimdi), Gerçek): "kullanarak WeekdayName (abbrev.)" Yazdır

(Şimdi) Ay; Tab (30),: "Ay kullanma" Yazdır

(Ay (Üye)) MonthName; Tab (30),: "MonthName kullanma" Yazdır

Sekme (30),, MonthName (Ay (Şimdi), Gerçek): "(abbrev.) MonthName kullanma" Yazdır

(Şimdi) Gün; Tab (30),: "Gün kullanma" Yazdır

(Şimdi) Yıl; Tab (30),: "Yıl kullanma" Yazdır

"Saat Kullanımı:" Yazdır; Tab (30); Saat (Şimdi)

Sekme (30);; Dakika (Şimdi): "kullanarak Dakika" Yazdır

(30) Tab,, İkinci (Şimdi): "İkinci kullanma" Yazdır

End Sub

Projeyi çalıştırın ve "Deneyin" butonuna tıklayın. Çıktı aşağıdaki gibi olmalıdır:

DatePart İşlevi

Genel DatePart işlevi, belirli tarih / saat değerinin belirtilen parçası içeren bir tamsayı döndürür. Bu nedenle, hafta içi, Ay, Gün, Yıl, Saat, Dakika, ve İkinci fonksiyonların işlevselliğini içerir. Buna ek olarak, belirli bir tarihte (1 ile 4), "Julian" tarihi (1 366 için yılın gün) ve hafta numarası (53 ile 1) bir çeyrek elde etmek için kullanılabilir.

Sözdizimi:

DatePart (aralık, tarih [, haftanınilkgünü [, yılınilkhaftası]])

DatePart işlevi sözdizimi şu bölümlerden oluşur:

Bölüm	Tanımlama
aralık	Gerekli. İade etmek istediğiniz zaman aralığı olan dize ifadesi. Dize ifadesi aşağıdakilerden herhangi biri olabilir: Ifade Tanımlama Değerler olası aralığı "Yyyy" Yıl 100-9999 "Q" Çeyrek 1-4 "M" Ay 1-12 "Y" Yılın günü 1-366 (bir "Jülyen" tarih) "D" Gün 1-31 "W" Iş günü 1-7 "Ww" Hafta 1-53 "H" Saat 0-23 "N" Dakika 0 ila 59 "S" Ikinci 0 ila 59
tarih	Gerekli. Değerlendirmek istediğiniz bu değer.
haftanınilkgünü	İsteğe bağlı. Haftanın ilk günü belirten bir sabit. Belirtilmezse Pazar varsayılır.
yılınilkhaftası	İsteğe bağlı. Yılın ilk haftası belirten bir sabit. Belirtilmemiş ise, birinci hafta Ocak 1 oluştuğu hafta olduğu varsayılır.

DatePart göstermek için, bir "Deneyin" projesi kurun ve cmdTryIt_Click olayı için aşağıdaki kodu yerleştirin:

Private Sub cmdTryIt_Click ()

Yazdır "Güncel tarih / zaman:"; _

(Şimdi, "Uzun Tarih") $ biçimlendirin; _

SPC (1); _

(Şimdi, "Long Time") $ Format

Yazdır "*** DatePart işlev örnekleri ***"

"'Yyyy' kullanmak:" Baskı; Tab (20); DatePart (Şimdi "yyyy",)

"'Q' kullanmak:" Baskı; Tab (20), DatePart ("q", Şimdi)

"'M' kullanmak:" Baskı; Tab (20); DatePart (Şimdi "m",)

"'Y' kullanmak:" Baskı; Tab (20), DatePart ("y", Şimdi)

"'D' kullanarak:" Baskı; Tab (20), DatePart ("d", Şimdi)

"'W' kullanmak:" Baskı; Tab (20); DatePart (Şimdi "w",)

"'Ww' kullanmak:" Baskı; Tab (20), DatePart ("ww", Şimdi)

"'H' kullanarak:" Baskı; Tab (20), DatePart ("h", Şimdi)

"'N' kullanarak:" Baskı; Tab (20); DatePart (Şimdi "n",)

"'S' kullanarak:" Baskı; Tab (20), DatePart ("s", Şimdi)

End Sub

Projeyi çalıştırın ve "Deneyin" butonuna tıklayın. Çıktı aşağıdakine benzer görünmelidir:

Bir tarih veya saat Değeri Form ile Birlikte Ayrı Numaraları birleşiyor

Önceki örneklerde, bir tarih / saat değeri parçaları izole etmek için yollar gördüm.Eğer "başka bir yol" gitmek gerekirse? DateSerial ve TimeSerial: farklı değişkenleri bir tarih / saat değerinin ayrı parçalar ve bir tarih veya saat formüle onları bir araya istiyorsanız, bunu yapmak için kullanabileceğiniz iki işlevi vardır.

Yıl, ay ve gün sırasıyla: DateSerial üç sayısal argüman alır. Bu, bu değerlere dayalı bir tarihi verir. 

Örnek:

As Integer Dim intYear

As Integer Dim intMonth

As Integer Dim intDay

Tarihi Dim dtmNewDate

intYear 2001 =

intMonth = 9

intDay = 2

dtmNewDate = DateSerial (intYear, intMonth, intDay)

'2001/09/02 döner

Saat, dakika ve saniye sırasıyla: TimeSerial üç sayısal argüman alır. Bu, bu değerlere dayalı bir zaman verir.

Örnek:

As Integer Dim intHour

As Integer Dim intMinute

As Integer Dim intSecond

Tarihi Dim dtmNewTime

intHour = 11

intMinute = 34

intSecond = 44

dtmNewTime = TimeSerial (intHour, intMinute, intSecond)

'11:34:44 (AM) döner