ソース掲示板




すべてから検索

キーワード   条件 表示 現行ログ 過去ログ トピックス 名前 本文
VB.net : コンソール : ファイルを開くダイアログ
日時: 2011/09/06 15:57
名前: lightbox






Imports System.Windows.Forms

Module Module1

	Sub Main()

		' 「ファイルを開く」用オブジェクト作成
		Dim ofd As OpenFileDialog = New OpenFileDialog()

		' ダイアログが返す結果の型( 列挙体 )
		Dim result As DialogResult

		' ダイアログを開く
		result = ofd.ShowDialog

		' OK ボタンが押された処理
		if result = System.Windows.Forms.DialogResult.OK Then

			Console.Out.WriteLine(ofd.FileName)

		End If

		ofd.Dispose()

		' 処理終了
		Console.WriteLine("処理が終了しました")

		' 一時停止
		Console.Write("Enterキーを押して下さい : ")
		Console.ReadLine()

	End Sub

End Module
※ 参考 「ファイルを開く」ダイアログボックスを表示する: .NET Tips: C#, VB.NET, Visual Studio 「名前を付けて保存」ダイアログボックスを表示する: .NET Tips: C#, VB.NET, Visual Studio
メンテナンス


日時: 2011/09/06 15:57
名前: lightbox