[リストへもどる]
一括表示

投稿時間:2004/01/28(Wed) 01:29
投稿者名:STR
URL :
タイトル:
文字列中の数値の取り出しについて
いつも拝見させていただき、大変勉強になっています。
早速ですが、タイトルの件でどなたかご教授を頂きたいのです。

文字列中にある数値を取り出す関数などはないのでしょうか?
例えば
「 あいうえお112345678912345ABCABC」
と文字列がありその中の数値のみ(全角半角両方)を
「112345678912345」
取り出したいのです。
関数でなくても、その数値のみを取り出す方法(コード)
のヒントだけでもお教え願えないでしょうか?

よろしくお願いいたします。

投稿時間:2004/01/28(Wed) 08:48
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: 文字列中の数値の取り出しについて
ここの逆引きヘルプ一覧表はご覧になられたでしょうか?
その中の「テキストボックスに数値しか入力出来ないように制限する関数(改良型) (069)」が
使えるかと思いますが?(目的によって少々改造が必要)
前記のデータをテキストボックスにペーストして見ましたら数値だけになりました。

投稿時間:2004/01/28(Wed) 10:46
投稿者名:いちゆ
Eメール:
URL :
タイトル:
Re^2: 文字列中の数値の取り出しについて
ほかに原始的な方法としては、

function getNumber(byval inString as string) as string
dim i as long
dim s as String
getNumber=""
for i=1 to len(inString)
  s=Mid$(inString,i,1)
  select case s
    case "0","1","2","3","4", _
         "5","6","7","8","9"
         getNumber=getNumber+s
  end select
  'if "0"<=s and s<="9" then getNumber=getNumber+s
next
end function

とか。
でも、数値じゃなくて数字の列を返すよ。

投稿時間:2004/01/28(Wed) 12:55
投稿者名:STR
URL :
タイトル:
Re^3: 文字列中の数値の取り出しについて
早速のご回答ありがとうございます。
今回はファイル内のデータを取り出し、その中の数値のみを
取り出すことがしたかったのですが、
テキストボックスの手法も、原始的な方法もどちらも
使用できそうなので、早速試してみます。
花ちゃんさん、いちゆさん、ご丁寧なご回答ありがとうございました。