掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
MID関数とMID$関数の違いがわからないのですが・・・ (ID:104948)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
はじめまして。みやっちです。 MID関数とMID$関数の違いがわかりません。 どちらを使っても同じ処理をするような気がするんですが・・・ ↓サンプルソースです。 '*************************************************************** '* 関数名:文字列置換(ReplaceStr) '* 引 数:置換対象文字列(ByVal w_objstr As String) '* 置換前文字列(ByVal w_findstr As String) '* 置換後文字列(ByVal w_repstr As String) '* 戻り値:置換後文字列(String) '* 機 能:置換対象文字列の置換前文字列を置換後文字列に置換する '*************************************************************** Public Function ReplaceStr(ByVal w_objstr As String, ByVal w_findstr _ As String, ByVal w_repstr As String) As String Dim w_ins As Long '検索位置 ' 戻り値に置換対象文字列をセットする ReplaceStr = w_objstr ' 検索位置を初期化する w_ins = 1 ' ループを開始する Do ' 置換前文字列を検索する w_ins = InStr(w_ins, ReplaceStr, w_findstr) ' 置換前文字列が見つからない場合 If w_ins = 0 Then Exit Do ' 置換前文字列を置換後文字列に置換する ReplaceStr = Mid(ReplaceStr, 1, w_ins - 1) & w_repstr & Mid( _ ReplaceStr, w_ins + Len(w_findstr), Len(ReplaceStr) - w_ins + _ Len(w_findstr) - 1) ' 次の検索位置を設定する w_ins = w_ins + Len(w_repstr) Loop End Function ↑このソースでMID$関数を使っても同じように動きます。 違いがわかりません。 分かる方、教えて下さい。 よろしくお願いします。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.