universaleditor/editor-legacy
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Start to implement properties in VB

Browse Source
This commit is contained in:
Michael Becker 2016-06-07 01:26:27 -04:00
parent 646fc5e951
commit 6426d82a6a
1 changed files with 21 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
CSharp/Plugins/UniversalEditor.Plugins.SoftwareDevelopment/DataFormats/SourceCode/VisualBasicNETCodeDataFormat.cs
View File

@ -1032,6 +1032,22 @@ namespace UniversalEditor.DataFormats.SourceCode
}
sb.Append(")");
sb.Append(" As " + MakeFriendlyDataType(propertyEl.DataType));
sb.AppendLine ();
sb.Append (GetIndentString (indentCount + 1));
sb.AppendLine ("Get");
sb.Append (GetIndentString (indentCount + 1));
sb.Append ("End Get");
sb.AppendLine ();
sb.Append (GetIndentString (indentCount + 1));
sb.AppendLine ("Set");
sb.Append (GetIndentString (indentCount + 1));
sb.Append ("End Set");
sb.AppendLine ();
sb.Append (indent);
sb.Append ("End Property");
}
else if (obj is CodeVariableElement)
{
@ -1055,7 +1071,10 @@ namespace UniversalEditor.DataFormats.SourceCode
sb.Append(indent);
CodeEnumerationElement enumEL = (obj as CodeEnumerationElement);
sb.Append(GenerateCode(enumEL.AccessModifiers));
sb.AppendLine(" Enum " + enumEL.Name);
if (enumEL.AccessModifiers != CodeAccessModifiers.None) {
sb.Append (" ");
}
sb.AppendLine("Enum " + enumEL.Name);
string indent2 = GetIndentString(indentCount + 1);
foreach (CodeEnumerationValue value in enumEL.Values)
@ -1178,6 +1197,7 @@ namespace UniversalEditor.DataFormats.SourceCode
string[] commentLines = comment.Content.Split(new string[] { System.Environment.NewLine }, StringSplitOptions.None);
foreach (string commentLine in commentLines)
{
sb.Append (indent);
if (comment.IsDocumentationComment)
{
sb.Append("''' ");