WOW !! MUCH LOVE ! SO WORLD PEACE !
Fond bitcoin pour l'amélioration du site: 1memzGeKS7CB3ECNkzSn2qHwxU6NZoJ8o
  Dogecoin (tips/pourboires): DCLoo9Dd4qECqpMLurdgGnaoqbftj16Nvp


Home | Publier un mémoire | Une page au hasard

 > 

Conception et mise en place d'une encyclopédie numérique bilingue de la terminologie des affaires

( Télécharger le fichier original )
par Thierry Dejiba Akangba Logo
Université adventiste de Lukanga - Gradué en informatique de gestion 2011
  

précédent sommaire

Bitcoin is a swarm of cyber hornets serving the goddess of wisdom, feeding on the fire of truth, exponentially growing ever smarter, faster, and stronger behind a wall of encrypted energy

CONCLUSION

Nous voici au terme de notre travail de recherche qui consiste à concevoir et mettre en place une encyclopédie numérique Bilingue de la terminologie des affaires et qui devait servir d'outil qui permettrait aux gestionnaires, Etudiants et enseignants d'enrichir leur vocabulaire en matière de gestion.

Partant de notre problématique et des hypothèses émises, nous osons croire que ce travail se présentera comme une opportunité pour les cibles précitées ainsi que pour ceux qui voudront acquérir une excellence dans la connaissance Bilingue des termes couramment usités en Gestion.

Nous avons fini par comprendre que la connaissance des termes commerciaux Anglais serait non seulement pour les commerçants un facilitateur des négoces, mais aussi un avantage pour les programmeurs informaticiens.

Nous ne pouvons pas affirmer que ce travail aidera complètement les gestionnaires à comprendre et maîtriser les termes couramment utilisés dans les affaires mais nous pouvons dire qu'il prêtera main forte au programme national visant à rendre bilingue les enseignements en République Démocratique du Congo.

Ce travail n'est guère achevé, c'est pourquoi nous laissons libre entrée à toute personne voulant pallier à ce problème qui guète les Etudiants congolais quant à la compréhension et l'usage des termes techniques d'un domaine quelconque, de bien vouloir poursuivre des recherches dans ce domaine.

REFERANCES BIBLIOGRAPHIE

1) OUVRAGES

1. Dipl.Ing. Anfreas Maslo,Visuel Basic6.0,1999

2. Forest lin, The visuel basic cours book, scott, 1995.

3. Xx, Le petit larousse illustrée 2001

4. JEAN MARC, visuel basic , 1999

2) COURS

1. O. Muhindo Masivi, Méthode d'analyse de Système d'Information, G2

UNILUK, inédit, 2007-2008

2. A. GULZAR, Programmation Evénementielle, G2 UNILUK, 2009-2010, inédit.

3. O. Muhindo Masivi, Algorithmes, G2 UNILUK 2009-2010, inédit.

4. A. GULZAR, Commercial English, G2 UNILUK, 2009-2010, inédit.

3) TRAVAUX DE FIN DE CYCLE

1. O. Katembo Kakome, Conception et mise en place d'un dictionnaire électronique

Illustré, TFC/ UNILUK, 2007-2008;

2. K. Lwanzo Leston, Conception, création d'une encyclopédie interactive de

l'Unversité Adventiste de Lukanga, TFC/ UNILUK, 2007-2008

3. K. MALIRO FABRICE, conception et mise en place d'une encyclopédie Zoologique, TFC/UNILUK, 2008-2009 ;

4) REFERENCE ENCYCLOPEDIQUE

1. Dicos Encarta, Microsoft Corporation, 2009.

ANNEXE : Quelques lignes de Code Visual Basic obtenues à partir des algorithmes ci haut présentés

a. Accès au Programme

Private Sub Command2_Click()

FrmAccueil.Show

Me.Hide

End Sub

Private Sub CmdOK_Click()

FrmAccueil.Show

If CmdOK = True Then

mnuadministrateur.Enabled = True

Else

mnuadministrateur.Enabled = False

End If

Me.Hide

End Sub

Private Sub mnuexit_Click()

End

End Sub

b. Ajout nouveau Terme

'Connection à la Base de Donnée et déclaration de la variable tb

Dim db As New ADODB.Connection

Dim tb As New ADODB.Recordset

Private Sub Command1_Click()

' code pour ajouter des données

tb.AddNew

tb("Terme") = Text1.Text

tb("Definition") = RtbAjoutDef.Text

tb("Equivalent-Anglais") = Text3.Text

tb("Synonymes") = Text4.Text

tb.Update

End Sub

Private Sub Command2_Click()

' code pour un nouveau enregistrement

tb.MoveLast

Text1.Text = ""

RtbAjoutDef.Text = ""

Text3.Text = ""

Text4.Text = ""

End Sub

c. Recherche d'un Nouveau Terme par l'Utilisateur

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

'declaration pour la recherche dans une liste

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal lParam As Any) As Long

Const a = &H18F

Dim db As New ADODB.Connection

Dim tb As New ADODB.Recordset

Private Sub TxtNom_Change()

' lorsqu'on cherche un terme

On Error Resume Next

If TxtNom.Text <> "" Then

List1.Visible = True

End If

List1.ListIndex = SendMessage(List1.hWnd, a, 1, ByVal CStr(TxtNom.Text))

End Sub

précédent sommaire






Bitcoin is a swarm of cyber hornets serving the goddess of wisdom, feeding on the fire of truth, exponentially growing ever smarter, faster, and stronger behind a wall of encrypted energy








"Enrichissons-nous de nos différences mutuelles "   Paul Valery