تعریف نوع داده ای جدید

[salar_blackdroid 408]

با سلام.

 

امیدوارم اولین آموزشم مفید واقع بشه.

 

خیلی وقتها نوع های داده ای مد نظر ماست که در زبان برنامه نویسی تعریف نشده و موجود نیست

 

و این نوع متغیرها باید توسط خود کاربر تعریف شوند.

 

مثلا ما در اینجا می خواهیم نوع داده ای دانشجو متشکل از نام و شماره دانشجویی اش را تعریف کنیم :

 

کد زیر رو در قسمت Globals می نویسیم :

Type Student(name As String,id As String)

حالا دیگه نحوه استفاده از این نوع داده ای بر عهده خودتونه !

 

مثلا من اینطوری استفاده کردم : تعریف 3 دانشجو با یک آرایه 3 تایی از نوع دانشجو و جستجوی شماره دانشجویی فردی

 

که اسمش Salar است :

Dim ar(3) As Student
	ar(0).name = "ali"
	ar(0).id = "11111"
	
	ar(1).name = "reza"
	ar(1).id = "22222"
	
	ar(2).name = "salar"
	ar(2).id = "3333333"
	
	For Each st As Student In ar
		If st.name = "salar" Then
			Msgbox(st.id,"")
		End If
	Next

خروجی :

 

 

امیدوارم آموزشم مثمر ثمر واقع بشه.

 

موفق باشید ./