'
' Author:
' Roopa Wilson (rowilson@novell.com)
-
' Copyright (C) 2004 Novell, Inc (http://www.novell.com)
'
' Permission is hereby granted, free of charge, to any person obtaining
' OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
' WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
'
-
-Imports Microsoft.VisualBasic \r
-Imports System\r
-Public Class TestClass \r
- Public Function Test() As String\r
- 'Begin Code\r
- Try\r
- WriteLine (1, "Just a test")\r
- Catch e As Exception\r
- If (e.GetType ().ToString ()) <> "System.IO.IOException" Then\r
- Throw New Exception ("Expected IOException but got " + e.GetType ().ToString ())\r
- FileClose (1)\r
- End If \r
- Return "Success"\r
- End Try\r
- Throw New Exception ("Expected IOException but got no exception")\r
- 'End Code\r
- End Function\r
-End Class\r
+Imports Microsoft.VisualBasic
+Imports System
+Public Class TestClass
+ Public Function Test() As String
+ 'Begin Code
+ Try
+ WriteLine (1, "Just a test")
+ Catch e As Exception
+ If (e.GetType ().ToString ()) <> "System.IO.IOException" Then
+ Throw New Exception ("Expected IOException but got " + e.GetType ().ToString ())
+ FileClose (1)
+ End If
+ Return "Success"
+ End Try
+ Throw New Exception ("Expected IOException but got no exception")
+ 'End Code
+ End Function
+End Class