lab2perceptron.frm
来自「bp, backpropagation 神经网络 简单认字 错误开发实例。」· FRM 代码 · 共 1,569 行 · 第 1/4 页
FRM
1,569 行
Top = 2160
Width = 495
End
Begin VB.TextBox Text53
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Left = 1680
TabIndex = 42
TabStop = 0 'False
Text = "1"
Top = 2160
Width = 495
End
Begin VB.TextBox txtX2_2
Alignment = 2 'Center
Height = 375
Index = 2
Left = 960
TabIndex = 41
TabStop = 0 'False
Top = 2160
Width = 495
End
Begin VB.TextBox txtX1_2
Alignment = 2 'Center
Height = 375
Index = 3
Left = 240
TabIndex = 40
TabStop = 0 'False
Top = 2760
Width = 495
End
Begin VB.TextBox Text50
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Left = 1680
TabIndex = 39
TabStop = 0 'False
Text = "1"
Top = 2760
Width = 495
End
Begin VB.TextBox txtX2_2
Alignment = 2 'Center
Height = 375
Index = 3
Left = 960
TabIndex = 38
TabStop = 0 'False
Top = 2760
Width = 495
End
Begin VB.Label Label7
Caption = "( X1 X2 1 )"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 375
Left = 360
TabIndex = 50
Top = 480
Width = 1815
End
End
Begin VB.Frame Frame4
Caption = "Out"
Height = 3495
Left = 4200
TabIndex = 29
Top = 840
Width = 735
Begin VB.TextBox txtOut_1
Alignment = 2 'Center
Height = 375
Index = 0
Left = 120
TabIndex = 33
TabStop = 0 'False
Top = 960
Width = 495
End
Begin VB.TextBox txtOut_1
Alignment = 2 'Center
Height = 375
Index = 1
Left = 120
TabIndex = 32
TabStop = 0 'False
Top = 1560
Width = 495
End
Begin VB.TextBox txtOut_1
Alignment = 2 'Center
Height = 375
Index = 2
Left = 120
TabIndex = 31
TabStop = 0 'False
Top = 2160
Width = 495
End
Begin VB.TextBox txtOut_1
Alignment = 2 'Center
Height = 375
Index = 3
Left = 120
TabIndex = 30
TabStop = 0 'False
Top = 2760
Width = 495
End
End
Begin VB.Frame Frame3
Caption = "Net"
Height = 3495
Left = 3120
TabIndex = 24
Top = 840
Width = 735
Begin VB.TextBox txtNet_1
Alignment = 2 'Center
Height = 375
Index = 0
Left = 120
TabIndex = 28
TabStop = 0 'False
Top = 960
Width = 495
End
Begin VB.TextBox txtNet_1
Alignment = 2 'Center
Height = 375
Index = 1
Left = 120
TabIndex = 27
TabStop = 0 'False
Top = 1560
Width = 495
End
Begin VB.TextBox txtNet_1
Alignment = 2 'Center
Height = 375
Index = 2
Left = 120
TabIndex = 26
TabStop = 0 'False
Top = 2160
Width = 495
End
Begin VB.TextBox txtNet_1
Alignment = 2 'Center
Height = 375
Index = 3
Left = 120
TabIndex = 25
TabStop = 0 'False
Top = 2760
Width = 495
End
End
Begin VB.Frame Frame6
Caption = "Weights"
Height = 3735
Left = 9240
TabIndex = 20
Top = 600
Width = 2535
Begin VB.TextBox txtW1_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 4
Left = 240
TabIndex = 108
TabStop = 0 'False
Top = 3000
Width = 495
End
Begin VB.TextBox txtB_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 4
Left = 1680
TabIndex = 107
TabStop = 0 'False
Top = 3000
Width = 495
End
Begin VB.TextBox txtW2_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 4
Left = 960
TabIndex = 106
TabStop = 0 'False
Top = 3000
Width = 495
End
Begin VB.TextBox txtW1_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 3
Left = 240
TabIndex = 105
TabStop = 0 'False
Top = 2400
Width = 495
End
Begin VB.TextBox txtB_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 3
Left = 1680
TabIndex = 104
TabStop = 0 'False
Top = 2400
Width = 495
End
Begin VB.TextBox txtW2_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 3
Left = 960
TabIndex = 103
TabStop = 0 'False
Top = 2400
Width = 495
End
Begin VB.TextBox txtW1_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 2
Left = 240
TabIndex = 102
TabStop = 0 'False
Top = 1800
Width = 495
End
Begin VB.TextBox txtB_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 2
Left = 1680
TabIndex = 101
TabStop = 0 'False
Top = 1800
Width = 495
End
Begin VB.TextBox txtW2_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 2
Left = 960
TabIndex = 100
TabStop = 0 'False
Top = 1800
Width = 495
End
Begin VB.TextBox txtW1_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 1
Left = 240
TabIndex = 99
TabStop = 0 'False
Top = 1200
Width = 495
End
Begin VB.TextBox txtB_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 1
Left = 1680
TabIndex = 98
TabStop = 0 'False
Top = 1200
Width = 495
End
Begin VB.TextBox txtW2_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 1
Left = 960
TabIndex = 97
TabStop = 0 'False
Top = 1200
Width = 495
End
Begin VB.TextBox txtW1_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 0
Left = 240
TabIndex = 23
TabStop = 0 'False
Text = "0"
Top = 600
Width = 495
End
Begin VB.TextBox txtB_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 0
Left = 1680
TabIndex = 22
TabStop = 0 'False
Text = "0"
Top = 600
Width = 495
End
Begin VB.TextBox txtW2_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 0
Left = 960
TabIndex = 21
TabStop = 0 'False
Text = "0"
Top = 600
Width = 495
End
Begin VB.Label Label5
Caption = "( W1 W2 B )"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 255
Left = 240
TabIndex = 36
Top = 240
Width = 2055
End
End
Begin VB.Frame Frame5
Caption = "Weight Changes"
Height = 3495
Left = 6360
TabIndex = 8
Top = 840
Width = 2535
Begin VB.TextBox txtDW1_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 1
Left = 240
TabIndex = 96
TabStop = 0 'False
Top = 1560
Width = 495
End
Begin VB.TextBox txtDW1_1
Alignment = 2 'Center
BackColor = &H8000000B&
Height = 375
Index = 0
Left = 240
TabIndex = 19
TabStop = 0 'False
Top = 960
Width = 495
End
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?