AW: [mono-vb] vbNewLine to be platform dependent?

Jochen Wezel jwezel@compumaster.de
Fri, 23 Jul 2004 15:49:20 +0200


This is a multi-part message in MIME format.

------_=_NextPart_001_01C470BB.DB0E7B40
Content-Type: text/plain;
	charset="us-ascii"
Content-Transfer-Encoding: quoted-printable

Hi!
=20
How could we copy the value and behaviour of System.Environment.NewLine
into our VB class as best?
=20
I've seen in /mcs/class/corlib/System/Environment.cs the following
implementation:
                /// <summary>
                /// Gets the standard new line value
                /// </summary>
                public extern static string NewLine {
                        [MethodImplAttribute
(MethodImplOptions.InternalCall)]
                        get;
                }

And now I'm a little bit confused...
=20
This doesn't work (compilation errors because not a constant, sure):

	namespace Microsoft.VisualBasic {
	        sealed public class ControlChars {
	                // Declarations
	                public const System.String CrLf =3D "\n\r";
	                public const System.String NewLine =3D
System.Environment.NewLine;=20
	                public const System.Char Cr =3D '\n';
	                public const System.Char Lf =3D '\r';
	                public const System.Char Back =3D '\b';
=09

Regards
Jochen

________________________________

Von: JD Conley [mailto:jconley@winfessor.com]=20
Gesendet: Donnerstag, 22. Juli 2004 20:50
An: Jochen Wezel
Betreff: RE: [mono-vb] vbNewLine to be platform dependent?



Check out the implementation for System.Environment.NewLine.  You can
probably just steal that.  It should be platform independent (I don't
have mcs source handy to check).

=20

JD

=20

=20

________________________________

From: Jochen Wezel [mailto:jwezel@compumaster.de]=20
Sent: Thursday, July 22, 2004 12:13 AM
To: Jambunathan Jambunathan <kjambunathan@novell.com>;
mono-vb@lists.ximian.com
Subject: [mono-vb] vbNewLine to be platform dependent?

=20

Hi Jambunathan and all the other VB gurus!

=20

> +namespace Microsoft.VisualBasic {
> +
[Microsoft.VisualBasic.CompilerServices.StandardModuleAttribute]
> +       sealed public class Constants {
> +               // Declarations
> +               public const System.Int32 vbObjectError =3D
(System.Int32)(-2147221504);
> +               public const System.String vbCrLf =3D "\r\n";
> +               public const System.String vbNewLine =3D "\r\n";
> +               public const System.String vbCr =3D "\r";
> +               public const System.String vbLf =3D "\n";

I would prefer to see the constant vbNewLine to be a platform dependent
line break.

=20

(If I remember correctly, Microsoft itself was telling in the tooltip
text/intellisense of this constant, that this vbnewline was intended to
be the the platform dependent line break.)=20

=20

Certainly, the test case for this constant had to be fixed, too.

That's why I recommend something like that.

# if PLATFORM_LINUX {

               public const System.String vbNewLine =3D "\n";
# } else if PLATFORM_UNIX {

               public const System.String vbNewLine =3D "\n";
# } else if PLATFORM_MAC {

               public const System.String vbNewLine =3D "\r";
# } else { // PLATFORM_WINDOWS

               public const System.String vbNewLine =3D "\r\n";
# }

=20

What do you think about?

=20

Regards

Jochen

=20

________________________________

Von: mono-patches-admin@ximian.com im Auftrag von Jambunathan
Jambunathan <kjambunathan@novell.com>
Gesendet: Do 22.07.2004 06:39
An: mono-patches@lists.ximian.com
Betreff: [Mono-patches]
mcs/class/Microsoft.VisualBasic/Microsoft.VisualBasic
Constants.cs,1.5,1.5.2.1 ChangeLog,1.43,1.43.2.1

Update of
/cvs/public/mcs/class/Microsoft.VisualBasic/Microsoft.VisualBasic
In directory mono-cvs.ximian.com:/tmp/cvs-serv9235

Modified Files:
      Tag: mono-1-0
        Constants.cs ChangeLog
Log Message:
Fixed definitions of vbCr, vbLf, vbCrLf and
vbNewLine


Index: Constants.cs
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file:
/cvs/public/mcs/class/Microsoft.VisualBasic/Microsoft.VisualBasic/Consta
nts.cs,v
retrieving revision 1.5
retrieving revision 1.5.2.1
diff -u -d -r1.5 -r1.5.2.1
--- Constants.cs        24 Jun 2004 14:06:50 -0000      1.5
+++ Constants.cs        22 Jul 2004 04:39:48 -0000      1.5.2.1
@@ -1,11 +1,11 @@
-//
-// Constants.cs
-//
-// Author:
-//   Chris J Breisch (cjbreisch@altavista.net)
-//
-// (C) 2002 Chris J Breisch
-//
+//
+// Constants.cs
+//
+// Author:
+//   Chris J Breisch (cjbreisch@altavista.net)
+//
+// (C) 2002 Chris J Breisch
+//

 //
 // Copyright (c) 2002-2003 Mainsoft Corporation.
@@ -30,131 +30,131 @@
 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
CONNECTION
 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 //
-
-using System;
-
-namespace Microsoft.VisualBasic {
-       [Microsoft.VisualBasic.CompilerServices.StandardModuleAttribute]
-       sealed public class Constants {
-               // Declarations
-               public const System.Int32 vbObjectError =3D
(System.Int32)(-2147221504);
-               public const System.String vbCrLf =3D "\n\r";
-               public const System.String vbNewLine =3D "\n\r";
-               public const System.String vbCr =3D "\n";
-               public const System.String vbLf =3D "\r";
-               public const System.String vbBack =3D "\b";
-               public const System.String vbFormFeed =3D "\f";
-               public const System.String vbTab =3D "\t";
-               public const System.String vbVerticalTab =3D "\v";
-               public const System.String vbNullChar =3D "\0";
-               public const System.String vbNullString =3D "";
-
-               public const AppWinStyle vbHide =3D AppWinStyle.Hide;
-               public const AppWinStyle vbNormalFocus =3D
AppWinStyle.NormalFocus;
-               public const AppWinStyle vbMinimizedFocus =3D
AppWinStyle.MinimizedFocus;
-               public const AppWinStyle vbMaximizedFocus =3D
AppWinStyle.MaximizedFocus;
-               public const AppWinStyle vbNormalNoFocus =3D
AppWinStyle.NormalNoFocus;
-               public const AppWinStyle vbMinimizedNoFocus =3D
AppWinStyle.MinimizedNoFocus;
-
-               public const CallType vbMethod =3D CallType.Method;
-               public const CallType vbGet =3D CallType.Get;
-               public const CallType vbLet =3D CallType.Let;
-               public const CallType vbSet =3D CallType.Set;
-
-               public const CompareMethod vbBinaryCompare =3D
CompareMethod.Binary;
-               public const CompareMethod vbTextCompare =3D
CompareMethod.Text;
-
-               public const DateFormat vbGeneralDate =3D
DateFormat.GeneralDate;
-               public const DateFormat vbLongDate =3D
DateFormat.LongDate;
-               public const DateFormat vbShortDate =3D
DateFormat.ShortDate;
-               public const DateFormat vbLongTime =3D
DateFormat.LongTime;
-               public const DateFormat vbShortTime =3D
DateFormat.ShortTime;
-
-               public const FirstDayOfWeek vbUseSystemDayOfWeek =3D
FirstDayOfWeek.System;
-               public const FirstDayOfWeek vbSunday =3D
FirstDayOfWeek.Sunday;
-               public const FirstDayOfWeek vbMonday =3D
FirstDayOfWeek.Monday;
-               public const FirstDayOfWeek vbTuesday =3D
FirstDayOfWeek.Tuesday;
-               public const FirstDayOfWeek vbWednesday =3D
FirstDayOfWeek.Wednesday;
-               public const FirstDayOfWeek vbThursday =3D
FirstDayOfWeek.Thursday;
-               public const FirstDayOfWeek vbFriday =3D
FirstDayOfWeek.Friday;
-               public const FirstDayOfWeek vbSaturday =3D
FirstDayOfWeek.Saturday;
-
-               public const FileAttribute vbNormal =3D
FileAttribute.Normal;
-               public const FileAttribute vbReadOnly =3D
FileAttribute.ReadOnly;
-               public const FileAttribute vbHidden =3D
FileAttribute.Hidden;
-               public const FileAttribute vbSystem =3D
FileAttribute.System;
-               public const FileAttribute vbVolume =3D
FileAttribute.Volume;
-               public const FileAttribute vbDirectory =3D
FileAttribute.Directory;
-               public const FileAttribute vbArchive =3D
FileAttribute.Archive;
-
-               public const FirstWeekOfYear vbUseSystem =3D
FirstWeekOfYear.System;
-               public const FirstWeekOfYear vbFirstJan1 =3D
FirstWeekOfYear.Jan1;
-               public const FirstWeekOfYear vbFirstFourDays =3D
FirstWeekOfYear.FirstFourDays;
-               public const FirstWeekOfYear vbFirstFullWeek =3D
FirstWeekOfYear.FirstFullWeek;
-
-               public const VbStrConv vbUpperCase =3D
VbStrConv.UpperCase;
-               public const VbStrConv vbLowerCase =3D
VbStrConv.LowerCase;
-               public const VbStrConv vbProperCase =3D
VbStrConv.ProperCase;
-               public const VbStrConv vbWide =3D VbStrConv.Wide;
-               public const VbStrConv vbNarrow =3D VbStrConv.Narrow;
-               public const VbStrConv vbKatakana =3D =
VbStrConv.Katakana;
-               public const VbStrConv vbHiragana =3D =
VbStrConv.Hiragana;
-               public const VbStrConv vbSimplifiedChinese =3D
VbStrConv.SimplifiedChinese;
-               public const VbStrConv vbTraditionalChinese =3D
VbStrConv.TraditionalChinese;
-               public const VbStrConv vbLinguisticCasing =3D
VbStrConv.LinguisticCasing;
-
-               public const TriState vbUseDefault =3D
TriState.UseDefault;
-               public const TriState vbTrue =3D TriState.True;
-               public const TriState vbFalse =3D TriState.False;
-
-               public const VariantType vbEmpty =3D VariantType.Empty;
-               public const VariantType vbNull =3D VariantType.Null;
-               public const VariantType vbInteger =3D
VariantType.Integer;
-               public const VariantType vbLong =3D VariantType.Long;
-               public const VariantType vbSingle =3D =
VariantType.Single;
-               public const VariantType vbDouble =3D =
VariantType.Double;
-               public const VariantType vbCurrency =3D
VariantType.Currency;
-               public const VariantType vbDate =3D VariantType.Date;
-               public const VariantType vbString =3D =
VariantType.String;
-               public const VariantType vbObject =3D =
VariantType.Object;
-               public const VariantType vbBoolean =3D
VariantType.Boolean;
-               public const VariantType vbVariant =3D
VariantType.Variant;
-               public const VariantType vbDecimal =3D
VariantType.Decimal;
-               public const VariantType vbByte =3D VariantType.Byte;
-               public const VariantType vbUserDefinedType =3D
VariantType.UserDefinedType;
-               public const VariantType vbArray =3D VariantType.Array;
-
-               public const MsgBoxResult vbOK =3D MsgBoxResult.OK;
-               public const MsgBoxResult vbCancel =3D
MsgBoxResult.Cancel;
-               public const MsgBoxResult vbAbort =3D =
MsgBoxResult.Abort;
-               public const MsgBoxResult vbRetry =3D =
MsgBoxResult.Retry;
-               public const MsgBoxResult vbIgnore =3D
MsgBoxResult.Ignore;
-               public const MsgBoxResult vbYes =3D MsgBoxResult.Yes;
-               public const MsgBoxResult vbNo =3D MsgBoxResult.No;
-
-               public const MsgBoxStyle vbOKOnly =3D =
MsgBoxStyle.OKOnly;
-               public const MsgBoxStyle vbOKCancel =3D
MsgBoxStyle.OKCancel;
-               public const MsgBoxStyle vbAbortRetryIgnore =3D
MsgBoxStyle.AbortRetryIgnore;
-               public const MsgBoxStyle vbYesNoCancel =3D
MsgBoxStyle.YesNoCancel;
-               public const MsgBoxStyle vbYesNo =3D MsgBoxStyle.YesNo;
-               public const MsgBoxStyle vbRetryCancel =3D
MsgBoxStyle.RetryCancel;
-               public const MsgBoxStyle vbCritical =3D
MsgBoxStyle.Critical;
-               public const MsgBoxStyle vbQuestion =3D
MsgBoxStyle.Question;
-               public const MsgBoxStyle vbExclamation =3D
MsgBoxStyle.Exclamation;
-               public const MsgBoxStyle vbInformation =3D
MsgBoxStyle.Information;
-               public const MsgBoxStyle vbDefaultButton1 =3D
MsgBoxStyle.DefaultButton1;
-               public const MsgBoxStyle vbDefaultButton2 =3D
MsgBoxStyle.DefaultButton2;
-               public const MsgBoxStyle vbDefaultButton3 =3D
MsgBoxStyle.DefaultButton3;
-               public const MsgBoxStyle vbApplicationModal =3D
MsgBoxStyle.ApplicationModal;
-               public const MsgBoxStyle vbSystemModal =3D
MsgBoxStyle.SystemModal;
-               public const MsgBoxStyle vbMsgBoxHelp =3D
MsgBoxStyle.MsgBoxHelp;
-               public const MsgBoxStyle vbMsgBoxRight =3D
MsgBoxStyle.MsgBoxRight;
-               public const MsgBoxStyle vbMsgBoxRtlReading =3D
MsgBoxStyle.MsgBoxRtlReading;
-               public const MsgBoxStyle vbMsgBoxSetForeground =3D
MsgBoxStyle.MsgBoxSetForeground;
-
-               // Constructors
-               // Properties
-               // Methods
-               // Events
-       };
-}
+
+using System;
+
+namespace Microsoft.VisualBasic {
+       [Microsoft.VisualBasic.CompilerServices.StandardModuleAttribute]
+       sealed public class Constants {
+               // Declarations
+               public const System.Int32 vbObjectError =3D
(System.Int32)(-2147221504);
+               public const System.String vbCrLf =3D "\r\n";
+               public const System.String vbNewLine =3D "\r\n";
+               public const System.String vbCr =3D "\r";
+               public const System.String vbLf =3D "\n";
+               public const System.String vbBack =3D "\b";
+               public const System.String vbFormFeed =3D "\f";
+               public const System.String vbTab =3D "\t";
+               public const System.String vbVerticalTab =3D "\v";
+               public const System.String vbNullChar =3D "\0";
+               public const System.String vbNullString =3D "";
+
+               public const AppWinStyle vbHide =3D AppWinStyle.Hide;
+               public const AppWinStyle vbNormalFocus =3D
AppWinStyle.NormalFocus;
+               public const AppWinStyle vbMinimizedFocus =3D
AppWinStyle.MinimizedFocus;
+               public const AppWinStyle vbMaximizedFocus =3D
AppWinStyle.MaximizedFocus;
+               public const AppWinStyle vbNormalNoFocus =3D
AppWinStyle.NormalNoFocus;
+               public const AppWinStyle vbMinimizedNoFocus =3D
AppWinStyle.MinimizedNoFocus;
+
+               public const CallType vbMethod =3D CallType.Method;
+               public const CallType vbGet =3D CallType.Get;
+               public const CallType vbLet =3D CallType.Let;
+               public const CallType vbSet =3D CallType.Set;
+
+               public const CompareMethod vbBinaryCompare =3D
CompareMethod.Binary;
+               public const CompareMethod vbTextCompare =3D
CompareMethod.Text;
+
+               public const DateFormat vbGeneralDate =3D
DateFormat.GeneralDate;
+               public const DateFormat vbLongDate =3D
DateFormat.LongDate;
+               public const DateFormat vbShortDate =3D
DateFormat.ShortDate;
+               public const DateFormat vbLongTime =3D
DateFormat.LongTime;
+               public const DateFormat vbShortTime =3D
DateFormat.ShortTime;
+
+               public const FirstDayOfWeek vbUseSystemDayOfWeek =3D
FirstDayOfWeek.System;
+               public const FirstDayOfWeek vbSunday =3D
FirstDayOfWeek.Sunday;
+               public const FirstDayOfWeek vbMonday =3D
FirstDayOfWeek.Monday;
+               public const FirstDayOfWeek vbTuesday =3D
FirstDayOfWeek.Tuesday;
+               public const FirstDayOfWeek vbWednesday =3D
FirstDayOfWeek.Wednesday;
+               public const FirstDayOfWeek vbThursday =3D
FirstDayOfWeek.Thursday;
+               public const FirstDayOfWeek vbFriday =3D
FirstDayOfWeek.Friday;
+               public const FirstDayOfWeek vbSaturday =3D
FirstDayOfWeek.Saturday;
+
+               public const FileAttribute vbNormal =3D
FileAttribute.Normal;
+               public const FileAttribute vbReadOnly =3D
FileAttribute.ReadOnly;
+               public const FileAttribute vbHidden =3D
FileAttribute.Hidden;
+               public const FileAttribute vbSystem =3D
FileAttribute.System;
+               public const FileAttribute vbVolume =3D
FileAttribute.Volume;
+               public const FileAttribute vbDirectory =3D
FileAttribute.Directory;
+               public const FileAttribute vbArchive =3D
FileAttribute.Archive;
+
+               public const FirstWeekOfYear vbUseSystem =3D
FirstWeekOfYear.System;
+               public const FirstWeekOfYear vbFirstJan1 =3D
FirstWeekOfYear.Jan1;
+               public const FirstWeekOfYear vbFirstFourDays =3D
FirstWeekOfYear.FirstFourDays;
+               public const FirstWeekOfYear vbFirstFullWeek =3D
FirstWeekOfYear.FirstFullWeek;
+
+               public const VbStrConv vbUpperCase =3D
VbStrConv.UpperCase;
+               public const VbStrConv vbLowerCase =3D
VbStrConv.LowerCase;
+               public const VbStrConv vbProperCase =3D
VbStrConv.ProperCase;
+               public const VbStrConv vbWide =3D VbStrConv.Wide;
+               public const VbStrConv vbNarrow =3D VbStrConv.Narrow;
+               public const VbStrConv vbKatakana =3D =
VbStrConv.Katakana;
+               public const VbStrConv vbHiragana =3D =
VbStrConv.Hiragana;
+               public const VbStrConv vbSimplifiedChinese =3D
VbStrConv.SimplifiedChinese;
+               public const VbStrConv vbTraditionalChinese =3D
VbStrConv.TraditionalChinese;
+               public const VbStrConv vbLinguisticCasing =3D
VbStrConv.LinguisticCasing;
+
+               public const TriState vbUseDefault =3D
TriState.UseDefault;
+               public const TriState vbTrue =3D TriState.True;
+               public const TriState vbFalse =3D TriState.False;
+
+               public const VariantType vbEmpty =3D VariantType.Empty;
+               public const VariantType vbNull =3D VariantType.Null;
+               public const VariantType vbInteger =3D
VariantType.Integer;
+               public const VariantType vbLong =3D VariantType.Long;
+               public const VariantType vbSingle =3D =
VariantType.Single;
+               public const VariantType vbDouble =3D =
VariantType.Double;
+               public const VariantType vbCurrency =3D
VariantType.Currency;
+               public const VariantType vbDate =3D VariantType.Date;
+               public const VariantType vbString =3D =
VariantType.String;
+               public const VariantType vbObject =3D =
VariantType.Object;
+               public const VariantType vbBoolean =3D
VariantType.Boolean;
+               public const VariantType vbVariant =3D
VariantType.Variant;
+               public const VariantType vbDecimal =3D
VariantType.Decimal;
+               public const VariantType vbByte =3D VariantType.Byte;
+               public const VariantType vbUserDefinedType =3D
VariantType.UserDefinedType;
+               public const VariantType vbArray =3D VariantType.Array;
+
+               public const MsgBoxResult vbOK =3D MsgBoxResult.OK;
+               public const MsgBoxResult vbCancel =3D
MsgBoxResult.Cancel;
+               public const MsgBoxResult vbAbort =3D =
MsgBoxResult.Abort;
+               public const MsgBoxResult vbRetry =3D =
MsgBoxResult.Retry;
+               public const MsgBoxResult vbIgnore =3D
MsgBoxResult.Ignore;
+               public const MsgBoxResult vbYes =3D MsgBoxResult.Yes;
+               public const MsgBoxResult vbNo =3D MsgBoxResult.No;
+
+               public const MsgBoxStyle vbOKOnly =3D =
MsgBoxStyle.OKOnly;
+               public const MsgBoxStyle vbOKCancel =3D
MsgBoxStyle.OKCancel;
+               public const MsgBoxStyle vbAbortRetryIgnore =3D
MsgBoxStyle.AbortRetryIgnore;
+               public const MsgBoxStyle vbYesNoCancel =3D
MsgBoxStyle.YesNoCancel;
+               public const MsgBoxStyle vbYesNo =3D MsgBoxStyle.YesNo;
+               public const MsgBoxStyle vbRetryCancel =3D
MsgBoxStyle.RetryCancel;
+               public const MsgBoxStyle vbCritical =3D
MsgBoxStyle.Critical;
+               public const MsgBoxStyle vbQuestion =3D
MsgBoxStyle.Question;
+               public const MsgBoxStyle vbExclamation =3D
MsgBoxStyle.Exclamation;
+               public const MsgBoxStyle vbInformation =3D
MsgBoxStyle.Information;
+               public const MsgBoxStyle vbDefaultButton1 =3D
MsgBoxStyle.DefaultButton1;
+               public const MsgBoxStyle vbDefaultButton2 =3D
MsgBoxStyle.DefaultButton2;
+               public const MsgBoxStyle vbDefaultButton3 =3D
MsgBoxStyle.DefaultButton3;
+               public const MsgBoxStyle vbApplicationModal =3D
MsgBoxStyle.ApplicationModal;
+               public const MsgBoxStyle vbSystemModal =3D
MsgBoxStyle.SystemModal;
+               public const MsgBoxStyle vbMsgBoxHelp =3D
MsgBoxStyle.MsgBoxHelp;
+               public const MsgBoxStyle vbMsgBoxRight =3D
MsgBoxStyle.MsgBoxRight;
+               public const MsgBoxStyle vbMsgBoxRtlReading =3D
MsgBoxStyle.MsgBoxRtlReading;
+               public const MsgBoxStyle vbMsgBoxSetForeground =3D
MsgBoxStyle.MsgBoxSetForeground;
+
+               // Constructors
+               // Properties
+               // Methods
+               // Events
+       };
+}

Index: ChangeLog
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file:
/cvs/public/mcs/class/Microsoft.VisualBasic/Microsoft.VisualBasic/Change
Log,v
retrieving revision 1.43
retrieving revision 1.43.2.1
diff -u -d -r1.43 -r1.43.2.1
--- ChangeLog   24 Jun 2004 16:56:07 -0000      1.43
+++ ChangeLog   22 Jul 2004 04:39:48 -0000      1.43.2.1
@@ -1,3 +1,8 @@
+2004-07-22  Jambunathan K  <kjambunathan@novell.com>
+
+       * Constants.cs: Fixed definitions of vbCr, vbLf, vbCrLf and
+       vbNewLine
+
 2004-06-24  Jambunathan K  <kjambunathan@novell.com>
        * RandomVBFile.cs: Fixed FileGet() for Date and Decimal types
        * FileSystem.cs: Fixed ChDir, FileCopy

_______________________________________________
Mono-patches maillist  -  Mono-patches@ximian.com
http://lists.ximian.com/mailman/listinfo/mono-patches




------_=_NextPart_001_01C470BB.DB0E7B40
Content-Type: text/html;
	charset="us-ascii"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML xmlns=3D"http://www.w3.org/TR/REC-html40" xmlns:v =3D=20
"urn:schemas-microsoft-com:vml" xmlns:o =3D=20
"urn:schemas-microsoft-com:office:office" xmlns:w =3D=20
"urn:schemas-microsoft-com:office:word"><HEAD><TITLE>[Mono-patches] =
mcs/class/Microsoft.VisualBasic/Microsoft.VisualBasic =
Constants.cs,1.5,1.5.2.1 ChangeLog,1.43,1.43.2.1</TITLE>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Dus-ascii">
<META content=3D"MSHTML 6.00.2800.1400" name=3DGENERATOR><!--[if !mso]>
<STYLE>v\:* {
	BEHAVIOR: url(#default#VML)
}
o\:* {
	BEHAVIOR: url(#default#VML)
}
w\:* {
	BEHAVIOR: url(#default#VML)
}
.shape {
	BEHAVIOR: url(#default#VML)
}
</STYLE>
<![endif]-->
<STYLE>@font-face {
	font-family: Tahoma;
}
@page Section1 {size: 8.5in 11.0in; margin: 1.0in 1.25in 1.0in 1.25in; }
P.MsoNormal {
	FONT-SIZE: 12pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Times New Roman"
}
LI.MsoNormal {
	FONT-SIZE: 12pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Times New Roman"
}
DIV.MsoNormal {
	FONT-SIZE: 12pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Times New Roman"
}
A:link {
	COLOR: blue; TEXT-DECORATION: underline
}
SPAN.MsoHyperlink {
	COLOR: blue; TEXT-DECORATION: underline
}
A:visited {
	COLOR: blue; TEXT-DECORATION: underline
}
SPAN.MsoHyperlinkFollowed {
	COLOR: blue; TEXT-DECORATION: underline
}
P.MsoPlainText {
	FONT-SIZE: 10pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Courier New"
}
LI.MsoPlainText {
	FONT-SIZE: 10pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Courier New"
}
DIV.MsoPlainText {
	FONT-SIZE: 10pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Courier New"
}
P.MsoAutoSig {
	FONT-SIZE: 12pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Times New Roman"
}
LI.MsoAutoSig {
	FONT-SIZE: 12pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Times New Roman"
}
DIV.MsoAutoSig {
	FONT-SIZE: 12pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Times New Roman"
}
P {
	FONT-SIZE: 12pt; MARGIN-LEFT: 0in; MARGIN-RIGHT: 0in; FONT-FAMILY: =
"Times New Roman"; mso-margin-top-alt: auto; mso-margin-bottom-alt: auto
}
SPAN.EmailStyle18 {
	COLOR: navy; FONT-FAMILY: Arial; mso-style-type: personal-reply
}
DIV.Section1 {
	page: Section1
}
</STYLE>
<!--[if gte mso 9]><xml>
 <o:shapedefaults v:ext=3D"edit" spidmax=3D"1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
 <o:shapelayout v:ext=3D"edit">
  <o:idmap v:ext=3D"edit" data=3D"1" />
 </o:shapelayout></xml><![endif]--></HEAD>
<BODY lang=3DEN-US vLink=3Dblue link=3Dblue>
<DIV dir=3Dltr align=3Dleft><SPAN class=3D341504513-23072004><FONT =
face=3DArial=20
color=3D#0000ff size=3D2>Hi!</FONT></SPAN></DIV>
<DIV dir=3Dltr align=3Dleft><SPAN class=3D341504513-23072004><FONT =
face=3DArial=20
color=3D#0000ff size=3D2></FONT></SPAN>&nbsp;</DIV>
<DIV dir=3Dltr align=3Dleft><SPAN class=3D341504513-23072004><FONT =
face=3DArial=20
color=3D#0000ff size=3D2>How could we copy the value and behaviour of=20
System.Environment.NewLine into our VB class as =
best?</FONT></SPAN></DIV>
<DIV dir=3Dltr align=3Dleft><SPAN class=3D341504513-23072004><FONT =
face=3DArial=20
color=3D#0000ff size=3D2></FONT></SPAN>&nbsp;</DIV>
<DIV dir=3Dltr align=3Dleft><SPAN class=3D341504513-23072004><FONT =
face=3DArial=20
color=3D#0000ff size=3D2>I've seen in =
/mcs/class/corlib/System/Environment.cs the=20
following implementation:</FONT></SPAN></DIV>
<DIV dir=3Dltr align=3Dleft><SPAN class=3D341504513-23072004><FONT =
face=3DArial=20
color=3D#0000ff size=3D2><FONT=20
face=3D"Courier =
New">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp;&nbsp;&nbsp;&nbsp;=20
///=20
&lt;summary&gt;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
/// Gets the standard new line=20
value<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;=20
///=20
&lt;/summary&gt;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
public extern static string NewLine=20
{<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
[MethodImplAttribute=20
(MethodImplOptions.InternalCall)]<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
get;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;&nbsp;&nbsp;=20
}</FONT><BR></FONT></SPAN></DIV>
<DIV><SPAN class=3D341504513-23072004></SPAN><FONT face=3DArial><FONT=20
color=3D#0000ff><FONT=20
size=3D2>And&nbsp;now&nbsp;I'm&nbsp;a&nbsp;little&nbsp;bit&nbsp;confused.=
..</FONT></FONT></FONT></DIV>
<DIV><FONT face=3DArial><FONT color=3D#0000ff><FONT=20
size=3D2></FONT></FONT></FONT>&nbsp;</DIV>
<DIV><SPAN class=3D341504513-23072004><FONT face=3DArial color=3D#0000ff =
size=3D2>This=20
doesn't work (compilation errors because not a constant,=20
sure):</FONT></SPAN></DIV>
<BLOCKQUOTE dir=3Dltr style=3D"MARGIN-RIGHT: 0px">
  <DIV><SPAN class=3D341504513-23072004><FONT face=3D"Courier New" =
color=3D#0000ff=20
  size=3D2>namespace Microsoft.VisualBasic=20
  {<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; sealed public class=20
  ControlChars=20
  =
{<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp;&nbsp;&nbsp;&nbsp;=20
  //=20
  =
Declarations<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
  public const System.String CrLf =3D=20
  =
"\n\r";<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
  public const System.String NewLine =3D=20
  System.Environment.NewLine;&nbsp;</FONT></SPAN></DIV>
  <DIV><SPAN class=3D341504513-23072004><FONT color=3D#0000ff =
size=3D2><FONT=20
  face=3D"Courier =
New">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp;&nbsp;&nbsp;&nbsp;=20
  public const System.Char Cr =3D=20
  =
'\n';<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;=20
  public const System.Char Lf =3D=20
  =
'\r';<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;=20
  public const System.Char Back =3D=20
'\b';<BR></FONT></DIV></BLOCKQUOTE></FONT></SPAN>
<DIV><FONT><FONT><FONT face=3DArial><FONT color=3D#0000ff><FONT =
size=3D2>R<SPAN=20
class=3D341504513-23072004>egards</SPAN></FONT></FONT></FONT></FONT></FON=
T></DIV>
<DIV><FONT><FONT><FONT face=3DArial><FONT color=3D#0000ff><FONT =
size=3D2><SPAN=20
class=3D341504513-23072004>Jochen</SPAN></FONT></FONT></FONT></FONT></FON=
T></DIV>
<DIV><BR></DIV>
<DIV class=3DOutlookMessageHeader lang=3Dde dir=3Dltr align=3Dleft>
<HR tabIndex=3D-1>
<FONT face=3DTahoma size=3D2><B>Von:</B> JD Conley =
[mailto:jconley@winfessor.com]=20
<BR><B>Gesendet:</B> Donnerstag, 22. Juli 2004 20:50<BR><B>An:</B> =
Jochen=20
Wezel<BR><B>Betreff:</B> RE: [mono-vb] vbNewLine to be platform=20
dependent?<BR></FONT><BR></DIV>
<DIV></DIV>
<DIV class=3DSection1>
<P class=3DMsoNormal><FONT face=3DArial color=3Dnavy size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; COLOR: navy; FONT-FAMILY: Arial">Check out the =

implementation for System.Environment.NewLine.&nbsp; You can probably =
just steal=20
that.&nbsp; It should be platform independent (I don&#8217;t have mcs =
source handy to=20
check).<o:p></o:p></SPAN></FONT></P>
<P class=3DMsoNormal><FONT face=3DArial color=3Dnavy size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; COLOR: navy; FONT-FAMILY: =
Arial"><o:p>&nbsp;</o:p></SPAN></FONT></P>
<P class=3DMsoNormal><FONT face=3D"Times New Roman" size=3D3><SPAN=20
style=3D"FONT-SIZE: 12pt">JD</SPAN></FONT><FONT face=3DArial =
color=3Dnavy size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; COLOR: navy; FONT-FAMILY: =
Arial"><o:p></o:p></SPAN></FONT></P>
<DIV>
<P class=3DMsoAutoSig><FONT face=3D"Times New Roman" color=3Dnavy =
size=3D3><SPAN=20
style=3D"FONT-SIZE: 12pt; COLOR: =
navy"><o:p>&nbsp;</o:p></SPAN></FONT></P></DIV>
<P class=3DMsoNormal><FONT face=3DArial color=3Dnavy size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; COLOR: navy; FONT-FAMILY: =
Arial"><o:p>&nbsp;</o:p></SPAN></FONT></P>
<DIV=20
style=3D"BORDER-RIGHT: medium none; PADDING-RIGHT: 0in; BORDER-TOP: =
medium none; PADDING-LEFT: 4pt; PADDING-BOTTOM: 0in; BORDER-LEFT: blue =
1.5pt solid; PADDING-TOP: 0in; BORDER-BOTTOM: medium none">
<DIV>
<DIV class=3DMsoNormal style=3D"TEXT-ALIGN: center" align=3Dcenter><FONT =

face=3D"Times New Roman" size=3D3><SPAN style=3D"FONT-SIZE: 12pt">
<HR tabIndex=3D-1 align=3Dcenter width=3D"100%" SIZE=3D2>
</SPAN></FONT></DIV>
<P class=3DMsoNormal><B><FONT face=3DTahoma size=3D2><SPAN=20
style=3D"FONT-WEIGHT: bold; FONT-SIZE: 10pt; FONT-FAMILY: =
Tahoma">From:</SPAN></FONT></B><FONT=20
face=3DTahoma size=3D2><SPAN style=3D"FONT-SIZE: 10pt; FONT-FAMILY: =
Tahoma"> Jochen=20
Wezel [mailto:jwezel@compumaster.de] <BR><B><SPAN=20
style=3D"FONT-WEIGHT: bold">Sent:</SPAN></B> Thursday, July 22, 2004 =
12:13=20
AM<BR><B><SPAN style=3D"FONT-WEIGHT: bold">To:</SPAN></B> Jambunathan =
Jambunathan=20
&lt;kjambunathan@novell.com&gt;; mono-vb@lists.ximian.com<BR><B><SPAN=20
style=3D"FONT-WEIGHT: bold">Subject:</SPAN></B> [mono-vb] vbNewLine to =
be platform=20
dependent?</SPAN></FONT><o:p></o:p></P></DIV>
<P class=3DMsoNormal><FONT face=3D"Times New Roman" size=3D3><SPAN=20
style=3D"FONT-SIZE: 12pt"><o:p>&nbsp;</o:p></SPAN></FONT></P>
<DIV id=3DidOWAReplyText39737>
<DIV>
<P class=3DMsoNormal><FONT face=3DArial color=3Dblack size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; COLOR: black; FONT-FAMILY: Arial">Hi =
Jambunathan and all=20
the other VB gurus!</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3D"Times New Roman" size=3D3><SPAN=20
style=3D"FONT-SIZE: 12pt">&nbsp;<o:p></o:p></SPAN></FONT></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3DArial size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: Arial">&gt; +namespace=20
Microsoft.VisualBasic {<BR>&gt; +&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
[Microsoft.VisualBasic.CompilerServices.StandardModuleAttribute]<BR>&gt; =

+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; sealed public class Constants =
{<BR>&gt;=20
+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
// Declarations<BR>&gt; +&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.Int32=20
vbObjectError =3D (System.Int32)(-2147221504);<BR>&gt;=20
+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
public const System.String vbCrLf =3D "\r\n";<BR>&gt;=20
+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
public const System.String vbNewLine =3D "\r\n";<BR>&gt;=20
+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
public const System.String vbCr =3D "\r";<BR>&gt;=20
+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
public const System.String vbLf =3D =
"\n";</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3DArial size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: Arial">I would prefer to see=20
the&nbsp;constant vbNewLine to be a platform dependent line=20
break.</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3D"Times New Roman" size=3D3><SPAN=20
style=3D"FONT-SIZE: 12pt">&nbsp;<o:p></o:p></SPAN></FONT></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3DArial size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: Arial">(If I remember correctly, =
Microsoft=20
itself was telling in the tooltip text/intellisense of this constant, =
that this=20
vbnewline&nbsp;was intended to be the the platform dependent line =
break.)=20
</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3D"Times New Roman" size=3D3><SPAN=20
style=3D"FONT-SIZE: 12pt">&nbsp;<o:p></o:p></SPAN></FONT></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3DArial size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: Arial">Certainly, the test case =
for this=20
constant had to be fixed, too.</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3DArial size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: Arial">That's why I recommend =
something=20
like that.</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3D"Courier New" size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: 'Courier New'"># if =
PLATFORM_LINUX=20
{</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3D"Courier New" size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: 'Courier =
New'">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;=20
public const System.String vbNewLine =3D "\n";<BR># } else if =
PLATFORM_UNIX=20
{</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3D"Courier New" size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: 'Courier =
New'">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;=20
public const System.String vbNewLine =3D "\n";<BR># } else if =
PLATFORM_MAC=20
{</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3D"Courier New" size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: 'Courier =
New'">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;=20
public const System.String vbNewLine =3D "\r";<BR># } else { //=20
PLATFORM_WINDOWS</SPAN></FONT><o:p></o:p></P></DIV></DIV></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3D"Courier New" size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: 'Courier =
New'">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;=20
public const System.String vbNewLine =3D "\r\n";<BR>#=20
}</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3D"Times New Roman" size=3D3><SPAN=20
style=3D"FONT-SIZE: 12pt">&nbsp;<o:p></o:p></SPAN></FONT></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3DArial size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: Arial">What do you think=20
about?</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3D"Times New Roman" size=3D3><SPAN=20
style=3D"FONT-SIZE: 12pt">&nbsp;<o:p></o:p></SPAN></FONT></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3DArial size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: =
Arial">Regards</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<P class=3DMsoNormal><FONT face=3DArial size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt; FONT-FAMILY: =
Arial">Jochen</SPAN></FONT><o:p></o:p></P></DIV>
<P class=3DMsoNormal><FONT face=3D"Times New Roman" size=3D3><SPAN=20
style=3D"FONT-SIZE: 12pt"><o:p>&nbsp;</o:p></SPAN></FONT></P></DIV>
<DIV>
<DIV class=3DMsoNormal style=3D"TEXT-ALIGN: center" align=3Dcenter><FONT =

face=3D"Times New Roman" size=3D3><SPAN style=3D"FONT-SIZE: 12pt">
<HR tabIndex=3D-1 align=3Dcenter width=3D"100%" SIZE=3D2>
</SPAN></FONT></DIV></DIV>
<DIV>
<P class=3DMsoNormal style=3D"MARGIN-BOTTOM: 12pt"><B><FONT =
face=3DTahoma size=3D2><SPAN=20
style=3D"FONT-WEIGHT: bold; FONT-SIZE: 10pt; FONT-FAMILY: =
Tahoma">Von:</SPAN></FONT></B><FONT=20
face=3DTahoma size=3D2><SPAN style=3D"FONT-SIZE: 10pt; FONT-FAMILY: =
Tahoma">=20
mono-patches-admin@ximian.com im Auftrag von Jambunathan Jambunathan=20
&lt;kjambunathan@novell.com&gt;<BR><B><SPAN=20
style=3D"FONT-WEIGHT: bold">Gesendet:</SPAN></B> Do 22.07.2004 =
06:39<BR><B><SPAN=20
style=3D"FONT-WEIGHT: bold">An:</SPAN></B>=20
mono-patches@lists.ximian.com<BR><B><SPAN=20
style=3D"FONT-WEIGHT: bold">Betreff:</SPAN></B> [Mono-patches]=20
mcs/class/Microsoft.VisualBasic/Microsoft.VisualBasic =
Constants.cs,1.5,1.5.2.1=20
ChangeLog,1.43,1.43.2.1</SPAN></FONT><o:p></o:p></P></DIV>
<DIV>
<P style=3D"MARGIN-BOTTOM: 12pt"><FONT face=3D"Times New Roman" =
size=3D2><SPAN=20
style=3D"FONT-SIZE: 10pt">Update of=20
/cvs/public/mcs/class/Microsoft.VisualBasic/Microsoft.VisualBasic<BR>In=20
directory mono-cvs.ximian.com:/tmp/cvs-serv9235<BR><BR>Modified=20
Files:<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Tag:=20
mono-1-0<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Constants.cs=20
ChangeLog<BR>Log Message:<BR>Fixed definitions of vbCr, vbLf, vbCrLf=20
and<BR>vbNewLine<BR><BR><BR>Index:=20
Constants.cs<BR>=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D<BR>=
RCS=20
file:=20
/cvs/public/mcs/class/Microsoft.VisualBasic/Microsoft.VisualBasic/Constan=
ts.cs,v<BR>retrieving=20
revision 1.5<BR>retrieving revision 1.5.2.1<BR>diff -u -d -r1.5 =
-r1.5.2.1<BR>---=20
Constants.cs&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 24 Jun 2004 =
14:06:50=20
-0000&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 1.5<BR>+++=20
Constants.cs&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 22 Jul 2004 =
04:39:48=20
-0000&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 1.5.2.1<BR>@@ -1,11 +1,11 =
@@<BR>-//<BR>-//=20
Constants.cs<BR>-//<BR>-// Author:<BR>-//&nbsp;&nbsp; Chris J Breisch=20
(cjbreisch@altavista.net)<BR>-//<BR>-// (C) 2002 Chris J=20
Breisch<BR>-//<BR>+//<BR>+// Constants.cs<BR>+//<BR>+//=20
Author:<BR>+//&nbsp;&nbsp; Chris J Breisch=20
(cjbreisch@altavista.net)<BR>+//<BR>+// (C) 2002 Chris J=20
Breisch<BR>+//<BR><BR>&nbsp;//<BR>&nbsp;// Copyright (c) 2002-2003 =
Mainsoft=20
Corporation.<BR>@@ -30,131 +30,131 @@<BR>&nbsp;// OF CONTRACT, TORT OR=20
OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION<BR>&nbsp;// WITH THE =
SOFTWARE=20
OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.<BR>&nbsp;//<BR>-<BR>-using =

System;<BR>-<BR>-namespace Microsoft.VisualBasic=20
{<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
[Microsoft.VisualBasic.CompilerServices.StandardModuleAttribute]<BR>-&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
sealed public class Constants {<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //=20
Declarations<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.Int32=20
vbObjectError =3D=20
(System.Int32)(-2147221504);<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbCrLf =3D=20
"\n\r";<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbNewLine=20
=3D "\n\r";<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbCr =3D=20
"\n";<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbLf =3D=20
"\r";<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbBack =3D=20
"\b";<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbFormFeed=20
=3D "\f";<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbTab =3D=20
"\t";<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String=20
vbVerticalTab =3D "\v";<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbNullChar=20
=3D "\0";<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String=20
vbNullString =3D "";<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const AppWinStyle =
vbHide =3D=20
AppWinStyle.Hide;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const AppWinStyle=20
vbNormalFocus =3D=20
AppWinStyle.NormalFocus;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const AppWinStyle=20
vbMinimizedFocus =3D=20
AppWinStyle.MinimizedFocus;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const AppWinStyle=20
vbMaximizedFocus =3D=20
AppWinStyle.MaximizedFocus;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const AppWinStyle=20
vbNormalNoFocus =3D=20
AppWinStyle.NormalNoFocus;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const AppWinStyle=20
vbMinimizedNoFocus =3D=20
AppWinStyle.MinimizedNoFocus;<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const CallType =
vbMethod =3D=20
CallType.Method;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const CallType vbGet =
=3D=20
CallType.Get;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const CallType vbLet =
=3D=20
CallType.Let;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const CallType vbSet =
=3D=20
CallType.Set;<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const CompareMethod=20
vbBinaryCompare =3D =
CompareMethod.Binary;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const CompareMethod=20
vbTextCompare =3D=20
CompareMethod.Text;<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const DateFormat =
vbGeneralDate=20
=3D DateFormat.GeneralDate;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const DateFormat =
vbLongDate =3D=20
DateFormat.LongDate;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const DateFormat =
vbShortDate =3D=20
DateFormat.ShortDate;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const DateFormat =
vbLongTime =3D=20
DateFormat.LongTime;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const DateFormat =
vbShortTime =3D=20
DateFormat.ShortTime;<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek=20
vbUseSystemDayOfWeek =3D=20
FirstDayOfWeek.System;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek =
vbSunday=20
=3D FirstDayOfWeek.Sunday;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek =
vbMonday=20
=3D FirstDayOfWeek.Monday;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek =
vbTuesday=20
=3D FirstDayOfWeek.Tuesday;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek=20
vbWednesday =3D =
FirstDayOfWeek.Wednesday;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek=20
vbThursday =3D =
FirstDayOfWeek.Thursday;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek =
vbFriday=20
=3D FirstDayOfWeek.Friday;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek=20
vbSaturday =3D=20
FirstDayOfWeek.Saturday;<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute =
vbNormal =3D=20
FileAttribute.Normal;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute =
vbReadOnly=20
=3D FileAttribute.ReadOnly;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute =
vbHidden =3D=20
FileAttribute.Hidden;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute =
vbSystem =3D=20
FileAttribute.System;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute =
vbVolume =3D=20
FileAttribute.Volume;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute=20
vbDirectory =3D =
FileAttribute.Directory;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute =
vbArchive=20
=3D FileAttribute.Archive;<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstWeekOfYear=20
vbUseSystem =3D =
FirstWeekOfYear.System;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstWeekOfYear=20
vbFirstJan1 =3D =
FirstWeekOfYear.Jan1;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstWeekOfYear=20
vbFirstFourDays =3D=20
FirstWeekOfYear.FirstFourDays;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstWeekOfYear=20
vbFirstFullWeek =3D=20
FirstWeekOfYear.FirstFullWeek;<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv =
vbUpperCase =3D=20
VbStrConv.UpperCase;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv =
vbLowerCase =3D=20
VbStrConv.LowerCase;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv =
vbProperCase =3D=20
VbStrConv.ProperCase;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv vbWide =
=3D=20
VbStrConv.Wide;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv =
vbNarrow =3D=20
VbStrConv.Narrow;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv =
vbKatakana =3D=20
VbStrConv.Katakana;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv =
vbHiragana =3D=20
VbStrConv.Hiragana;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv=20
vbSimplifiedChinese =3D=20
VbStrConv.SimplifiedChinese;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv=20
vbTraditionalChinese =3D=20
VbStrConv.TraditionalChinese;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv=20
vbLinguisticCasing =3D=20
VbStrConv.LinguisticCasing;<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const TriState =
vbUseDefault =3D=20
TriState.UseDefault;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const TriState vbTrue =
=3D=20
TriState.True;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const TriState vbFalse =
=3D=20
TriState.False;<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbEmpty =3D=20
VariantType.Empty;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbNull =3D=20
VariantType.Null;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbInteger =3D=20
VariantType.Integer;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbLong =3D=20
VariantType.Long;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbSingle =3D=20
VariantType.Single;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbDouble =3D=20
VariantType.Double;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbCurrency =3D=20
VariantType.Currency;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbDate =3D=20
VariantType.Date;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbString =3D=20
VariantType.String;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbObject =3D=20
VariantType.Object;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbBoolean =3D=20
VariantType.Boolean;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbVariant =3D=20
VariantType.Variant;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbDecimal =3D=20
VariantType.Decimal;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbByte =3D=20
VariantType.Byte;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType=20
vbUserDefinedType =3D=20
VariantType.UserDefinedType;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbArray =3D=20
VariantType.Array;<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbOK =3D=20
MsgBoxResult.OK;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbCancel =3D=20
MsgBoxResult.Cancel;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbAbort =3D=20
MsgBoxResult.Abort;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbRetry =3D=20
MsgBoxResult.Retry;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbIgnore =3D=20
MsgBoxResult.Ignore;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbYes =3D=20
MsgBoxResult.Yes;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbNo =3D=20
MsgBoxResult.No;<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle =
vbOKOnly =3D=20
MsgBoxStyle.OKOnly;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle =
vbOKCancel =3D=20
MsgBoxStyle.OKCancel;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbAbortRetryIgnore =3D=20
MsgBoxStyle.AbortRetryIgnore;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbYesNoCancel =3D=20
MsgBoxStyle.YesNoCancel;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle =
vbYesNo =3D=20
MsgBoxStyle.YesNo;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbRetryCancel =3D=20
MsgBoxStyle.RetryCancel;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle =
vbCritical =3D=20
MsgBoxStyle.Critical;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle =
vbQuestion =3D=20
MsgBoxStyle.Question;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbExclamation =3D=20
MsgBoxStyle.Exclamation;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbInformation =3D=20
MsgBoxStyle.Information;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbDefaultButton1 =3D=20
MsgBoxStyle.DefaultButton1;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbDefaultButton2 =3D=20
MsgBoxStyle.DefaultButton2;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbDefaultButton3 =3D=20
MsgBoxStyle.DefaultButton3;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbApplicationModal =3D=20
MsgBoxStyle.ApplicationModal;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbSystemModal =3D=20
MsgBoxStyle.SystemModal;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle =
vbMsgBoxHelp=20
=3D MsgBoxStyle.MsgBoxHelp;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbMsgBoxRight =3D=20
MsgBoxStyle.MsgBoxRight;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbMsgBoxRtlReading =3D=20
MsgBoxStyle.MsgBoxRtlReading;<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbMsgBoxSetForeground =3D=20
MsgBoxStyle.MsgBoxSetForeground;<BR>-<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //=20
Constructors<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //=20
Properties<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //=20
Methods<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //=20
Events<BR>-&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; };<BR>-}<BR>+<BR>+using=20
System;<BR>+<BR>+namespace Microsoft.VisualBasic=20
{<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
[Microsoft.VisualBasic.CompilerServices.StandardModuleAttribute]<BR>+&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
sealed public class Constants {<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //=20
Declarations<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.Int32=20
vbObjectError =3D=20
(System.Int32)(-2147221504);<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbCrLf =3D=20
"\r\n";<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbNewLine=20
=3D "\r\n";<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbCr =3D=20
"\r";<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbLf =3D=20
"\n";<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbBack =3D=20
"\b";<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbFormFeed=20
=3D "\f";<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbTab =3D=20
"\t";<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String=20
vbVerticalTab =3D "\v";<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String =
vbNullChar=20
=3D "\0";<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const System.String=20
vbNullString =3D "";<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const AppWinStyle =
vbHide =3D=20
AppWinStyle.Hide;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const AppWinStyle=20
vbNormalFocus =3D=20
AppWinStyle.NormalFocus;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const AppWinStyle=20
vbMinimizedFocus =3D=20
AppWinStyle.MinimizedFocus;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const AppWinStyle=20
vbMaximizedFocus =3D=20
AppWinStyle.MaximizedFocus;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const AppWinStyle=20
vbNormalNoFocus =3D=20
AppWinStyle.NormalNoFocus;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const AppWinStyle=20
vbMinimizedNoFocus =3D=20
AppWinStyle.MinimizedNoFocus;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const CallType =
vbMethod =3D=20
CallType.Method;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const CallType vbGet =
=3D=20
CallType.Get;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const CallType vbLet =
=3D=20
CallType.Let;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const CallType vbSet =
=3D=20
CallType.Set;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const CompareMethod=20
vbBinaryCompare =3D =
CompareMethod.Binary;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const CompareMethod=20
vbTextCompare =3D=20
CompareMethod.Text;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const DateFormat =
vbGeneralDate=20
=3D DateFormat.GeneralDate;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const DateFormat =
vbLongDate =3D=20
DateFormat.LongDate;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const DateFormat =
vbShortDate =3D=20
DateFormat.ShortDate;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const DateFormat =
vbLongTime =3D=20
DateFormat.LongTime;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const DateFormat =
vbShortTime =3D=20
DateFormat.ShortTime;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek=20
vbUseSystemDayOfWeek =3D=20
FirstDayOfWeek.System;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek =
vbSunday=20
=3D FirstDayOfWeek.Sunday;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek =
vbMonday=20
=3D FirstDayOfWeek.Monday;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek =
vbTuesday=20
=3D FirstDayOfWeek.Tuesday;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek=20
vbWednesday =3D =
FirstDayOfWeek.Wednesday;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek=20
vbThursday =3D =
FirstDayOfWeek.Thursday;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek =
vbFriday=20
=3D FirstDayOfWeek.Friday;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstDayOfWeek=20
vbSaturday =3D=20
FirstDayOfWeek.Saturday;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute =
vbNormal =3D=20
FileAttribute.Normal;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute =
vbReadOnly=20
=3D FileAttribute.ReadOnly;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute =
vbHidden =3D=20
FileAttribute.Hidden;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute =
vbSystem =3D=20
FileAttribute.System;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute =
vbVolume =3D=20
FileAttribute.Volume;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute=20
vbDirectory =3D =
FileAttribute.Directory;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FileAttribute =
vbArchive=20
=3D FileAttribute.Archive;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstWeekOfYear=20
vbUseSystem =3D =
FirstWeekOfYear.System;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstWeekOfYear=20
vbFirstJan1 =3D =
FirstWeekOfYear.Jan1;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstWeekOfYear=20
vbFirstFourDays =3D=20
FirstWeekOfYear.FirstFourDays;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const FirstWeekOfYear=20
vbFirstFullWeek =3D=20
FirstWeekOfYear.FirstFullWeek;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv =
vbUpperCase =3D=20
VbStrConv.UpperCase;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv =
vbLowerCase =3D=20
VbStrConv.LowerCase;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv =
vbProperCase =3D=20
VbStrConv.ProperCase;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv vbWide =
=3D=20
VbStrConv.Wide;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv =
vbNarrow =3D=20
VbStrConv.Narrow;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv =
vbKatakana =3D=20
VbStrConv.Katakana;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv =
vbHiragana =3D=20
VbStrConv.Hiragana;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv=20
vbSimplifiedChinese =3D=20
VbStrConv.SimplifiedChinese;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv=20
vbTraditionalChinese =3D=20
VbStrConv.TraditionalChinese;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VbStrConv=20
vbLinguisticCasing =3D=20
VbStrConv.LinguisticCasing;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const TriState =
vbUseDefault =3D=20
TriState.UseDefault;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const TriState vbTrue =
=3D=20
TriState.True;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const TriState vbFalse =
=3D=20
TriState.False;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbEmpty =3D=20
VariantType.Empty;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbNull =3D=20
VariantType.Null;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbInteger =3D=20
VariantType.Integer;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbLong =3D=20
VariantType.Long;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbSingle =3D=20
VariantType.Single;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbDouble =3D=20
VariantType.Double;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbCurrency =3D=20
VariantType.Currency;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbDate =3D=20
VariantType.Date;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbString =3D=20
VariantType.String;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbObject =3D=20
VariantType.Object;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbBoolean =3D=20
VariantType.Boolean;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbVariant =3D=20
VariantType.Variant;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbDecimal =3D=20
VariantType.Decimal;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbByte =3D=20
VariantType.Byte;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType=20
vbUserDefinedType =3D=20
VariantType.UserDefinedType;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const VariantType =
vbArray =3D=20
VariantType.Array;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbOK =3D=20
MsgBoxResult.OK;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbCancel =3D=20
MsgBoxResult.Cancel;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbAbort =3D=20
MsgBoxResult.Abort;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbRetry =3D=20
MsgBoxResult.Retry;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbIgnore =3D=20
MsgBoxResult.Ignore;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbYes =3D=20
MsgBoxResult.Yes;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxResult =
vbNo =3D=20
MsgBoxResult.No;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle =
vbOKOnly =3D=20
MsgBoxStyle.OKOnly;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle =
vbOKCancel =3D=20
MsgBoxStyle.OKCancel;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbAbortRetryIgnore =3D=20
MsgBoxStyle.AbortRetryIgnore;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbYesNoCancel =3D=20
MsgBoxStyle.YesNoCancel;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle =
vbYesNo =3D=20
MsgBoxStyle.YesNo;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbRetryCancel =3D=20
MsgBoxStyle.RetryCancel;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle =
vbCritical =3D=20
MsgBoxStyle.Critical;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle =
vbQuestion =3D=20
MsgBoxStyle.Question;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbExclamation =3D=20
MsgBoxStyle.Exclamation;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbInformation =3D=20
MsgBoxStyle.Information;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbDefaultButton1 =3D=20
MsgBoxStyle.DefaultButton1;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbDefaultButton2 =3D=20
MsgBoxStyle.DefaultButton2;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbDefaultButton3 =3D=20
MsgBoxStyle.DefaultButton3;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbApplicationModal =3D=20
MsgBoxStyle.ApplicationModal;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbSystemModal =3D=20
MsgBoxStyle.SystemModal;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle =
vbMsgBoxHelp=20
=3D MsgBoxStyle.MsgBoxHelp;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbMsgBoxRight =3D=20
MsgBoxStyle.MsgBoxRight;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbMsgBoxRtlReading =3D=20
MsgBoxStyle.MsgBoxRtlReading;<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; public const MsgBoxStyle=20
vbMsgBoxSetForeground =3D=20
MsgBoxStyle.MsgBoxSetForeground;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //=20
Constructors<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //=20
Properties<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //=20
Methods<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //=20
Events<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; };<BR>+}<BR><BR>Index:=20
ChangeLog<BR>=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D<BR>RCS=
=20
file:=20
/cvs/public/mcs/class/Microsoft.VisualBasic/Microsoft.VisualBasic/ChangeL=
og,v<BR>retrieving=20
revision 1.43<BR>retrieving revision 1.43.2.1<BR>diff -u -d -r1.43=20
-r1.43.2.1<BR>--- ChangeLog&nbsp;&nbsp; 24 Jun 2004 16:56:07=20
-0000&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 1.43<BR>+++ ChangeLog&nbsp;&nbsp; 22 =
Jul=20
2004 04:39:48 -0000&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 1.43.2.1<BR>@@ -1,3 =
+1,8=20
@@<BR>+2004-07-22&nbsp; Jambunathan K&nbsp;=20
&lt;kjambunathan@novell.com&gt;<BR>+<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp; *=20
Constants.cs: Fixed definitions of vbCr, vbLf, vbCrLf=20
and<BR>+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=20
vbNewLine<BR>+<BR>&nbsp;2004-06-24&nbsp; Jambunathan K&nbsp;=20
&lt;kjambunathan@novell.com&gt;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp; *=20
RandomVBFile.cs: Fixed FileGet() for Date and Decimal=20
types<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; * FileSystem.cs: =
Fixed=20
ChDir,=20
FileCopy<BR><BR>_______________________________________________<BR>Mono-p=
atches=20
maillist&nbsp; -&nbsp; Mono-patches@ximian.com<BR><A=20
href=3D"http://lists.ximian.com/mailman/listinfo/mono-patches">http://lis=
ts.ximian.com/mailman/listinfo/mono-patches</A><BR><BR></SPAN></FONT><o:p=
></o:p></P></DIV></DIV></DIV></BODY></HTML>

------_=_NextPart_001_01C470BB.DB0E7B40--