diff options
| author | Bernard Normier <bernard@zeroc.com> | 2007-02-01 17:09:49 +0000 |
|---|---|---|
| committer | Bernard Normier <bernard@zeroc.com> | 2007-02-01 17:09:49 +0000 |
| commit | abada90e3f84dc703b8ddc9efcbed8a946fadead (patch) | |
| tree | 2c6f9dccd510ea97cb927a7bd635422efaae547a /vb/demo/Ice/value/ObjectFactory.vb | |
| parent | removing trace message (diff) | |
| download | ice-abada90e3f84dc703b8ddc9efcbed8a946fadead.tar.bz2 ice-abada90e3f84dc703b8ddc9efcbed8a946fadead.tar.xz ice-abada90e3f84dc703b8ddc9efcbed8a946fadead.zip | |
Expanded tabs into spaces
Diffstat (limited to 'vb/demo/Ice/value/ObjectFactory.vb')
| -rwxr-xr-x | vb/demo/Ice/value/ObjectFactory.vb | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/vb/demo/Ice/value/ObjectFactory.vb b/vb/demo/Ice/value/ObjectFactory.vb index f81ea049ab4..8eea89d6cf5 100755 --- a/vb/demo/Ice/value/ObjectFactory.vb +++ b/vb/demo/Ice/value/ObjectFactory.vb @@ -14,20 +14,20 @@ Public Class ObjectFactory Implements Ice.ObjectFactory Public Overloads Function create(ByVal type As String) As Ice.Object Implements Ice.ObjectFactory.create - If type.Equals("::Demo::Printer") Then - Return New PrinterI - End If + If type.Equals("::Demo::Printer") Then + Return New PrinterI + End If - If type.Equals("::Demo::DerivedPrinter") Then - Return New DerivedPrinterI - End If + If type.Equals("::Demo::DerivedPrinter") Then + Return New DerivedPrinterI + End If - ' Debug.Assert(False) ' Bug in VB 7.1: Diagnostics.Debug is not found - Return Nothing + ' Debug.Assert(False) ' Bug in VB 7.1: Diagnostics.Debug is not found + Return Nothing End Function Public Overloads Sub destroy() Implements Ice.ObjectFactory.destroy - ' Nothing to do + ' Nothing to do End Sub End Class |