Back to Top

ぷろぐらむノート

Monthly Archives: 10月 2016

VB.NET NPOIのインストール

Excelファイルを作成する事が出来る NPIO の説明をします。

NPOIは、xlsx形式・xls形式・docx形式をサポートしています。

NPOI のインストール

CodePlexのNPOIのサイトからダウンロードします。

ダウンロードしたら、ファイル（NPOI 2.2.1 binary package.zip）を解凍します。

あとは、作成するアプリケーションにダウンロードしたDLLを[参照]-[参照の追加(R)]にて追加します。

Net20 か Net40 内のdllをとりあえず全て、追加してください。

基本サンプル

Imports System.IO
Imports NPOI.SS.UserModel
Imports NPOI.XSSF.UserModel

を追加します。

'Excelのブックを作成（xlsx形式）
Dim book As IWorkbook = New XSSFWorkbook()

'シートを作成
Dim sheet1 As ISheet = book.CreateSheet("Sheet1")

sheet1.CreateRow(0).CreateCell(0).SetCellValue("Hello World.")

'保存するファイルのパス
Dim filePath As String = "c:\work\Sample01.xlsx"
Using fs = File.Create(filePath)
    book.Write(fs)
End Using

 

VB.NET テキストファイルの書き込み

テキストファイルの書き込み方法について記載します。

File.WriteAllLines メソッドを使用し 文字列をテキストファイルに書き込む

Dim str As String = "AAA"

Dim sFilePath As String = "C:\work\myfile.txt"
 
'文字列をテキストファイルに全て書き込む
System.IO.File.WriteAllText(sFilePath, str, System.Text.Encoding.Default)

 

File.WriteAllLines メソッドを使用し 文字列配列をテキストファイルに書き込む

Dim lines As String() = {"AAA", "BBB", "CCC"}

Dim sFilePath As String = "C:\work\myfile.txt"

'配列の要素ごとに、改行を追加してテキストファイルに書き込む
System.IO.File.WriteAllLines(sFilePath, lines, System.Text.Encoding.Default)

 

StreamWriter.Write メソッドを使用し 文字列をテキストファイルに書き込む

Dim str As String = "AAA"

Dim sFilePath As String = "C:\work\myfile.txt"

'文字列をテキストファイルに全て書き込む
Dim sw As New System.IO.StreamWriter(sFilePath, False, System.Text.Encoding.Default)
sw.Write(str)
sw.Close()

※StreamWriter()の２番目のパラメータは、追加、上書き、を指定します。

 

StreamWrite.WriteLine メソッドを使用し 文字列配列をテキストファイルに書き込む

Dim lines As String() = {"AAA", "BBB", "CCC"}

Dim sFilePath As String = "C:\work\myfile.txt"

Dim sw As New System.IO.StreamWriter(sFilePath, False, System.Text.Encoding.Default)

'配列の要素ごとに、改行を追加してテキストファイルに書き込む
For Each s As String In lines
    sw.WriteLine(s)
Next
sw.Close()