掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
文字列中のある文字の個数を求める方法は? (ID:141884)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
文字列中のある文字の個数を求める方法は? 例えば「abc,def,ghi」という文字列中の文字「,」の個数を,苦労して下記の方法によって求めています。しかし,もっと簡単に例えば ChrCount(A,",")のような関数がありませんか。御教示下さい。 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim A As String A = "abc,def,ghi" Dim i, n As Integer For i = 1 To Len(A) A = Mid$(A, InStr(A, ",") + 1) 'A中に「,」を見つけたら置き換える n = n + 1 '位置をup If InStr(A, ",") = 0 Then Exit For '「,」が無くなれば検索終わり Next MsgBox(Str(n)) '結果の確認 End Sub
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.