タイトル : Re: StreamからString配列へのコピー 投稿日 : 2009/06/25(Thu) 15:52 投稿者 : 魔界の仮面弁士
> 各行の文字列をStringの配列に移したいのですが、良い方法ありますでしょうか? Dim Stm As Stream Set Stm = New ADODB.Stream Stm.Open Stm.Charset = "Shift_JIS" '文字コードの指定 Stm.LoadFromFile sPath 'テキストファイルへのパス Dim lines() As String lines = Split(Stm.ReadText(adReadAll), vbCrLf) '改行(vbCrLf)で分割 Stm.Close |