.NET
-
Entity 구별카테고리 없음 2015. 12. 12. 23:00
Public Sub EntityType() Dim ed As Editor = Application.DocumentManager.MdiActiveDocument.Editor Dim db As Database = ed.Document.Database Dim promptSelectionResult As PromptSelectionResult = ed.GetSelection() If promptSelectionResult.Status = PromptStatus.OK Then Dim selectionSet As SelectionSet = promptSelectionResult.Value Using acTrans As Transaction = ed.Document.TransactionManager.StartTran..
-
확장 메서드(Visual Basic)카테고리 없음 2015. 12. 12. 12:56
확장메서드 선언 Imports System.Runtime.CompilerServices Module StringExtension Public Sub Print(ByVal aString As String) Console.WriteLine(aString) End Sub Public Sub PrintAndPunctuate(ByVal aString As String, ByVal punc As String) Console.WriteLine(aString & punc) End Sub End Module본문 Module Module1 Sub Main() Dim example As String = "Example string" example.Print() example.ToUpper().Print() example.P..
-
포인트 정렬2카테고리 없음 2015. 12. 10. 22:37
Imports System.Drawing Imports System.Collections.Generic Module Module1 Public Structure Man Dim Name As String Dim Age As Integer End Structure Sub Main() Dim dict As New Dictionary(Of PointF, Man) For i As Integer = 0 To 2 Dim pt As PointF = New PointF(i * 2, i * 3) Dim aMan As Man = New Man() aMan.Name = "Sam " + i.ToString aMan.Age = (i + 1) * 10 dict.Add(pt, aMan) Next Dim sortDict = (From..
-
AutoCAD .NET Developer's Guidecoding/AutoCAD .NET 2015. 12. 9. 21:05
AutoCAD .NET Developer's Guide