ab.com コミュニティ

あけましておめでとうございます。

テキストファイルから文字列を読み込んで実数にしたいと思っているのですが


Dim Goodtime As long
Dim Goodtimest As String

Open "test.txt" As #1
Input #1,Goodtimest
Goodtime=Val(Goodtimest)
Close #1

としてdebugするとtest.txtの中身は"25"なのにGoodtimestには"・・2"というのがはいってしまっていてうまく読み込めないんですが、どこが悪いんでしょうか。
新年早々申し訳ありませんがよろしくお願いします。m(_ _)m

こちらではAB413,AB423では再現できませんでした。
バージョンを書いてください。

又、textファイルのエンコードがUTF-8とかになってたりするとバイナリ単位で違う値になってしまうので、うまく読み込めない事があると思います。

4.24です。
textもメモ帳で普通に半角で打ち込んだだけなのですが・・・。　

> textもメモ帳で普通に半角で打ち込んだだけなのですが・・・。　

文字コードは保存するときに決まるようなので、確認してみてください

文字コードをUnicodeからANSIに変えたところ、ふつうに読み込むことができました。Webページ以外では文字コードを意識せずやってきたので反省しました。

新年早々ありがとうございました。

文字列の読み込み