From 165d9e223f9f998480638d512ffd4c6523f74bf5 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Tue, 4 Apr 2023 18:17:21 -0700
Subject: [PATCH] -- comentado de prueba

---
 OC/CatEstatus.aspx.vb | 99 +++++++++++++++++++++----------------------
 1 file changed, 49 insertions(+), 50 deletions(-)

diff --git a/OC/CatEstatus.aspx.vb b/OC/CatEstatus.aspx.vb
index 31793a760..065901693 100644
--- a/OC/CatEstatus.aspx.vb
+++ b/OC/CatEstatus.aspx.vb
@@ -71,7 +71,6 @@ Partial Class OC_CatEstatus
             CargaEstatus()
             CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyecto, divProyecto:=DivProyecto)
             CargaUsuarios()
-            sssss()
 
             'SOLO MUESTRA SUBPROYECTO
 
@@ -89,55 +88,55 @@ Partial Class OC_CatEstatus
         End If
     End Sub
 
-    Private Sub sssss()
-        Dim length = 200000
-        Dim concatString = ""
-        Dim aaa As New StringBuilder
-        Dim stopWatch = New Stopwatch()
-        stopWatch.Start()
-
-        For i As Integer = 0 To length - 1
-            concatString = concatString & i
-        Next
-
-        stopWatch.[Stop]()
-        aaa.Append($"String Concat took: {stopWatch.ElapsedMilliseconds} ms, for {length} iterations.</br>")
-        stopWatch.Reset()
-        concatString = String.Empty
-        stopWatch.Start()
-
-        For i As Integer = 0 To length - 1
-            concatString = $"{concatString}a"
-        Next
-
-        stopWatch.[Stop]()
-        aaa.Append($"String Interpolation took: {stopWatch.ElapsedMilliseconds} ms, for {length} iterations.</br>")
-        stopWatch.Reset()
-        concatString = String.Empty
-        Dim stringBuilder = New StringBuilder()
-        stopWatch.Start()
-
-        For i As Integer = 0 To length - 1
-            stringBuilder.Append("a")
-        Next
-
-        concatString = stringBuilder.ToString()
-        stopWatch.[Stop]()
-        aaa.Append($"String Builder took: {stopWatch.ElapsedMilliseconds} ms, for {length} iterations.</br>")
-        stopWatch.Reset()
-        concatString = String.Empty
-
-        stopWatch.Start()
-
-        For i As Integer = 0 To length - 1
-            concatString = String.Format("a{0}", i)
-        Next
-
-        stopWatch.[Stop]()
-        aaa.Append($"String.Format took: {stopWatch.ElapsedMilliseconds} ms, for {length} iterations.</br>")
-        Alert(aaa.ToString)
-
-    End Sub
+    'Private Sub sssss()
+    '    Dim length = 200000
+    '    Dim concatString = ""
+    '    Dim aaa As New StringBuilder
+    '    Dim stopWatch = New Stopwatch()
+    '    stopWatch.Start()
+
+    '    For i As Integer = 0 To length - 1
+    '        concatString = concatString & i
+    '    Next
+
+    '    stopWatch.[Stop]()
+    '    aaa.Append($"String Concat took: {stopWatch.ElapsedMilliseconds} ms, for {length} iterations.</br>")
+    '    stopWatch.Reset()
+    '    concatString = String.Empty
+    '    stopWatch.Start()
+
+    '    For i As Integer = 0 To length - 1
+    '        concatString = $"{concatString}a"
+    '    Next
+
+    '    stopWatch.[Stop]()
+    '    aaa.Append($"String Interpolation took: {stopWatch.ElapsedMilliseconds} ms, for {length} iterations.</br>")
+    '    stopWatch.Reset()
+    '    concatString = String.Empty
+    '    Dim stringBuilder = New StringBuilder()
+    '    stopWatch.Start()
+
+    '    For i As Integer = 0 To length - 1
+    '        stringBuilder.Append("a")
+    '    Next
+
+    '    concatString = stringBuilder.ToString()
+    '    stopWatch.[Stop]()
+    '    aaa.Append($"String Builder took: {stopWatch.ElapsedMilliseconds} ms, for {length} iterations.</br>")
+    '    stopWatch.Reset()
+    '    concatString = String.Empty
+
+    '    stopWatch.Start()
+
+    '    For i As Integer = 0 To length - 1
+    '        concatString = String.Format("a{0}", i)
+    '    Next
+
+    '    stopWatch.[Stop]()
+    '    aaa.Append($"String.Format took: {stopWatch.ElapsedMilliseconds} ms, for {length} iterations.</br>")
+    '    Alert(aaa.ToString)
+
+    'End Sub
 
 #Region "C A T A L O G O "
     Public Sub CargaDatos()