2011年11月29日火曜日

[ExcelVBA] CBool関数,CByte関数,CCur関数,CDate関数,CDbl関数,CDec関数,CInt関数,CLng関数,CSng関数,CVar関数,CStr関数


■構文
関数戻り値の型
CBool(Expression)Boolean型
CByte(Expression)Byte型
CCur(Expression)Currency型
CDate(Expression)Date型
CDbl(Expression)Double型
CDec(Expression)Decimal型
CInt(Expression)Integer型
CLng(Expression)Long型
CSng(Expression)Single型
CVar(Expression)Variant型
CStr(Expression)String型

■説明
各型に変換する。

■サンプルコード
  1. Option Explicit  
  2.   
  3. Sub SampleCode()  
  4.     Dim Str As String  
  5.     Str = "123"  
  6.     Debug.Print Str + Str             '123123:文字列の連結  
  7.     Debug.Print CInt(Str) + CInt(Str) '246:数字に変換しているので数字の足し算  
  8.     Debug.Print TypeName(Str)         'String:CIntに通す前はもちろん文字列型  
  9.     Debug.Print TypeName(CInt(Str))   'Integer:CIntに通すと文字列はInt型  
  10. End Sub  

0 件のコメント: