Dictionary, or Anything Else to store stuff
you enter a word, or whatever else you want and it brings up a definition, or something else.Note: Saves into the registry key: HKEY_Current_User\Software\VB and VBA Program Setting\ whatever you set the path to
AI
AI Summary: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
Source Code
Private Sub AddWord_Click()
SaveSetting "Dictionary", "Definitions", AddName, AddDefine 'Saves Your Entry In The Registry
AddName = ""
AddDefine = ""
MsgBox ("Entry Saved")
End Sub
Private Sub LookUp_Click()
Label3.Caption = Word & " Means:"
definition = GetSetting("Dictionary", "Definitions", Word) 'Gets the entry from the registry
If definition = "" Then definition = "No Entry Found" 'if no entry found then it tells you
End Sub
Original Comments (3)
Recovered from Wayback Machine