한 문장으로 코드를 작성하는 데 더 많은 오버 헤드가 있습니까?

Question

저는 VB.NET에 비교적 익숙하지 않으므로 프로그래밍에 대해 스스로 가르치므로 기초 지식과 개념이 많이 없으므로 제 솔직함과 무지를 변명하십시오.

VB 기능을 단계별로 또는 한 줄의 긴 코드로 작성하는 데있어 물류, 성능 및 효율성에 대해 궁금합니다.

다음은 일부 프로그램에서 HTML을 구문 분석하는 작은 함수입니다. 코드는 임의의 예제이며 두 코드 블록 모두 정확히 동일한 기능을 수행합니다. 여기에는 하나의 길고 간결한 코드와는 달리 길고 절차 적으로 선언 된 분열 된 코드의 요점을 설명하기 위해 여기에 나와 있습니다.

1. 긴 코드

   Dim html As String 
   Dim htmlString As String 
   Dim dIndex As Integer 
   html = WebBrowser.DocumentText 
   htmlString = "size=" & Chr(34) & "15" & Chr(34) & " maxlength=" & Chr(34) & "40" & Chr(34) & ">" 
   dIndex = html.IndexOf(htmlString) 
   If (dIndex > -1) Then 
       Dim lIndex As Integer 
       Dim sDomain As String 
       sDomain = html.Substring(dIndex + 26, 20) 
       lIndex = sDomain.IndexOf("<") 
       LblSubDomain.Text = sDomain.Substring(0, lIndex) 
   Else 
       LblSubDomain.Text = "Cannot Find Sub Domain Extension" 
   End If 
   

2. 짧은 코드

   If (WebBrowser.DocumentText.IndexOf("size=" & Chr(34) & "15" & Chr(34) & " maxlength=" & Chr(34) & "40" & Chr(34) & ">") > -1) Then 
       LblSubDomain.Text = WebBrowser.DocumentText.Substring(WebBrowser.DocumentText.IndexOf("size=" & Chr(34) & "15" & Chr(34) & " maxlength=" & Chr(34) & "40" & Chr(34) & ">") + 26, 20).Substring(0, WebBrowser.DocumentText.Substring(WebBrowser.DocumentText.IndexOf("size=" & Chr(34) & "15" & Chr(34) & " maxlength=" & Chr(34) & "40" & Chr(34) & ">") + 26, 20).IndexOf("<")) 
   Else 
       LblSubDomain.Text = "Cannot Find Sub Domain Extension" 
   End If 
   

내 질문은 : 성능에 최소한의 영향이 있거나 수행하는 코드의 두 블록의 VB2012 코드를 한 줄로 컴파일하면 아무런 차이가 없습니까?

너무 많은 너희들을 감사하고 내 질문은 스택 오버플로

의 기대

Answer 1

효과적으로 동일한 코드를, 성능 현명한 생산할 예정의 범위 내에 있기를 바랍니다. 이 비주얼 스튜디오 통해 분기점 쉽게 주사 가능 같은 유지 보수 및 디버깅 관점 옵션 # 1에서

훨씬 바람직하며 작은 각 라인 로직의 양으로 이해하는 것은 일반적으로 용이하다.

사실, 두 가지 옵션 사이의 행복 매체를 옹호을 부를 것이다 옵션 # 1.5 :

Dim html As String = WebBrowser.DocumentText 
Dim htmlString As String = "size=" & Chr(34) & "15" & Chr(34) & " maxlength=" & Chr(34) & "40" & Chr(34) & ">" 
Dim dIndex As Integer = html.IndexOf(htmlString) 

If (dIndex > -1) Then 
    Dim lIndex As Integer = sDomain.IndexOf("<") 
    Dim sDomain As String = html.Substring(dIndex + 26, 20) 

    LblSubDomain.Text = sDomain.Substring(0, lIndex) 
Else 
    LblSubDomain.Text = "Cannot Find Sub Domain Extension" 
End If 

이 코드의 적은 총 라인 수 있지만 가독성, 유지 보수 및 debuggability의 대부분을 유지하는 옵션 # 1이 제공됩니다. 여기

는 반사판을 통해 중간 언어 (IL)에 디 컴파일 코드입니다 :

참고 : MySub()는 IL로 디 컴파일 옵션 # 1.

.method public instance void MySub() cil managed 
{ 
    .maxstack 4 
    .locals init (
     [0] int32 num, 
     [1] string str, 
     [2] string str2, 
     [3] int32 num2, 
     [4] string str3, 
     [5] bool flag) 
    L_0000: nop 
    L_0001: ldarg.0 
    L_0002: callvirt instance class [System.Windows.Forms]System.Windows.Forms.WebBrowser WindowsApplication3.Form1::get_WebBrowser() 
    L_0007: callvirt instance string [System.Windows.Forms]System.Windows.Forms.WebBrowser::get_DocumentText() 
    L_000c: stloc.1 
    L_000d: ldstr "size=\"15\" maxlength=\"40\">" 
    L_0012: stloc.2 
    L_0013: ldloc.1 
    L_0014: ldloc.2 
    L_0015: callvirt instance int32 [mscorlib]System.String::IndexOf(string) 
    L_001a: stloc.0 
    L_001b: ldloc.0 
    L_001c: ldc.i4.m1 
    L_001d: cgt 
    L_001f: stloc.s flag 
    L_0021: ldloc.s flag 
    L_0023: brfalse.s L_0057 
    L_0025: ldloc.1 
    L_0026: ldloc.0 
    L_0027: ldc.i4.s 0x1a 
    L_0029: add.ovf 
    L_002a: ldc.i4.s 20 
    L_002c: callvirt instance string [mscorlib]System.String::Substring(int32, int32) 
    L_0031: stloc.s str3 
    L_0033: ldloc.s str3 
    L_0035: ldstr "<" 
    L_003a: callvirt instance int32 [mscorlib]System.String::IndexOf(string) 
    L_003f: stloc.3 
    L_0040: ldarg.0 
    L_0041: callvirt instance class [System.Windows.Forms]System.Windows.Forms.Label WindowsApplication3.Form1::get_LblSubDomain() 
    L_0046: ldloc.s str3 
    L_0048: ldc.i4.0 
    L_0049: ldloc.3 
    L_004a: callvirt instance string [mscorlib]System.String::Substring(int32, int32) 
    L_004f: callvirt instance void [System.Windows.Forms]System.Windows.Forms.Label::set_Text(string) 
    L_0054: nop 
    L_0055: br.s L_0069 
    L_0057: nop 
    L_0058: ldarg.0 
    L_0059: callvirt instance class [System.Windows.Forms]System.Windows.Forms.Label WindowsApplication3.Form1::get_LblSubDomain() 
    L_005e: ldstr "Cannot Find Sub Domain Extension" 
    L_0063: callvirt instance void [System.Windows.Forms]System.Windows.Forms.Label::set_Text(string) 
    L_0068: nop 
    L_0069: nop 
    L_006a: nop 
    L_006b: ret 
} 

