ASP.NET


importmacros1

 

 

 

 

ASP.NET es un framework para aplicaciones web desarrollado y comercializado por Microsoft. Es usado por programadores y diseñadores para construir sitios web dinámicos, aplicaciones web yservicios web XML. Apareció en enero de 2002 con la versión 1.0 del.NET Framework, y es la tecnología sucesora de la tecnología Active Server Pages (ASP). ASP.NET esta construido sobre el Common Language Runtime, permitiendo a los programadores escribir código ASP.NET usando cualquier lenguaje admitido por el .NET Framework.

Las páginas de ASP.NET, conocidas oficialmente como “web forms” (formularios web), son el principal medio de construcción para el desarrollo de aplicaciones web.8 Los formularios web están contenidos en archivos con una extensión ASPX; en jerga de programación, estos archivos típicamente contienen etiquetas HTML o XHTML estático, y también etiquetas definiendo Controles Web que se procesan del lado del servidor y Controles de Usuario donde los desarrolladores colocan todo el código estático y dinámico requerido por la página web. Adicionalmente, el código dinámico que se ejecuta en el servidor puede ser colocado en una página dentro de un bloque <% -- código dinámico -- %> que es muy similar a otras tecnologías de desarrollo como PHP, JSP y ASP, pero esta práctica es, generalmente, desaconsejada excepto para propósitos de enlace de datos pues requiere más llamadas cuando se genera la página.

ASP.NET sólo funciona sobre el servidor de Microsoft IIS, lo que supone una desventaja respecto a otros lenguajes del lado de servidor, ejecutables sobre otros servidores más populares como Apache. Ejemplos de esto son PHP, Perlo Python.

Como Programar en Excel


Para muchos Programar en Excel es un obstáculo muy gigante, Pero no es así, siempre debemos de comenzar conociendo el entorno General, sus características, funciones y todo lo relacionado con el programa que utilizarás para programar.
En este artículo vamos a conocer totalmente los pasos de como programar en excel, comenzaremos de lo más sencillo a lo más extenso, con el fin de que puedas alcanzar la meta de programar en excel.
Donde Programar en Excel
Excel es un programa que nos facilita automatizar todos los procesos que comúnmente solemos repetirlo constantemente.
El programa que se utiliza para programar en excel es el llamado VBA ( Visual Basic para Aplicaciones) . Este programa ya viene integrado con el paquete office, es decir que ya esta integrado con excel. Vease la Imagen:

Programacion-en-excel-1024x546

Como Abrir el Programa VBA (Visual Basic para Aplicaciones)
Se que te has preguntado como puedo abrir el programa VBA ? donde lo encuentro? o donde esta ubicado? entonces veamos las dos formas de abrir VBA:
1. Abrimos excel, una vez se abra el programa pulsamos Alt + F11, para poder acceder a VBA. Alt + F11 es la combinación de tecla que se utiliza para abrir el programa VBA desde excel.
2. Desde la Pestaña Desarrollador (Excel 2013) o Pestaña Programador (Excel 2010) sección código y seleccionamos el comando Visual Basic. Vease la Imagen:
Visualizando el Entorno de VBA
Ahora que ya sabes como abrir VBA, tomate el tiempo y échale un vistazo al entorno de VBA, empieza observando todo absolutamente todo lo que ves ahora mismo, ahora navega por cada una de las pestaña, trata de leer todos los comandos que contiene cada pestaña.
Conociendo el entorno de VBA
Uno de los primeros pasos para comenzar a programar es conocer el entorno de VBA, por eso te invito a que leas el Siguiente artículo “Programar en Excel” y luego sigue leyendo los siguientes artículos. Una vez termines de conocer el entorno de VBA te aseguro que habrás avanzado un 30 por ciento.

Fuente: http://aplicaexcelcontable.com/blog/como-programar-en-excel.html

Código Small Basic


a1

Estas son las instrucciones Small Basic que al aplicarse la función “Graduar” devuelve el módulo Visual Basic posteado en:

https://empiezoinformatica.wordpress.com/2013/04/13/visual-basic-module-graduado-desde-small-basic/

