StreamReader�N���X��p�����e�L�X�g�t�@�C���ǂݍ��݁Ausing�\���ɂ��t�@�C���̃N���[�Y�A��O�����ȂǁA.NET�ɂ�����e�L�X�g�t�@�C���ǂݍ��݂̊�{���������B
�{�e��2003/06/13�ɏ��Ō��J�A2008/08/14�ɉ������ꂽ�L�����ĉ������AVisual Studio 2017�ŃR�[�h�̓��쌟�A�}�ł̒lj��A�S�ʓI�ȍ\���̕ύX�Ȃǂ��s�������̂ł��B
�@�e�L�X�g�t�@�C���̓ǂݍ��݂́A���Ȃ��v���O���~���O�ɂ������{�I�ȏ����̈�ł���B
�@����̃g�s�b�N�������ɒm�肽���Ƃ������͈ȉ��̃����N�����p���Ăق����B
�@�e�L�X�g�t�@�C���̓ǂݍ��݂ɂ́A���̖ړI�◘�p���Ă���.NET Framework�̃o�[�W�����ɂ���āA���܂��܂ȕ��@������B�K�ȕ��@��I��łق����B
�@�e�L�X�g�t�@�C���̓��e��ǂݍ��ނɂ́A�܂��t�@�C�����J���A���ɂ��̓��e��ǂݍ��݁A�Ō�Ƀt�@�C������鏈�����K�v�ɂȂ�B
�@�t�@�C�����J���ɂ͊���̏����������邪�AWindows�ōł���ʓI�Ɏg�p����Ă���V�t�gJIS�̃t�@�C�����A�t�@�C�������w�肵�ĊJ���ɂ�StreamReader�N���X�iSystem.IO���O��ԁj�����̂悤�ɂ��Ďg�p����̂��ł��ȕւ��B
StreamReader sr = new StreamReader(
"readme.txt", Encoding.GetEncoding("Shift_JIS"));
Dim sr As New StreamReader( _
"readme.txt", Encoding.GetEncoding("Shift_JIS"))
�@StreamReader�N���X�ɂ͑����̃R���X�g���N�^���p�ӂ���Ă��邪�A�����ł͊J���t�@�C���ƁA���̃t�@�C���̃L�����N�^�Z�b�g�ɑΉ�����Encoding�N���X�iSystem.Text���O��ԁj�̃I�u�W�F�N�g���w�肷��o�[�W�������g�p���Ă���B���̏ꍇ�ɂ́A�V�t�gJIS�ɑΉ�����Encoding�I�u�W�F�N�g���g�p���Ă��邽�߁A�t�@�C���̓ǂݍ��ݎ��ɂ͂��̓��e���V�t�gJIS������ō\������Ă�����̂Ƃ��Ď�舵����iEncoding�N���X�ɂ��ẮA�uTIPS�F��������V�t�gJIS�Ƃ��ăo�C�g��ɕϊ�����ɂ́H�v�Ȃǂʼn�����Ă���j�B
�@������StreamReader�N���X��ReadToEnd���\�b�h���Ăяo���A�t�@�C���̓��e��S��1�̕�����ɓǂݍ��ނ��Ƃ��ł���B���̃T���v���v���O�����́A�J�����g�f�B���N�g���ɂ���V�t�gJIS�̃t�@�C���ureadme.txt�v����ɓǂݍ��݁A�������ʂɕ\������B
// fread1.cs
using System;
using System.IO;
using System.Text;
class FileRead1 {
static void Main() {
StreamReader sr = new StreamReader(
"readme.txt", Encoding.GetEncoding("Shift_JIS"));
string text = sr.ReadToEnd();
sr.Close();
Console.Write(text);
}
}
// �R���p�C�����@�Fcsc fread1.cs
' fread1.vb
Imports System
Imports System.IO
Imports System.Text
Class FileRead1
Shared Sub Main()
Dim sr As New StreamReader( _
"readme.txt", Encoding.GetEncoding("Shift_JIS"))
Dim text As String = sr.ReadToEnd()
sr.Close()
Console.Write(text)
End Sub
End Class
' �R���p�C�����@�Fvbc fread1.vb
�@ReadToEnd���\�b�h�ł́A���s�R�[�h�Ȃǂ��܂߂đS�Ă�1�̕�����Ƃ��ēǂݍ��܂��B
�@StreamReader�N���X�ŊJ�����t�@�C���́A����Close���\�b�h�ɂ����Ă����K�v������BOpen���\�b�h�iStreamReader�N���X�ɂ͂Ȃ��j�ȂǂŖ����I�ɃI�[�v���������Ăяo���Ă��Ȃ��̂ɂ�������炸�AClose���\�b�h���Ăяo���̂͏����s���R���������邩������Ȃ��B
�@StreamReader�N���X��IDisposable�C���^�t�F�[�X���������Ă��邽�߁i���m�ɂ͐e�N���X��TextReader�N���X���������Ă���j�A���̃T���v���v���O�����̂悤�ɁAClose���\�b�h���Ăяo�������using�X�e�[�g�����g�𗘗p���邱�Ƃ��ł���iIDisposable�C���^�t�F�[�X��using�X�e�[�g�����g�Ɋւ��ẮuTIPS�F�m���ȏI���������s���ɂ́H�v�ʼn�����Ă���j�B
// fread2.cs
using System;
using System.IO;
using System.Text;
class FileRead2 {
static void Main() {
string text = "";
using (StreamReader sr = new StreamReader(
"readme.txt", Encoding.GetEncoding("Shift_JIS"))) {
text = sr.ReadToEnd();
}
Console.Write(text);
}
}
// �R���p�C�����@�Fcsc fread2.cs
' fread2.vb
Imports System
Imports System.IO
Imports System.Text
Class FileRead2
Shared Sub Main()
Dim text As String = ""
Using sr As New StreamReader( _
"readme.txt", Encoding.GetEncoding("Shift_JIS"))
text = sr.ReadToEnd()
End Using
Console.Write(text)
End Sub
End Class
' �R���p�C�����@�Fvbc fread2.vb
�@���̏ꍇ�ɂ́Ausing�X�e�[�g�����g�̎��s���I�����Ƃ��ɁA�����I��StreamReader�N���X��Dispose���\�b�h���Ăяo����A���̒���Close���\�b�h���Ăяo����邱�ƂɂȂ�B
�@�ȏ�2�̃T���v���v���O�����ł́A�J�����Ƃ���t�@�C�������݂��Ȃ��ꍇ��A�t�@�C���̓ǂݎ�蒆�Ƀf�B�X�N�Ȃǂɉ��炩�̏�Q�����������ꍇ�ɂ́A��O���������ăv���O�����̎��s�����f���Ă��܂��B
�@���ۂ̃A�v���P�[�V�����ł́A���̂悤�ȗ�O�������ɔ����āA���̂悤�ȗ�O�������L�q���Ă����K�v�����邾�낤�B
// fread3.cs
using System;
using System.IO;
using System.Text;
class FileRead3 {
static void Main() {
string text = "";
try {
using (StreamReader sr = new StreamReader(
"readme.txt", Encoding.GetEncoding("Shift_JIS"))) {
text = sr.ReadToEnd();
}
Console.Write(text);
} catch (Exception e) {
Console.WriteLine(e.Message);
}
}
}
// �R���p�C�����@�Fcsc fread3.cs
' fread3.vb
Imports System
Imports System.IO
Imports System.Text
Class FileRead3
Shared Sub Main()
Dim text As String = ""
Try
Using sr As New StreamReader( _
"readme.txt", Encoding.GetEncoding("Shift_JIS"))
text = sr.ReadToEnd()
End Using
Console.Write(text)
Catch exception As Exception
Console.WriteLine(exception.Message)
End Try
End Sub
End Class
' �R���p�C�����@�Fvbc fread3.vb
�@using�X�e�[�g�����g���g�p���Ă���ƁA��O�������ɂ��t�@�C���̃N���[�Y�����������I�ɍs���邽�ߕ֗����B
�@�����ɂ���ẮA�t�@�C���S�̂�1�̕�����Ƃ��ēǂݍ��ނ����A1�s���ǂݍ���ŕ�����̔z��Ƃ������������₷���ꍇ������B�t�@�C������1�s�ǂݍ��ނɂ́AReadLine���\�b�h���g�p����悢�BReadLine���\�b�h�́AStreamReader�N���X�ɂ��I�[�v�����ꂽ�t�@�C������1�s�����ǂݎ��A�����̓ǂݎ��ʒu��1�s���i�߂�B�ǂݎ��ʒu���t�@�C���̍Ō�ɒB�����ꍇ�ɂ�null�iVB�̏ꍇ�ɂ�Nothing�j��Ԃ��B
�@���̃T���v���v���O�����ł̓t�@�C���̍s��ǂݍ��݂Ȃ���AArrayList�N���X�iSystem.Collections���O��ԁj�̃C���X�^���X�ɒlj����Ă����A���̂��Ɗe�s�����ɉ�ʂɕ\������B
// fread4.cs
using System;
using System.IO;
using System.Text;
using System.Collections;
class FileRead4 {
static void Main() {
string line = "";
ArrayList al = new ArrayList();
using (StreamReader sr = new StreamReader(
"readme.txt", Encoding.GetEncoding("Shift_JIS"))) {
while ((line = sr.ReadLine()) != null) {
al.Add(line);
}
}
for (int i = 0; i < al.Count; i++) {
Console.WriteLine(al[i]);
}
}
}
// �R���p�C�����@�Fcsc fread4.cs
' fread4.vb
Imports System
Imports System.IO
Imports System.Text
Imports System.Collections
Class FileRead4
Shared Sub Main()
Dim line As String = ""
Dim al As New ArrayList
Using sr As StreamReader = New StreamReader( _
"readme.txt", Encoding.GetEncoding("Shift_JIS"))
line = sr.ReadLine()
Do Until line Is Nothing
al.Add(line)
line = sr.ReadLine()
Loop
End Using
For i As Integer = 0 To al.Count - 1
Console.WriteLine(al.Item(i))
Next i
End Sub
End Class
' �R���p�C�����@�Fvbc fread4.vb
�@ArrayList�N���X�͉ϒ��̔z��Ƃ��ė��p�ł���B�e�L�X�g�t�@�C���͈�x�S�̂�ǂݍ���ł݂Ȃ���A�S�̂̍s���͕�����Ȃ��B���̂��߁A�錾���ɂ��̗v�f�����w�肵�Ȃ���Ȃ�Ȃ��ʏ�̔z��́A���̂悤�ȏꍇ�ɂ͓K���ł͂Ȃ����낤�BArrayList�N���X�ɂ��ẮuTIPS�F�z��̃T�C�Y��ύX����ɂ́H�v�ʼn�����Ă���B�Ȃ��A�ǂݍ��e�s�ɂ͉��s�R�[�h�͊܂܂�Ȃ��B
�@.NET Framework 2.0�ȍ~�ł́AArrayList�N���X�ɑウ��List<T>�W�F�l���b�N�R���N�V�����iSystem.Collections.Generic���O��ԁj���g���Ƃ悢�Bstring�^�̂܂܊i�[�ł���̂ŁA���o���ۂɂ��������L���X�g�����Ԃ��s�v�ɂȂ�B
�@�Ȃ�.NET Framework 2.0�ł́A�t�@�C�����J���A���e��ǂݍ��݁A����Ƃ�����A�̏�����1�̃��\�b�h�Ăяo���ʼn\�Ƃ���ReadAllText���\�b�h��ReadAllLines���\�b�h��File�N���X�iSystem.IO���O��ԁj�ɒlj�����Ă���B����ɂ��ẮuTIPS�F�e�L�X�g�E�t�@�C���̓��e���ȒP�ɓǂݍ��ނɂ́H�v�ʼn�����Ă���B
���p�\�o�[�W�����F.NET Framework �S�o�[�W����
�J�e�S���F�N���X���C�u�����@�����ΏہF�e�L�X�g�t�@�C��
�g�p���C�u�����FStreamReader�N���X�iSystem.IO���O��ԁj
�g�p���C�u�����FEncoding�N���X�iSystem.Text���O��ԁj
�g�p���C�u�����FArrayList�N���X�iSystem.Collections���O��ԁj
�֘ATIPS�F��������V�t�gJIS�Ƃ��ăo�C�g��ɕϊ�����ɂ́H
�֘ATIPS�F�m���ȏI���������s���ɂ́H
�֘ATIPS�F�z��̃T�C�Y��ύX����ɂ́H
�֘ATIPS�F�e�L�X�g�E�t�@�C���̓��e���ȒP�ɓǂݍ��ނɂ́H�m2.0�̂݁AC#�AVB�n
�֘ATIPS�F�e�L�X�g�E�t�@�C���̓��e���ȒP�������I�ɓǂݍ��ނɂ́H�m4�ȍ~�AC#�AVB�n
�֘ATIPS�F�e�L�X�g�t�@�C���̓��e����I�ɓǂݍ��ނɂ́H�mC#�^VB�A.NET 4.5�n
�֘ATIPS�F�t�@�C���Ƀe�L�X�g���������ނɂ́H�mC#�AVB�n
�֘ATIPS�F�o�C�i���E�t�@�C����ǂݏ�������ɂ́H
�֘ATIPS�F�e�L�X�g�t�@�C���̓��e����I�ɏ������ނɂ́H�mC#�^VB�A.NET 4.5�n
�֘ATIPS�F�o�C�i���t�@�C������I�ɓǂݏ�������ɂ́H�mC#�^VB�A.NET 4.5�n
�y2018/07/11�zVisual Studio 2017�ŃR�[�h�̓��쌟�A�}�ł̒lj��A�S�ʓI�ȍ\���̕ύX�Ȃǂ��s���܂����B
�y2008/08/14�zVB�iVisual Basic�j�̃R�[�h��ƃT���v���v���O������lj����܂����B
�y2003/06/13�z���Ō��J�B
�u.NET TIPS�v
Copyright© Digital Advantage Corp. All Rights Reserved.