Arrays Visual Basic

1. Para redimensionar un Array se usa en .Net “Array.Resize”, para usarla se necesita primero declarar el array,

Dim MiArray As String() = {“a”, “b”, “c”, “d”}

Array.Resize(MiArray, 5)

2. Para devolver el numero de elementos usamos Array.Length pero antes declaramos el array

Dim A() As String = {"Uno", "Dos", "Tres", "Cuatro"}

MsgBox(A.Length.ToString())

En este ejemplo se devuelve el numero 4.

3. l método Peek devuelve un valor entero para determinar si se ha alcanzado el final del archivo, o si se ha producido otro error. Esto permite que un usuario compruebe primero si el valor devuelto es -1 antes de cambiar su tipo a Char.

4. RemoveAt es un método que elimina un elemento de un listbox indicándole su índice

Ejemplo, si deseamos eliminar el elemento seleccionado del listbox1, hacemos lo siguiente en el evento deseado.

ListBox1.Items.RemoveAt(ListBox1.SelectedIndex)

Donde ListBox1.SelectedIndex representa el índice seleccionado por el usuario, también podríamos en ves de dicha línea colocar directamente el índice a eliminar, asi: ListBox1.Items.RemoveAt(2)

Actividad 2

Se desea una base de datos para un sitio web donde los usuarios pueden generar sus imágenes www.muygracioso.net. En sistema administra las imágenes generadas por los usuarios, así como también permite la votación de la imagen y los comentarios a cada imagen, solo un usuario registrado puede votar, pero cualquier visitante puede agregar una imagen quedando así como si fuera agregada por el usuario “anónimo”.

La sección de chistes aun no esta implementada, pero cualquier visitante podrá agregar un chiste y cualquiera podrá agregar un comentario, pero solo un usuario registrado podrá votar por un chiste.

Actividad 3

Para implementar lo anterior, se creo proyecto como “sitio web” en Asp.net.

En el archivo web.config se agrego la siguiente conexión a base de datos web. La base de datos esta en SQL server, en un host remoto, la cadena de conexión es la siguiente, omitiendo el usuario y el password ya que el sitio esta al aire.

En el archivo web.config agregamos la cadena de conexión:

<appSettings/>

<connectionStrings>

<add name="muygracioso" connectionString="Data Source=174.120.228.67;Initial Catalog=muygracioso;Persist Security Info=True;User ID=******;Password=*******" providerName="System.Data.SqlClient"/>

</connectionStrings>

Creamos una clase llamada “Conexión.vb” ahí colocaremos todas los procedimientos para acceder a la base de datos, con lo siguientes espacios de nombres:

Imports Microsoft.VisualBasic

Imports System.Data

...