También vea:   http://mssbesp.wordpress.com/2009/04/28/aplicaciones-en-modo-consola-con-small-basic/

  1. ‘ Prueba con operaciones matemáticas
  2. ‘—————————————————-
  3. TextWindow.Title = “Prueba con operaciones matemáticas”
  1. endl = Text.GetCharacter(13)        ‘\n
  2. endl = endl + Text.GetCharacter(10) ‘\r
  3. ‘—————————————————-
  4. aux = “Abs(8)       = ” + Math.Abs(8)
  5. TextWindow.WriteLine(aux)
  1. aux = “Abs(-8)      = ” + Math.Abs(-8)
  2. TextWindow.WriteLine(aux)
  3. TextWindow.Write(endl)
  4. ‘—————————————————-
  5. aux = “Round(4.4)   = ” + Math.Round(4.4)
  6. TextWindow.WriteLine(aux)
  1. aux = “Round(4.6)   = ” + Math.Round(4.6)
  2. TextWindow.WriteLine(aux)
  1. aux = “Round(4.5)   = ” + Math.Round(4.5)
  2. TextWindow.WriteLine(aux)
  1. aux = “Round(5.5)   = ” + Math.Round(5.5)
  2. TextWindow.WriteLine(aux)
  1. aux = “Ceiling(3.5) = ” + Math.Ceiling(3.5)
  2. TextWindow.WriteLine(aux)
  1. aux = “Floor(3.5)   = ” + Math.Floor(3.5)
  2. TextWindow.WriteLine(aux)
  3. TextWindow.Write(endl)
  4. ‘—————————————————-
  5. e = 2.7182818284590452354
  6. aux = “e            = ” + e
  7. TextWindow.WriteLine(aux)
  1. aux = “Ln(e)        = ” + Math.NaturalLog(e)
  2. TextWindow.WriteLine(aux)
  1. aux = “Log(10)      = ” + Math.Log(10.0)
  2. TextWindow.WriteLine(aux)
  3. TextWindow.Write(endl)
  4. ‘—————————————————-
  5. aux = ” 7 ^ 11      = ” + Math.Power(7, 11)
  6. TextWindow.WriteLine(aux)
  1. aux = “23 ^ (1/2)   = ” + Math.SquareRoot(23)
  2. TextWindow.WriteLine(aux)
  3. TextWindow.Write(endl)
  1. TextWindow.Pause()
  2. TextWindow.Clear()
  3. ‘—————————————————-
  4. pi = Math.Pi
  5. aux = “Pi = ” + pi
  6. TextWindow.WriteLine(aux)
  7. TextWindow.Write(endl)
  8. ‘—————————————————-
  9. rad = 0
  10. aux = “0        radianes = ” + Math.GetDegrees(rad)
  11. TextWindow.WriteLine(aux)
  1. rad = pi / 2
  2. aux = “Pi / 2   radianes = ” + Math.GetDegrees(rad)
  3. TextWindow.WriteLine(aux)
  1. rad = pi
  2. aux = “Pi       radianes = ” + Math.GetDegrees(rad)
  3. TextWindow.WriteLine(aux)
  1. rad = pi * 3 / 2
  2. aux = “3 Pi / 2 radianes = ” + Math.GetDegrees(rad)
  3. TextWindow.WriteLine(aux)
  1. rad = pi * 2
  2. aux = “2 Pi     radianes = ” + Math.GetDegrees(rad)
  3. TextWindow.WriteLine(aux)
  4. TextWindow.Write(endl)
  5. ‘—————————————————-
  6. aux = ”  0 º = ” + Math.GetRadians(0)
  7. TextWindow.WriteLine(aux)
  1. aux = ” 90 º = ” + Math.GetRadians(90)
  2. TextWindow.WriteLine(aux)
  1. aux = “180 º = ” + Math.GetRadians(180)
  2. TextWindow.WriteLine(aux)
  1. aux = “270 º = ” + Math.GetRadians(270)
  2. TextWindow.WriteLine(aux)
  1. aux = “360 º = ” + Math.GetRadians(360)
  2. TextWindow.WriteLine(aux)
  3. TextWindow.Write(endl)
  1. TextWindow.Pause()
  2. TextWindow.Clear()
  3. ‘—————————————————-
  4. For i = 0 To 360 Step 18
  5. rad = Math.GetRadians(i)
  6. If i < 10 Then
  7. aux = “Cos(” + i + “)   = “
  8. ElseIf i < 100 Then
  9. aux = “Cos(” + i + “)  = “
  10. Else
  11. aux = “Cos(” + i + “) = “
  12. EndIf
  13. aux = aux + Math.Cos(rad)
  14. TextWindow.WriteLine(aux)
  15. EndFor
  16. TextWindow.Write(endl)
  1. TextWindow.Pause()
  2. TextWindow.Clear()
  1. For i = 0 To 360 Step 18
  2. rad = Math.GetRadians(i)
  3. If i < 10 Then
  4. aux = “Sin(” + i + “)   = “
  5. ElseIf i < 100 Then
  6. aux = “Sin(” + i + “)  = “
  7. Else
  8. aux = “Sin(” + i + “) = “
  9. EndIf
  10. aux = aux + Math.Sin(rad)
  11. TextWindow.WriteLine(aux)
  12. EndFor
  13. TextWindow.Write(endl)
  1. TextWindow.Pause()
  2. TextWindow.Clear()
  1. For i = 0 To 360 Step 18
  2. If i <> 90 And i <> 270 Then
  3. rad = Math.GetRadians(i)
  4. If i < 10 Then
  5. aux = “Tan(” + i + “)   = “
  6. ElseIf i < 100 Then
  7. aux = “Tan(” + i + “)  = “
  8. Else
  9. aux = “Tan(” + i + “) = “
  10. EndIf
  11. aux = aux + Math.Tan(rad)
  12. Else
  13. If i = 90 Then
  14. aux = “Tan(90)  = Infinito”
  15. Else
  16. aux = “Tan(270) = -Infinito”
  17. EndIf
  18. EndIf
  19. TextWindow.WriteLine(aux)
  20. EndFor
  21. TextWindow.Write(endl)
  1. TextWindow.Pause()
  2. TextWindow.Clear()
  3. ‘—————————————————-
  4. aux = “37 % 42 = ” + Math.Remainder(37, 42)
  5. TextWindow.WriteLine(aux)
  6. TextWindow.Write(endl)
  7. ‘—————————————————-
  8. aux = “Max(9, 8) = ” + Math.Max(9, 8)
  9. TextWindow.WriteLine(aux)
  1. aux = “Max(4, 6) = ” + Math.Max(4, 6)
  2. TextWindow.WriteLine(aux)
  3. TextWindow.Write(endl)
  1. aux = “Min(9, 8) = ” + Math.Min(9, 8)
  2. TextWindow.WriteLine(aux)
  1. aux = “Min(4, 6) = ” + Math.Min(4, 6)
  2. TextWindow.WriteLine(aux)
  3. TextWindow.Write(endl)
  4. ‘—————————————————-
  5. For i = 1 To 10
  6. aux = “Random()  = ” + Math.GetRandomNumber(10)
  7. TextWindow.WriteLine(aux)
  8. EndFor
  9. TextWindow.Write(endl)

