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

投稿時間:2003/04/26(Sat) 16:30
投稿者名:ねむら
Eメール:
URL :
タイトル:
テキストファイルから行列指定で切り出す方法
いつもお世話になっております。何ヶ月ぶりかに記述させて頂きます。

タイトル通り、あるテキストファイルの中身を切り出したいのですが、
ただ切り出すのではなく、『A行目のB列目の文字からC行目のD列目の文字まで』
というように範囲を指定して切り出したいのです。
『花ちゃん』さんの逆引きヘルプには行を指定する内容のものは載っていたのですが
列まで指定する方法がわかりません。どうか再びお力をお貸し下さい。
宜しくお願い致します。

投稿時間:2003/04/26(Sat) 16:34
投稿者名:ねむら
Eメール:
URL :
タイトル:
テキストファイルから行列指定で切り出す方法〜追記〜
すみません。開発環境を書き忘れました。
Windows2000のVB6.0です。
宜しくお願い致します。

投稿時間:2003/04/26(Sat) 16:59
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: テキストファイルから行列指定で切り出す方法〜追記〜
通常テキストファイルと言えばこの掲示板の書き込みのようなスタイルを
指すと思うのですが?この場合は列は当然ありませんので取得できません。
カンマ区切りとかタブ区切りのようになっているとか、ある長さで区切られて
いるとか、スペースで区切られているとか、規則性がないと難しいです。
VB6.0ならここの VB6.0 からの文字列関数の使用例 の Split関数 や
Mid・Left 関数を調べて下さい。

投稿時間:2003/04/26(Sat) 18:01
投稿者名:よねKEN
Eメール:
URL :http://www5b.biglobe.ne.jp/~yone-ken/
タイトル:
Re: テキストファイルから行列指定で切り出す方法
> タイトル通り、あるテキストファイルの中身を切り出したいのですが、
> ただ切り出すのではなく、『A行目のB列目の文字からC行目のD列目の文字まで』
> というように範囲を指定して切り出したいのです。

行を切り出せているのであれば、
後はMid関数でx文字目からy文字分という風に切り出せばいいのでは?

投稿時間:2003/04/26(Sat) 19:05
投稿者名:ねむら
Eメール:
URL :
タイトル:
Re: テキストファイルから行列指定で切り出す方法
花ちゃんさん、よねKENさん、早速のご回答ありがとうございます。

そうですか、やはりMid関数とかを使わないと難しいですか・・・
同じ行の一部分を切り出すのではないので
Mid関数を使うとなると一先ず全て取り込まないと駄目ですよね。

ちょっと文字数が莫大な量で、切り出したい場所は
その時によって行列の位置が異なり、切り出す文字数も異なるのです。
テキストファイルの時に何か方法があればと思ったのですが・・・
切り出し始めと終わりの4文字は確定しているので
始めを地道に探しながらそこから終わりの4文字を見つけるまで頑張ります。

どうもありがとうございました。また何かありましたら宜しくお願い致します。

投稿時間:2003/04/26(Sat) 20:00
投稿者名:nobu
Eメール:
URL :
タイトル:
Re^2: テキストファイルから行列指定で切り出す方法
> 切り出し始めと終わりの4文字は確定しているので
> 始めを地道に探しながらそこから終わりの4文字を見つけるまで頑張ります。

検索文字列が分かっているなら、まづは'切り出したい文字列のある行を
取得してから Instr で見つけたらどうですか?  例えば

Private Sub Form_Load()
  Dim tmp As String
  Dim tmp1 As String
  Dim tmp2 As String
  Dim tmp3 As String

  Dim fp1 As Integer
  Dim fp2 As Integer
  Dim ln As Integer
  
  tmp = "ABCDEFGHIJKLMNOPQRSTUVWXYZ" '切り出したい行の文字列
  tmp1 = "CDEF"                       '切り出し始め
  tmp2 = "QRS"                       '切り出し終わり

  fp1 = InStr(tmp, tmp1)
  fp2 = InStr(tmp, tmp2)
  ln = Len(tmp2)

  tmp3 = Mid(tmp, fp1, fp2 + ln - fp1)  '切り出し結果

  Debug.Print tmp3

End Sub

その行に検索する同じ文字列が複数ある時は、そのどれかを
確定しておく必要はありますが....。

投稿時間:2003/04/28(Mon) 08:49
投稿者名:ねむら
Eメール:
URL :
タイトル:
Re^3: テキストファイルから行列指定で切り出す方法
nobuさん、お返事ありがとうございます。

ひとまず、文字列を全て読み込んで、
4文字検索して切り出していこうと思います。

皆様、どうもありがとうございました。