VB Code Example

NeuroSolutions v3.0
NeuroSolutions v2.15
NeuroSolutions for Excel
Custom Solution Wizard
Interactive Book
Source Code License
Priority Support

Screen Shots
Visual Basic Example
Pricing and Levels
Integration with NS

Once you have generated the DLL, the process of communicating with the DLL is made extremely simple through the use of the freely distributable NeuroSolutions Object Library DLL. This ActiveX DLL provides a simple protocol for sending data to and receiving data from the neural network DLL. By simply adding the NeuroSolutions Object Library DLL to the References list of your development environment, all of its methods and properties will immediately be available to your program.

The following Visual Basic code demonstrates just how easy it is to use the neural network DLL generated by the Custom Solution Wizard. This example creates a recall network, sends it sample data, and gets the network response (output), all in just a few lines of code!

'Create the input data array.
'You can use existing data files, databases, spreadsheets,
'hardware devices or anything else with data!

Dim inputData(0 To 1, 0 To 3) As Variant
inputData(0, 0) = 0!
inputData(0, 1) = 0!
inputData(0, 2) = 1!
inputData(0, 3) = 1!
inputData(1, 0) = 0!
inputData(1, 1) = 1!
inputData(1, 2) = 0!
inputData(1, 3) = 1!

'Create a new NeuroSolutions NSRecallNetwork object.
'Visual Basic automatically knows how to use this object
'when you add the Object Library to your reference list!

Dim nn As New NSRecallNetwork

'Set path to the generated recall network DLL.
nn.dllPathName = "c:\XOrBreadboard.dll"

'Set path to weights file from previous training sessions.
nn.loadWeights = "c:\XOrBreadboard.nsw"

'Send input data to the network DLL.
nn.inputData = inputData

'Get the network response to this data.
Dim outputData As Variant
outputData = nn.getResponse

'Display the output in a message box.
'You can use the network response data in the same
'way you would use any other data in your application!
MsgBox "Output 1 = " & outputData(0,0) & _
", Output 2 = " & outputData(1,0) & _
", Output 3 = " & outputData(2,0) & _
", Output 4 = " & outputData(3,0)