關於 Deftype 陳述式 (VB6)

關於 Deftype 陳述式 (VB6)

Deftype 陳述式 簡介

語法

DefBool letterrange[, letterrange] . . .
DefByte letterrange[, letterrange] . . .
DefInt letterrange[, letterrange] . . .
DefLng letterrange[, letterrange] . . .
DefCur letterrange[, letterrange] . . .
DefSng letterrange[, letterrange] . . .
DefDbl letterrange[, letterrange] . . .
DefDec letterrange[, letterrange] . . .
DefDate letterrange[, letterrange] . . .
DefStr letterrange[, letterrange] . . .
DefObj letterrange[, letterrange] . . .
DefVar letterrange[, letterrange] . . .

letterrange 是必要的引數,且有下列語法:
letter1[-letter2]
letter1 和 letter2 引數指定要預設資料型態的名稱範圍。

每個引數表示變數、引數、Function 程序或 Property Get 程序名稱的第一個字母,
可為字母表上的任何字母。letterrange 裏字母的大小寫是沒有差別。

請注意陳述式的名稱決定資料型態:

陳述式

資料型態

DefBool

Boolean

DefByte

Byte

DefInt

Integer

DefLng

Long

DefCur

Currency

DefSng

Single

DefDbl

Double

DefDec

Decimal (目前尚未支援)

DefDate

Date

DefStr

String

DefObj

Object

DefVar

Variant

範例如下:
DefINT A-C
' Def 為定義 , INT 為整數 , A-C 表示變數名稱為 A 到 C 開頭的變數為 Interger 型態

DefStr D-F
' Def 為定義 , STR 為字串 , D-F 表示變數名稱為 D 到 F 開頭的變數為 String 型態

Dim A123
Dim F456
則 A123 的型態為 Interger 囉 !
F456 則為 String 的型態 嚕 !

依此類推 .. ^_^