【例題】類型定義

  勇芳 2017-3-31 5084

''
'' 類型別名:
''

	type myint as integer

	dim a as myint = 5
	print a

''
'' 特別適用于長類型(避免所有類型):
''
	type MyProcPtr as function( byval as integer, byval as integer ) as integer

	dim p1 as MyProcPtr
	dim p2 as MyProcPtr
	dim p3 as MyProcPtr
	dim p4 as MyProcPtr

''
'' 提前聲明:
''
	'' 聲明 MyType 為尚未執行的類型 
	type MyType as RealMyType

	'' 向前聲明的類型可以使用指針和引用
	type FooBar
		as MyType ptr p
	end type
	dim as MyType ptr p
	declare sub foo( byref x as MyType )

	'' 這里的執行
	type RealMyType
		as integer a, b
	end type

''
'' 聲明類型的行為:
'' (即void類型,只是一種類型的名字,不是真正的“執行”)
''
	type MyAny1 as any
	type MyAny2 as MyAny2


因國家互聯網安全管理要求,關閉回帖功能。大家需要留言,請使用【勇芳軟件客服】即時聯系勇芳點此打開->>勇芳軟件客服
返回
聯系勇芳
一个人看的www视频播放中文_2012中文字幕电影_亚洲国产成人高清在线观看_中文字幕天堂最新版在线网