Section courante

A propos

Section administrative du site

CTYPE

Castre le type
VB .NET (Visual Basic .NET)

Syntaxe

Function CType(expression As Object, typename)

Paramètres

Nom Description
expression Ce paramètre permet d'indiquer l'expression à convertir
typename Ce paramètre permet d'indiquer le type de données de castre à utilisé :
Types de données Description
Date Ce type de données permet d'indiquer une valeur de date
Decimal Ce type de données permet d'indiquer une valeur décimal
Double Ce type de données permet d'indiquer une valeur réel de double précision
Integer Ce type de données permet d'indiquer une valeur entière
Long Ce type de données permet d'indiquer une valeur entière longue
Single Ce type de données permet d'indiquer une valeur réel de simple précision
String Ce type de données permet d'indiquer une valeur de chaîne de caractères
... ...

Description

Cette fonction permet de transformer une valeur sous un type de données spécifié.

Remarques

Exemple

Voici des exemples de l'utilisation de cette fonction :

  1. Module Module1
  2.  
  3.     Sub Main()
  4.         Console.WriteLine("CType(2000-01-01, Date) = " & CType("2000-01-01", Date))
  5.         Console.WriteLine("CType(08-01-01, Date) = " & CType("08-01-01", Date))
  6.         Console.WriteLine("CType(74-01-01, Date) = " & CType("74-01-01", Date))
  7.         Console.WriteLine("CType(02-02-2001, Date) = " & CType("02-02-2001", Date))
  8.  
  9.         Console.WriteLine("CType(2010, String) = " & CType(2010, String))
  10.         Console.WriteLine("CType(ABC, String) = " & CType("ABC", String))
  11.         Console.WriteLine("CType(#01-01-2000#, String)= " & CType(#1/1/2000#, String))
  12.  
  13.         Console.WriteLine("CType(0, Decimal) = " & CType("0", Decimal))
  14.         Console.WriteLine("CType(1.2, Decimal) = " & CType(1.2, Decimal))
  15.         Console.WriteLine("CType(2.55, Decimal) = " & CType(2.55, Decimal))
  16.  
  17.         Console.WriteLine("CType(1, Integer)=" & CType(1, Integer) & ", CType(1, Long)=" & CType(1, Long))
  18.         Console.WriteLine("CType(1.1, Integer)=" & CType(1.1, Integer) & ", CType(1.1, Long)=" & CType(1.1, Long))
  19.         Console.WriteLine("CType(1.7, Integer)=" & CType(1.7, Integer) & ", CType(1.7, Long)=" & CType(1.7, Long))
  20.         Console.WriteLine("CType(-1, Integer)=" & CType(-1, Integer) & ", CType(-1, Long)=" & CType(-1, Long))
  21.         Console.WriteLine("CType(-1.1, Integer)=" & CType(-1.1, Integer) & ", CType(-1.1, Long)=" & CType(-1.1, Long))
  22.         Console.WriteLine("CType(-1.7, Integer)=" & CType(-1.7, Integer) & ", CType(-1.7, Long)=" & CType(-1.7, Long))
  23.         Console.WriteLine("CType(30.2, Integer)=" & CType(30.2, Integer) & ", CType(30.2, Long)=" & CType(30.2, Long))
  24.         Console.WriteLine("CType(-35.4, Integer)=" & CType(-35.4, Integer) & ", CType(-35.4, Long)=" & CType(-35.4, Long))
  25.  
  26.         Console.WriteLine("CType(1, Single)=" & CType(1, Single) & ", CType(1, Double)=" & CType(1, Double))
  27.         Console.WriteLine("CType(1.1, Single)=" & CType(1.1, Single) & ", CType(1.1, Double)=" & CType(1.1, Double))
  28.         Console.WriteLine("CType(1.7, Single)=" & CType(1.7, Single) & ", CType(1.7, Double)=" & CType(1.7, Double))
  29.         Console.WriteLine("CType(-1, Single)=" & CType(-1, Single) & ", CType(-1, Double)=" & CType(-1, Double))
  30.         Console.WriteLine("CType(-1.1, Single)=" & CType(-1.1, Single) & ",CType(-1.1, Double)=" & CType(-1.1, Double))
  31.         Console.WriteLine("CType(-1.7, Single)=" & CType(-1.7, Single) & ", CType(-1.7, Double)=" & CType(-1.7, Double))
  32.         Console.WriteLine("CType(30.2, Single)=" & CType(30.2, Single) & ", CType(30.2, Double)=" & CType(30.2, Double))
  33.         Console.WriteLine("CType(-35.4, Single)=" & CType(-35.4, Single) & ", CType(-35.4, Double)=" & CType(-35.4, Double))
  34.         Console.WriteLine("CType(-35.4, Single)=" & CType(-35.4, Single) & ", CType(-35.4, Double)=" & CType(-35.4, Double))
  35.         Console.WriteLine("CType(1.31E+15, Single)=" & CType(1.31E+15, Single) & ", CType(1.31E+15, Double)=" & CType(1.31E+15, Double))
  36.     End Sub
  37.  
  38. End Module

on obtiendra le résultat suivant :

CType(2000-01-01, Date) = 2000-01-01
CType(08-01-01, Date) = 2008-01-01
CType(74-01-01, Date) = 1974-01-01
CType(02-02-2001, Date) = 2001-02-02
CType(2010, String) = 2010
CType(ABC, String) = ABC
CType(#01-01-2000#, String)= 2000-01-01
CType(0, Decimal) = 0
CType(1.2, Decimal) = 1,2
CType(2.55, Decimal) = 2,55
CType(1, Integer)=1, CType(1, Long)=1
CType(1.1, Integer)=1, CType(1.1, Long)=1
CType(1.7, Integer)=2, CType(1.7, Long)=2
CType(-1, Integer)=-1, CType(-1, Long)=-1
CType(-1.1, Integer)=-1, CType(-1.1, Long)=-1
CType(-1.7, Integer)=-2, CType(-1.7, Long)=-2
CType(30.2, Integer)=30, CType(30.2, Long)=30
CType(-35.4, Integer)=-35, CType(-35.4, Long)=-35
CType(1, Single)=1, CType(1, Double)=1
CType(1.1, Single)=1,1, CType(1.1, Double)=1,1
CType(1.7, Single)=1,7, CType(1.7, Double)=1,7
CType(-1, Single)=-1, CType(-1, Double)=-1
CType(-1.1, Single)=-1,1,CType(-1.1, Double)=-1,1
CType(-1.7, Single)=-1,7, CType(-1.7, Double)=-1,7
CType(30.2, Single)=30,2, CType(30.2, Double)=30,2
CType(-35.4, Single)=-35,4, CType(-35.4, Double)=-35,4
CType(-35.4, Single)=-35,4, CType(-35.4, Double)=-35,4
CType(1.31E+15, Single)=1,31E+15, CType(1.31E+15, Double)=1,31E+15


Dernière mise à jour : Dimanche, le 9 novembre 2014