Visual Basic Module graduado desde Small Basic


a1

Este ejercicio es una prueba de operaciones matemáticas, codificado en Small Basic y convertido a VB.NET con la función “graduar”

matModule

Dim endl, aux, e, pi, rad, i AsPrimitive

Sub Main()

‘ Prueba con operaciones matemáticas

‘—————————————————-

TextWindow.Title = “Prueba con operaciones matemáticas”

endl =

Text.GetCharacter(13) ‘\n

endl = endl +

Text.GetCharacter(10) ‘\r

‘—————————————————-

aux =

“Abs(8)       = “ + Microsoft.SmallBasic.Library.Math.Abs(8)

TextWindow.WriteLine(aux)

aux =

“Abs(-8)      = “ + Microsoft.SmallBasic.Library.Math.Abs(-8)

TextWindow.WriteLine(aux)

TextWindow.Write(endl)

‘—————————————————-

aux =

“Round(4.4)   = “ + Microsoft.SmallBasic.Library.Math.Round(4.4)

TextWindow.WriteLine(aux)

aux =

“Round(4.6)   = “ + Microsoft.SmallBasic.Library.Math.Round(4.6)

TextWindow.WriteLine(aux)

aux =

“Round(4.5)   = “ + Microsoft.SmallBasic.Library.Math.Round(4.5)

TextWindow.WriteLine(aux)

aux =

“Round(5.5)   = “ + Microsoft.SmallBasic.Library.Math.Round(5.5)

TextWindow.WriteLine(aux)

aux =

“Ceiling(3.5) = “ + Microsoft.SmallBasic.Library.Math.Ceiling(3.5)

TextWindow.WriteLine(aux)

aux =

“Floor(3.5)   = “ + Microsoft.SmallBasic.Library.Math.Floor(3.5)

TextWindow.WriteLine(aux)

TextWindow.Write(endl)

‘—————————————————-

e = 2.7182818284590452354

aux =

“e            = “ + e

TextWindow.WriteLine(aux)

aux =

“Ln(e)        = “ + Microsoft.SmallBasic.Library.Math.NaturalLog(e)

TextWindow.WriteLine(aux)

aux =

“Log(10)      = “ + Microsoft.SmallBasic.Library.Math.Log(10.0)

TextWindow.WriteLine(aux)

TextWindow.Write(endl)

‘—————————————————-

aux =

” 7 ^ 11      = “ + Microsoft.SmallBasic.Library.Math.Power(7, 11)

TextWindow.WriteLine(aux)

aux =

“23 ^ (1/2)   = “ + Microsoft.SmallBasic.Library.Math.SquareRoot(23)

TextWindow.WriteLine(aux)

TextWindow.Write(endl)

TextWindow.Pause()

TextWindow.Clear()

‘—————————————————-

pi = Microsoft.SmallBasic.Library.

Math.Pi

aux =

“Pi = “ + pi

TextWindow.WriteLine(aux)

TextWindow.Write(endl)

‘—————————————————-

rad = 0

aux =

