'宣言 Public Sub setHours( _ ByVal hour As Double _ )
'宣言
Public Sub setHours( _ ByVal hour As Double _ )
public void setHours( double hour )
Date クラス Date メンバ