「abccdefg」から「c」の個数を取得するには (ID:83911)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 …終わってるけどな。 なんとなく。 function FindStrCount(byref s as string,byref check as string) as long dim p as long FindStrCount=0 p=1 do p=instr(p,s,check) if p=0 then exit function else FindStrCount=FindStrCount+1 endif loop たぶん。