в 16:40, 26 мая 2010

2010-05-26T16:40:30Z

Admin: 1 версия

2010-05-26T12:56:22Z

1 версия

Новая страница

==Catch file related exceptions: DirectoryNotFoundException, FileNotFoundException==

<source lang="vbnet">Imports System.IO
Imports System.Windows.Forms
public class ColorDialogWithCustomColorSettings
public Shared Sub Main
Dim FileDB As New OpenFileDialog()
FileDB.Filter = "All files | *.* | Text files | *.txt"
FileDB.FilterIndex = 2
FileDB.InitialDirectory = "C:\Temp"
FileDB.AddExtension = True
FileDB.DefaultExt = "txt"
FileDB.CheckFileExists = False
FileDB.CheckPathExists = False
If (FileDB.ShowDialog() = DialogResult.OK) Then
Dim SourceFile As StreamReader
Try
SourceFile = New StreamReader(FileDB.FileName)
Console.WriteLine(SourceFile.ReadToEnd())
SourceFile.Close()
Catch Except As DirectoryNotFoundException
Console.WriteLine("Error: " & Except.Message)
Catch Except As FileNotFoundException
Console.WriteLine("Error: " & Except.Message)
Catch Except As Exception
Console.WriteLine("Error: " & Except.Message)
End Try
Else
Console.WriteLine("User selected Cancel")
End If
End Sub
End class</source>

← Предыдущая	Версия 16:40, 26 мая 2010
(нет различий)

VB.Net Tutorial/Stream File/File Exception - История изменений

в 16:40, 26 мая 2010

Admin: 1 версия