Bajardi Abdulaxatov Diyorbek Guruh

Public Class Form1
Xususiy sub Form1_Load (_
ByVal jo'natuvchisi System.Object sifatida, _
ByVal e As System.EventArgs) _
MyBase.Loadni qo'llar
Class1 = New Class1 sifatida myNewClass ni yo`q
myNewClass.ClassSub ()
End Fevral
End Class

(Sinf inisati ta'kidlangan.)

Haqiqiy sinfning o'zi, bu holda ...

Public Class Class1
Sub ClassSub ()
MsgBox ("Bu sinf")
End Fevral
End Class

... o'zi tomonidan faylda yoki Form1 kodi bilan bir xil faylning bir qismidir. Dastur xuddi shu tarzda ishlaydi. ( Form1 ham bir sinf ekanligini e'tiborga oling.)

Bundan tashqari, modulga o'xshash tarzda ishlaydigan sinf kodi ham yozilishi mumkin. Bunga Shared sinf deyiladi. VB.NET da "Statik" (ya'ni, "Birgalikda") maqolasi Dinamik turlari bilan solishtirganda buni batafsilroq tushuntiradi.

Sinflar haqida yana bir haqiqatni ham yodda tutish kerak. Sinfning a'zolari (funktsiyalari va usullari) faqat sinf misoli mavjud. Buning nomini saralash . Boshqacha aytganda, bir sinfning misollari cheklangan. Yuqoridagi kodni ushbu nuqtani quyidagi tarzda ko'rsatish uchun o'zgartirish mumkin:

Public Class Form1
Xususiy sub Form1_Load (_
ByVal jo'natuvchisi System.Object sifatida, _
ByVal e As System.EventArgs) _
MyBase.Loadni qo'llar
Class1 = New Class1 sifatida myNewClass ni yo`q
myNewClass.ClassSub ()
myNewClass = Hech narsa
myNewClass.ClassSub ()
End Fevral
End Class

Ikkinchi myNewClass.ClassSub () iborasi bajarilganda, ClassSub a'zosi yo'qligi sababli, NullReferenceException xatosi tashlanadi.

ad