Microsoft Visual C # Express Hotel Microsoft Office Access
Mostrar más instrucciones
1
Abra Microsoft Visual C # Express y seleccione "Nuevo proyecto ... " en el panel izquierdo . Haga doble clic en "Visual C # " en " Plantillas instaladas" y haga doble clic en " Biblioteca de clases . " Pulse la tecla " Ctrl" y " A ", a continuación, pulse "Delete " para eliminar todo el código existente
2
Copia y pega el siguiente código para crear una DLL: .
Using System;
utilizando System.Collections.Generic ;
usando System.Linq ;
using System.Text ;
espacio de nombres ClassLibrary1
{
public class Class1 {
public int Add ( )
{
retorno 13 + 14 ;
< p >} }
}
3 Haga clic en el menú "Proyecto " y seleccionar " Propiedades ClassLibrary1 . " Haga clic en " aplicaciones", a continuación, seleccione " Información de ensamblado .... " Marque la casilla junto a " Hacer ensamblado COM - Visible. " Haga clic en " Aceptar".
4
clic en "Crear " y luego seleccione la casilla junto a " Registrar para interoperabilidad COM . " Seleccione el menú "Archivo" , luego haga clic en " Guardar todo ". Haga clic en el menú " Build " , a continuación, seleccione " Crear ClassLibrary1 . "
5
Ir a la carpeta Release proyecto de C # y usted debería ver los siguientes tres archivos :
ClassLibrary1.tlb
ClassLibrary1.dll
ClassLibrary1.pdb
copiar estos archivos en "C: . \\ WINDOWS \\ system32 "
6
Inicio Microsoft Office Access . Seleccione "Base de datos en blanco ", y luego haga clic en " Crear". Haga clic en " Herramientas de base de datos ", seleccione "Visual Basic ".
7
Haga clic en el menú " Herramientas" y seleccione "Referencias ". Haga clic en el botón "Examinar " , luego vaya a "C: \\ WINDOWS \\ system32 " y seleccione " ClassLibrary1.tlb . " Haga clic en " Abrir ". Marque la casilla junto a " ClassLibrary1 . " Haga clic en " Aceptar".
8
Escriba lo siguiente para crear un nuevo procedimiento :
addNumbers Private Sub ( ) guía
Call testMyDLL
Final Sub
9
Copie y pegue la siguiente función al módulo de llamar a su nueva DLL:
Public Function testMyDLL ()
Dim dllResult Como
Long
objAdd As ClassLibrary1.Class1
Set objAdd = New ClassLibrary1.Class1
dllResult = objAdd.Add
MsgBox dllResult
End Function
10 Pulse
"F5 " para ejecutar el código y mostrar el resultado DLL.