참고 : MySub2()은 IL로 디 컴파일 된 옵션 2입니다.

.method public instance void MySub2() cil managed 
{ 
    .maxstack 6 
    .locals init (
     [0] bool flag) 
    L_0000: nop 
    L_0001: ldarg.0 
    L_0002: callvirt instance class [System.Windows.Forms]System.Windows.Forms.WebBrowser WindowsApplication3.Form1::get_WebBrowser() 
    L_0007: callvirt instance string [System.Windows.Forms]System.Windows.Forms.WebBrowser::get_DocumentText() 
    L_000c: ldstr "size=\"15\" maxlength=\"40\">" 
    L_0011: callvirt instance int32 [mscorlib]System.String::IndexOf(string) 
    L_0016: ldc.i4.m1 
    L_0017: cgt 
    L_0019: stloc.0 
    L_001a: ldloc.0 
    L_001b: brfalse.s L_008f 
    L_001d: ldarg.0 
    L_001e: callvirt instance class [System.Windows.Forms]System.Windows.Forms.Label WindowsApplication3.Form1::get_LblSubDomain() 
    L_0023: ldarg.0 
    L_0024: callvirt instance class [System.Windows.Forms]System.Windows.Forms.WebBrowser WindowsApplication3.Form1::get_WebBrowser() 
    L_0029: callvirt instance string [System.Windows.Forms]System.Windows.Forms.WebBrowser::get_DocumentText() 
    L_002e: ldarg.0 
    L_002f: callvirt instance class [System.Windows.Forms]System.Windows.Forms.WebBrowser WindowsApplication3.Form1::get_WebBrowser() 
    L_0034: callvirt instance string [System.Windows.Forms]System.Windows.Forms.WebBrowser::get_DocumentText() 
    L_0039: ldstr "size=\"15\" maxlength=\"40\">" 
    L_003e: callvirt instance int32 [mscorlib]System.String::IndexOf(string) 
    L_0043: ldc.i4.s 0x1a 
    L_0045: add.ovf 
    L_0046: ldc.i4.s 20 
    L_0048: callvirt instance string [mscorlib]System.String::Substring(int32, int32) 
    L_004d: ldc.i4.0 
    L_004e: ldarg.0 
    L_004f: callvirt instance class [System.Windows.Forms]System.Windows.Forms.WebBrowser WindowsApplication3.Form1::get_WebBrowser() 
    L_0054: callvirt instance string [System.Windows.Forms]System.Windows.Forms.WebBrowser::get_DocumentText() 
    L_0059: ldarg.0 
    L_005a: callvirt instance class [System.Windows.Forms]System.Windows.Forms.WebBrowser WindowsApplication3.Form1::get_WebBrowser() 
    L_005f: callvirt instance string [System.Windows.Forms]System.Windows.Forms.WebBrowser::get_DocumentText() 
    L_0064: ldstr "size=\"15\" maxlength=\"40\">" 
    L_0069: callvirt instance int32 [mscorlib]System.String::IndexOf(string) 
    L_006e: ldc.i4.s 0x1a 
    L_0070: add.ovf 
    L_0071: ldc.i4.s 20 
    L_0073: callvirt instance string [mscorlib]System.String::Substring(int32, int32) 
    L_0078: ldstr "<" 
    L_007d: callvirt instance int32 [mscorlib]System.String::IndexOf(string) 
    L_0082: callvirt instance string [mscorlib]System.String::Substring(int32, int32) 
    L_0087: callvirt instance void [System.Windows.Forms]System.Windows.Forms.Label::set_Text(string) 
    L_008c: nop 
    L_008d: br.s L_00a1 
    L_008f: nop 
    L_0090: ldarg.0 
    L_0091: callvirt instance class [System.Windows.Forms]System.Windows.Forms.Label WindowsApplication3.Form1::get_LblSubDomain() 
    L_0096: ldstr "Cannot Find Sub Domain Extension" 
    L_009b: callvirt instance void [System.Windows.Forms]System.Windows.Forms.Label::set_Text(string) 
    L_00a0: nop 
    L_00a1: nop 
    L_00a2: nop 
    L_00a3: ret 
} 

참고 : Reflector 더 이상 시험 기간 이상 무료 제품이지만, 코드의 IL을 얻을 수있는 무료 대안이있다 (ildasm는 .NET Framework 및 ILSpy에 내장 된 도구는 오픈입니다입니다 Reflector에 대한 소스 응답이 더 이상 무료가 아님)