herochat_form.frm
来自「计算机网络课程设计--局域网聊天系统(VB开发的有源程序和完整的报告)」· FRM 代码 · 共 1,321 行 · 第 1/3 页
FRM
1,321 行
TabIndex = 27
Top = 2880
Width = 4455
Begin VB.TextBox AllChat
Height = 3615
Left = 120
Locked = -1 'True
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 28
Top = 240
Width = 4215
End
End
Begin VB.Frame Frame1
Caption = "用户状态"
Height = 2655
Left = 120
TabIndex = 0
Top = 120
Width = 3855
Begin VB.CommandButton Command6
Caption = "中断连接"
Height = 540
Left = 3200
TabIndex = 62
Top = 1560
Width = 540
End
Begin VB.CommandButton Command2
Caption = "请求链接"
Enabled = 0 'False
Height = 540
Left = 3200
TabIndex = 26
Top = 900
Width = 540
End
Begin VB.CommandButton Command1
Caption = "停止请求"
Height = 540
Left = 3200
TabIndex = 25
Top = 240
Width = 540
End
Begin VB.Line Line3
BorderStyle = 3 'Dot
X1 = 2480
X2 = 2480
Y1 = 240
Y2 = 2280
End
Begin VB.Line Line2
BorderStyle = 3 'Dot
X1 = 1680
X2 = 1680
Y1 = 240
Y2 = 2280
End
Begin VB.Line Line1
BorderStyle = 3 'Dot
X1 = 840
X2 = 840
Y1 = 240
Y2 = 2280
End
Begin VB.Label L
Caption = "24:离线"
Height = 195
Index = 24
Left = 2520
TabIndex = 24
Top = 2040
Width = 700
End
Begin VB.Label L
Caption = "23:离线"
Height = 195
Index = 23
Left = 2520
TabIndex = 23
Top = 1680
Width = 700
End
Begin VB.Label L
Caption = "22:离线"
Height = 195
Index = 22
Left = 2520
TabIndex = 22
Top = 1320
Width = 700
End
Begin VB.Label L
Caption = "21:离线"
Height = 195
Index = 21
Left = 2520
TabIndex = 21
Top = 960
Width = 700
End
Begin VB.Label L
Caption = "20:离线"
Height = 195
Index = 20
Left = 2520
TabIndex = 20
Top = 600
Width = 700
End
Begin VB.Label L
Caption = "19:离线"
Height = 195
Index = 19
Left = 2520
TabIndex = 19
Top = 240
Width = 700
End
Begin VB.Label L
Caption = "18:离线"
Height = 195
Index = 18
Left = 1725
TabIndex = 18
Top = 2040
Width = 700
End
Begin VB.Label L
Caption = "17:离线"
Height = 195
Index = 17
Left = 1725
TabIndex = 17
Top = 1680
Width = 700
End
Begin VB.Label L
Caption = "16:离线"
Height = 195
Index = 16
Left = 1725
TabIndex = 16
Top = 1320
Width = 700
End
Begin VB.Label L
Caption = "15:离线"
Height = 195
Index = 15
Left = 1725
TabIndex = 15
Top = 960
Width = 700
End
Begin VB.Label L
Caption = "14:离线"
Height = 195
Index = 14
Left = 1725
TabIndex = 14
Top = 600
Width = 700
End
Begin VB.Label L
Caption = "13:离线"
Height = 195
Index = 13
Left = 1725
TabIndex = 13
Top = 240
Width = 700
End
Begin VB.Label L
Caption = "12:离线"
Height = 195
Index = 12
Left = 915
TabIndex = 12
Top = 2040
Width = 700
End
Begin VB.Label L
Caption = "09:离线"
Height = 195
Index = 9
Left = 915
TabIndex = 11
Top = 960
Width = 700
End
Begin VB.Label L
Caption = "08:离线"
Height = 195
Index = 8
Left = 915
TabIndex = 10
Top = 600
Width = 700
End
Begin VB.Label L
Caption = "07:离线"
Height = 195
Index = 7
Left = 915
TabIndex = 9
Top = 240
Width = 705
End
Begin VB.Label L
Caption = "06:离线"
Height = 195
Index = 6
Left = 120
TabIndex = 8
Top = 2040
Width = 700
End
Begin VB.Label L
Caption = "05:离线"
Height = 195
Index = 5
Left = 120
TabIndex = 7
Top = 1680
Width = 700
End
Begin VB.Label L
Caption = "04:离线"
Height = 195
Index = 4
Left = 120
TabIndex = 6
Top = 1320
Width = 700
End
Begin VB.Label L
Caption = "03:离线"
Height = 195
Index = 3
Left = 120
TabIndex = 5
Top = 960
Width = 700
End
Begin VB.Label L
Caption = "02:离线"
Height = 195
Index = 2
Left = 120
TabIndex = 4
Top = 600
Width = 700
End
Begin VB.Label L
Caption = "01:离线"
Height = 195
Index = 1
Left = 120
TabIndex = 3
Top = 240
Width = 700
End
Begin VB.Label L
Caption = "10:离线"
Height = 195
Index = 10
Left = 915
TabIndex = 2
Top = 1320
Width = 700
End
Begin VB.Label L
Caption = "11:离线"
Height = 195
Index = 11
Left = 915
TabIndex = 1
Top = 1680
Width = 700
End
End
Begin VB.Timer Timer1
Interval = 2000
Left = 360
Top = 120
End
Begin MSWinsockLib.Winsock SockSent
Index = 1
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 2
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 3
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 4
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 5
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 6
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 7
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 8
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 9
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 10
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 11
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 12
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 13
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 14
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 15
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 16
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 17
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 18
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
Begin MSWinsockLib.Winsock SockSent
Index = 19
Left = 0
Top = 120
_ExtentX = 741
_ExtentY = 741
_Version = 393216
End
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?