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型

■説明
各型に変換する。

■サンプルコード
Option Explicit

Sub SampleCode()
    Dim Str As String
    Str = "123"
    Debug.Print Str + Str             '123123:文字列の連結
    Debug.Print CInt(Str) + CInt(Str) '246:数字に変換しているので数字の足し算
    Debug.Print TypeName(Str)         'String:CIntに通す前はもちろん文字列型
    Debug.Print TypeName(CInt(Str))   'Integer:CIntに通すと文字列はInt型
End Sub

0 件のコメント: