Ir al contenido principal

CREAR ARCHIVOS TXT EN VISUAL BASIC 2010

Buenas hoy veremos un ejemplo para crear un archivo .txt en visual basic .NET  utilizando la herramienta visual studio 2010.

el manual de referencia lo podemos encontrar en el libro 

VISUAL BASIC .NET lenguaje y aplicaciones 3ra edicion  Fco. Javier Ceballos

el tipo de acceso mas simple a un fichero de datos es el secuencial, un fichero abierto  para acceso secuencial es un fichero que puede almacenar registros de cualquier longitud.

Este tipo de acceso generalmente se utiliza con ficheros de texto en los que se escribe toda la información
desde el principio hasta el final y se lee de la misma forma.

las acciones mas comunes que se manejan a la hora de trabajar con archivos son:
CreateNew: crea un nuevo fichero. Si el fichero existe se lanzara una excepción del tipo IOException
Create: Crear un nuevo fichero. Si el fichero existe sera sobrescrito 
Open: abrir el fichero existente
OpenOrCreate: abrir un fichero si existe si no se crea uno nuevo
Truncate: abrir un fichero existente y truncar su longitud a cero bytes
Apenned: abrir un fichero para añadir datos al final del mismo

los parámetros de acceso pueden tomas las siguientes acciones

Read: permite acceder al fichero para realizar acciones de lectura
ReadWrite: Permite acceder al fichero para realizar acciones de lectura y escritura
Write: permite acceder al fichero para realizar operaciones de escritura

EJEMPLO


Imports System
Imports System.IO
'se define el modulo y el nombre del modulo
Module Module1

    Public Sub Main()
        Dim fs As FileStream
        Dim buffer(80) As Byte
        Dim nbytes, car As Integer
        Dim CR As Integer = 13
        Try
            'crear el flujo hacia el fichero de texto texto.txt
            fs = New FileStream("texto.txt", FileMode.Create, FileAccess.Write)
            Console.WriteLine("escriba el texto que desea guardar en el archivo:")
            car = Console.Read()
            While (car <> CR And nbytes < buffer.Length)
                buffer(nbytes) = Convert.ToByte(car)
                nbytes += 1
                car = Console.Read()
            End While
            'escribir la linea de texto en el fichero
            fs.Write(buffer, 0, nbytes)
        Catch e As IOException
            Console.WriteLine("Error: " + e.Message)
        End Try
    End Sub
End Module




Entradas populares de este blog

BUSQUEDA BINARIA EN C++

holas aqui les dejo el codigo de un ejemplo de busqueda binaria en un vector; esto esta hecho en dev c++.
recordemos que para hacer la busqueda binaria hay un requisito y es que el vector donde se va a buscar debe estar ordenado.
todos los creditos a alejandro ;)

HACER UN LOGIN CON VISUAL BASIC .NET

En este tutorial veremos como crear un formulario para hacer un login de manera fácil y sencilla, la herramienta con la cual se trabajara es visual studio 2010. Para comenzar crearemos un proyecto aplicación de Windows forms visual Basic.

damos un nombre al proyecto y clic en aceptar.  El proyecto se creara con  un formulario por defecto.

ahora vamos a agregar el formulario para hacer el login; para esto damos clic en proyecto agregar Windows form, formulario de inicio de sesión.


le damos un nombre al formulario y clic en aceptar. Aparecerá la siguiente ventana


en esta ventana ya podemos configurar todas las propiedades que necesitemos desde cambio de colores imagen etc.
El siguiente paso es hacer el código para la autentificación El formulario ya tiene un código predefinido el cual vamos a cambiar por un código personalizado.
Para comenzar aremos doble clic sobre el botón que  Aceptar  para que nos muestre el código El eveto del botón tiene el siguiente código
Me.close()
Esa l…