TypeName Function; VarType Function

āĻ¸ā§āĻŸā§āĻ°āĻŋāĻ‚ (TypeName) āĻ…āĻĨāĻŦāĻž āĻ¸āĻ‚āĻ–ā§āĻ¯āĻžāĻ¸ā§‚āĻšāĻ• āĻŽāĻžāĻ¨ (VarType) āĻĒā§āĻ°āĻĻāĻžāĻ¨ āĻ•āĻ°ā§‡ āĻĨāĻžāĻ•ā§‡ āĻ¯āĻž āĻ­ā§‡āĻ°āĻŋā§Ÿā§‡āĻŦāĻ˛ā§‡āĻ° āĻœāĻ¨ā§āĻ¯ āĻ¤āĻĨā§āĻ¯ āĻ§āĻžāĻ°āĻŖ āĻ•āĻ°ā§‡ āĻĨāĻžāĻ•ā§‡āĨ¤

āĻ¸āĻŋāĻ¨āĻŸā§āĻ¯āĻžāĻ•ā§āĻ¸:


TypeName (Variable) / VarType (Variable)

āĻĒā§āĻ°āĻĻāĻžāĻ¨ āĻŽāĻžāĻ¨:

String; Intege

āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻŸāĻžāĻ°:

āĻ­ā§‡āĻ°āĻŋā§Ÿā§‡āĻŦāĻ˛:āĻ†āĻĒāĻ¨āĻŋ āĻ¯ā§‡ āĻ­ā§‡āĻ°āĻŋā§Ÿā§‡āĻŦāĻ˛ā§‡āĻ° āĻŸāĻžāĻ‡āĻĒ āĻœāĻžāĻ¨āĻ¤ā§‡ āĻšāĻžāĻ¨āĨ¤ āĻ†āĻĒāĻ¨āĻŋ āĻ¨āĻŋāĻšā§‡āĻ° āĻŽāĻžāĻ¨āĻ¸āĻŽā§‚āĻšāĻ“ āĻŦā§āĻ¯āĻŦāĻšāĻžāĻ° āĻ•āĻ°āĻ¤ā§‡ āĻĒāĻžāĻ°ā§‡āĻ¨:

āĻ•ā§€āĻ“ā§ŸāĻžāĻ°ā§āĻĄ

Named constant

VarType

āĻšāĻ˛āĻ• āĻŸāĻžāĻ‡āĻĒ

Boolean

11

āĻŦā§āĻ˛āĻŋāĻ¯āĻŧāĻžāĻ¨ āĻšāĻ˛āĻ•

Date

V_DATE

7

āĻ¤āĻžāĻ°āĻŋāĻ– āĻšāĻ˛āĻ•

Currency

V_CURRENCY

6

Currency variable

Double

V_DOUBLE

5

āĻĄāĻžāĻŦāĻ˛ āĻĻāĻļāĻŽāĻŋāĻ• āĻŦāĻŋāĻ¨ā§āĻĻā§ āĻšāĻ˛āĻ•

Integer

V_INTEGER

2

āĻ‡āĻ¨āĻŸāĻŋāĻœāĻžāĻ° āĻšāĻ˛āĻ•

Long

V_LONG

3

āĻĻā§€āĻ°ā§āĻ˜ āĻ‡āĻ¨āĻŸāĻŋāĻœāĻžāĻ° āĻšāĻ˛āĻ•

Object

9

āĻŦāĻ¸ā§āĻ¤ā§ āĻšāĻ˛āĻ•

Single

V_SINGLE

4

Single floating-point variable

String

V_STRING

8

āĻ¸ā§āĻŸā§āĻ°āĻŋāĻ‚ āĻšāĻ˛āĻ•

Variant

12

āĻ­ā§āĻ¯āĻžāĻ°āĻŋāĻ¯āĻŧā§‡āĻ¨ā§āĻŸ āĻšāĻ˛āĻ• (āĻŦāĻ°ā§āĻŖāĻ¨āĻžā§Ÿ āĻ‰āĻ˛ā§āĻ˛āĻŋāĻ–āĻŋāĻ¤ āĻ¸āĻŦ āĻŸāĻžāĻ‡āĻĒ āĻ§āĻžāĻ°āĻŖ āĻ•āĻ°āĻ¤ā§‡ āĻĒāĻžāĻ°ā§‡)

Empty

V_EMPTY

0

āĻ­ā§‡āĻ°āĻŋā§Ÿā§‡āĻŦāĻ˛ā§‡āĻ° āĻ•āĻžāĻœ āĻ†āĻ°āĻŽā§āĻ­ āĻ•āĻ°āĻž āĻšā§Ÿ āĻ¨āĻŋ

Null

V_NULL

1

āĻ•ā§‹āĻ¨ āĻ•āĻžāĻ°ā§āĻ¯āĻ•āĻ° āĻĄāĻžāĻŸāĻž āĻ¨ā§‡āĻ‡


Error codes:

5 Invalid procedure call

āĻ‰āĻĻāĻžāĻšāĻ°āĻŖ:


Sub ExampleType
Dim iVar As Integer
Dim sVar As String
Dim siVar As Single
Dim dVar As Double
Dim bVar As Boolean
Dim lVar As Long
Dim cVar as Currency
Dim tVar as Date
 MsgBox TypeName(iVar) & " " & VarType(iVar) & Chr(13) &_
 TypeName(sVar) & " " & VarType(sVar) & Chr(13) &_
 TypeName(siVar) & " " & VarType(siVar) & Chr(13) &_
 TypeName(dVar) & " " & VarType(dVar) & Chr(13) &_
 TypeName(bVar) & " " & VarType(bVar) & Chr(13) &_
 TypeName(cVar) & " " & VarType(cVar) & Chr(13) &_
 TypeName(tVar) & " " & VarType(tVar) & Chr(13) &_
 TypeName(lVar) & " " & VarType(lVar),0,"Some types in LibreOffice Basic"
End Sub

Please support us!