VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2004/02/10(Tue) 11:11 |
| 投稿者 | ： ak |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^3: テキストファイルの読書 |
> ちなみに、RichTextBox以外で行う方法はありませんか？
> 原則的に書き込むを行う直前にファイルのオープンを
> 行おうと考えているのですけど大丈夫ですかね？
RichTextBoxの機能をご存知でしょうか？
下記の事を理解せずにRichTextBox以外での方法を探してい
るのであればまずはRichTextBoxのプロパティ、メソッドを
調べてください。
LoadFileプロパティでファイルを読み込む事ができます。
という事はOpenでファイルを開く必要が無い訳です。
行を追加する場合は
RichTextBox1.Text = RichTextBox1.Text & vbCrlf & "追加
する文字列"
行数は
Dim sData() As String
sData = Split(RichTextBox1.Text, vbCrLf)
Debug.Print Ubound(sData)
で取得できます。
という事は１行目に行数を入れる必要はありませんよね。
１行目だけ読めば何行あるかすぐに分かると考えたのかもし
れませんが行数がずれてしまうと永久にずれてしまいます。
全て読み込んで行数取得が基本かつ確実です。
１行目の行数を変更して最終行にデータを追加する事にとら
われずデータも含めて確実で効率的な方法を検討すべきでは
ないでしょうか？
あとはSaveFileプロパティを使用して保存すれば良い訳です。
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）