設定ファイルを使うには？

起動する環境に合わせて設定情報を変える時など、設定ファイルを使った方が良いケースがあります。
ＷｉｎｄｏｗｓＡＰＩを使う方法がありますが、ここでは単純にテキストファイルを使った方法を記述します。

設定ファイルとは…拡張子（ＩＮＩなど）のテキストファイル

（コーディング例）

Public Class frm_Main
'グローバル変数の定義
Public w_Dir As String '設定ファイルが格納されるフォルダ
Public w_FileName As String = "\XXXXXX.ini" '設定ファイル名

'スタートアップフォームをfrm_Mainとしたので、Form1_Loadに記述
Private Sub Form1_Load(ByVal sender As Object ...) Handles Me.Load

'当DLLを読むモジュールと同じフォルダ
w_Dir = Directory.GetCurrentDirectory

'設定情報の初期化
If Ini_Read() = False Then
Application.Exit()
Exit Sub
End If

'・・・その他のコーディング・・・
End Sub

'#######################################################
' 共通の設定ファイルを読み込むFunction
' ＜処理概要＞
' 設定ファイル読み込み
'#######################################################
Public Function Ini_Read() As Boolean
Dim w_txt As IO.StreamReader
Dim w_buffer As String
Try
Ini_Read = False
'指定ﾌｧｲﾙが存在しない時
If File.Exists(w_Dir & w_FileName) = False Then Exit Function
w_txt = New StreamReader(w_Dir & w_FileName, _
System.Text.Encoding.Default)
Do While -1
w_buffer = w_txt.ReadLine()
If w_buffer Is Nothing Then
Exit Do
End If
'・・・ここで読み込んだ内容を判断してグローバル変数に退避します。

Loop
w_txt.Close()
Ini_Read = True
Catch ex As Exception
Ini_Read = False
End Try
End Function
End Class

【補足説明】
設定ファイルを読み込むＦｕｎｃｔｉｏｎはクラス化する事が望ましいと思います。また、テキストファイルの読み込みに関しては他のやり方も存在しますので、試して見てください。

VB.NET プログラミング入門

設定ファイルを使うには？