“0        radianes = “ + Microsoft.SmallBasic.Library.Math.GetDegrees(rad)

TextWindow.WriteLine(aux)

rad = pi / 2

aux =

“Pi / 2   radianes = “ + Microsoft.SmallBasic.Library.Math.GetDegrees(rad)

TextWindow.WriteLine(aux)

rad = pi

aux =

“Pi       radianes = “ + Microsoft.SmallBasic.Library.Math.GetDegrees(rad)

TextWindow.WriteLine(aux)

rad = pi * 3 / 2

aux =

“3 Pi / 2 radianes = “ + Microsoft.SmallBasic.Library.Math.GetDegrees(rad)

TextWindow.WriteLine(aux)

rad = pi * 2

aux =

“2 Pi     radianes = “ + Microsoft.SmallBasic.Library.Math.GetDegrees(rad)

TextWindow.WriteLine(aux)

TextWindow.Write(endl)

‘—————————————————-

aux =

”  0 º = “ + Microsoft.SmallBasic.Library.Math.GetRadians(0)

TextWindow.WriteLine(aux)

aux =

” 90 º = “ + Microsoft.SmallBasic.Library.Math.GetRadians(90)

TextWindow.WriteLine(aux)

aux =

“180 º = “ + Microsoft.SmallBasic.Library.Math.GetRadians(180)

TextWindow.WriteLine(aux)

aux =

“270 º = “ + Microsoft.SmallBasic.Library.Math.GetRadians(270)

TextWindow.WriteLine(aux)

aux =

“360 º = “ + Microsoft.SmallBasic.Library.Math.GetRadians(360)

TextWindow.WriteLine(aux)

TextWindow.Write(endl)

TextWindow.Pause()

TextWindow.Clear()

‘—————————————————-

For i = 0 To 360 Step 18

rad = Microsoft.SmallBasic.Library.

Math.GetRadians(i)

If i < 10 Then

aux =

“Cos(“ + i + “)   = “

ElseIf i < 100 Then

aux =

“Cos(“ + i + “)  = “

Else

aux =

“Cos(“ + i + “) = “

EndIf

aux = aux + Microsoft.SmallBasic.Library.

Math.Cos(rad)

TextWindow.WriteLine(aux)

Next

TextWindow.Write(endl)

TextWindow.Pause()

TextWindow.Clear()

For i = 0 To 360 Step 18

rad = Microsoft.SmallBasic.Library.

Math.GetRadians(i)

If i < 10 Then

aux =

“Sin(“ + i + “)   = “

ElseIf i < 100 Then

aux =

“Sin(“ + i + “)  = “

Else

aux =

“Sin(“ + i + “) = “

EndIf

aux = aux + Microsoft.SmallBasic.Library.

Math.Sin(rad)

TextWindow.WriteLine(aux)

Next

TextWindow.Write(endl)

TextWindow.Pause()

TextWindow.Clear()

For i = 0 To 360 Step 18

If (i <> 90) And (i <> 270) Then

rad = Microsoft.SmallBasic.Library.

Math.GetRadians(i)

If i < 10 Then

aux =

“Tan(“ + i + “)   = “

ElseIf i < 100 Then

aux =

“Tan(“ + i + “)  = “

Else

aux =

“Tan(“ + i + “) = “

EndIf

aux = aux + Microsoft.SmallBasic.Library.

Math.Tan(rad)

Else

If i = 90 Then

aux =

“Tan(90)  = Infinito”

Else

aux =

“Tan(270) = -Infinito”

EndIf

EndIf

TextWindow.WriteLine(aux)

Next

TextWindow.Write(endl)

TextWindow.Pause()

TextWindow.Clear()

‘—————————————————-

aux =

“37 % 42 = “ + Microsoft.SmallBasic.Library.Math.Remainder(37, 42)

TextWindow.WriteLine(aux)

TextWindow.Write(endl)

‘—————————————————-

aux =

“Max(9, 8) = “ + Microsoft.SmallBasic.Library.Math.Max(9, 8)

TextWindow.WriteLine(aux)

aux =

“Max(4, 6) = “ + Microsoft.SmallBasic.Library.Math.Max(4, 6)

TextWindow.WriteLine(aux)

TextWindow.Write(endl)

aux =

“Min(9, 8) = “ + Microsoft.SmallBasic.Library.Math.Min(9, 8)

TextWindow.WriteLine(aux)

aux =

“Min(4, 6) = “ + Microsoft.SmallBasic.Library.Math.Min(4, 6)

TextWindow.WriteLine(aux)

TextWindow.Write(endl)

‘—————————————————-

For i = 1 To 10

aux =

“Random()  = “ + Microsoft.SmallBasic.Library.Math.GetRandomNumber(10)

TextWindow.WriteLine(aux)

Next

TextWindow.Write(endl)

EndSub

End

Module