module1.bas

人工智能bp算法程序以及实验报告

Attribute VB_Name = "Module1"

Public Type VariableDef   '''Note Grid data variable definition
    name As String        '''Forstat表变量描述
    Type As String * 1
    Deci As String
End Type


Public FSvar() As VariableDef '''变量描述(定义)数组
'''Public tempVar() As VariableDef
Declare Function IsIconic Lib "USER32" (ByVal hWnd As Long) As Long