「仮_File」の編集履歴(バックアップ)一覧はこちら
「仮_File」(2013/06/08 (土) 23:42:29) の最新版変更点
追加された行は緑色になります。
削除された行は赤色になります。
***仮_TOOLBOX
- ソース
Private filename As String
Private filepath As String
Private Sub class_initialize()
filename = ""
filepath = ""
End Sub
Public Function GetFileName() As String
GetFileName = filename
End Function
Public Function GetFilePath() As String
GetFilePath = filepath
End Function
Public Function SetFileName(ByVal iStr As String)
filename = iStr
End Function
Public Function SetFilePath(ByVal iStr As String)
filepath = iStr
End Function
[[トップ]]
***仮_File
- ソース
Private filename As String
Private filepath As String
Private Sub class_initialize()
filename = ""
filepath = ""
End Sub
Public Function GetFileName() As String
GetFileName = filename
End Function
Public Function GetFilePath() As String
GetFilePath = filepath
End Function
Public Function SetFileName(ByVal iStr As String)
filename = iStr
End Function
Public Function SetFilePath(ByVal iStr As String)
filepath = iStr
End Function
[[トップ]]