プログラムコードの指導を御願い致します。

解決

VB初心者 2005-10-03 22:42:07 No: 125941

【開発環境】
・VB6 SP6

【質問内容】
・Name という変数の中にある"-"の個数を調べたいのですが、
  簡単に分かる方法はないでしょうか？

  下記コードの場合、永遠にあると対応が出来なくなってしまいます。
  初歩的な事とは思いますが、ご指導の程宜しく御願い致します。

    Dim Name as string
    Dim S As Long
    Dim Count as long

    Count=0
    Name="001-002-003-004-005・・・・"
    S = InStr(1, Name, "-")  '管理番号
    If S > 0 Then
        Count=Count+1
  S = InStr(S+1, Name, "-")  '管理番号
  If S > 0 Then
          Count=Count+1
  End if
         ・・・
         ・・・
         ・・・
         ・・・
    End If

いな 2005-10-03 22:44:05 No: 125942

とりあえず、この掲示板で何度も見たことがある質問なので、
過去ログは読まれましたか？

VB初心者 2005-10-03 22:46:35 No: 125943

いな様お返事有難うございます。

過去のログを調べようとしたのですが、
どのような言葉で調べていいのかが分かりませんでした。

いな 2005-10-03 22:49:23 No: 125944

『特定の文字列』で過去ログを探してください。

文字列の中から特定の文字列の数を調べるには？
http://madia.world.coocan.jp/cgi-bin/VBBBS2/wwwlng.cgi?print+200509/05090064.txt

出現回数を数えるには？
http://madia.world.coocan.jp/cgi-bin/VBBBS2/wwwlng.cgi?print+200210/02100052.txt

ＶＢ初心者 2005-10-03 22:51:29 No: 125945

いな様お返事有難うございます。

上記アドレスで分かりました。
どうも有難うございました。