回答編集履歴

1 syuusei

jawa

jawa score 2975

2017/01/31 13:07  投稿

もう少し具体的な例などあるとアドバイスしやすいです。
例えば
```
Dim d As Date
d = Now
```
のNowのように、変数のようにも見えなくはないけど実は引数のない命令文というようなものもあります。
またClassオブジェクトのように独自の名称で作成でき、独自のプロパティや関数を提供するものもあります。
例:clsShohinクラス
例:自作の商品クラス
```
'クラスモジュール本体(クラス名:clsShohin)
Public Name As String
Public Value As Double
Const Tax As Double = 0.08
Public Function GetInfo() As String
   Dim strInfo As String
   strInfo = ""
   strInfo = strInfo & "【商 品 名】" & Name & vbCr
   strInfo = strInfo & "【税抜価格】" & CStr(Value) & "円" & vbCr
   strInfo = strInfo & "【税込価格】" & CStr(Value + (Value * Tax)) & "円"
   '戻り値に設定
   GetInfo = strInfo
End Function
```
クラスモジュールの呼び出し
商品クラスの呼び出し
```
Sub test()
   Dim sho As New clsShohin
   sho.Name = "りんご"    'クラスモジュールのメンバ変数に値を設定
   sho.Value = 100
   
   Dim strMsg As String
   strMsg = sho.GetInfo   'クラスモジュールの関数を呼び出して結果を取得
   
   MsgBox strMsg
End Sub
```
---
的を得ない回答かもしれませんが、質問されているものはこういったものでしょうか?

思考するエンジニアのためのQ&Aサイト「teratail」について詳しく知る