Code/Resource
Windows Develop
Linux-Unix program
Internet-Socket-Network
Web Server
Browser Client
Ftp Server
Ftp Client
Browser Plugins
Proxy Server
Email Server
Email Client
WEB Mail
Firewall-Security
Telnet Server
Telnet Client
ICQ-IM-Chat
Search Engine
Sniffer Package capture
Remote Control
xml-soap-webservice
P2P
WEB(ASP,PHP,...)
TCP/IP Stack
SNMP
Grid Computing
SilverLight
DNS
Cluster Service
Network Security
Communication-Mobile
Game Program
Editor
Multimedia program
Graph program
Compiler program
Compress-Decompress algrithms
Crypt_Decrypt algrithms
Mathimatics-Numerical algorithms
MultiLanguage
Disk/Storage
Java Develop
assembly language
Applications
Other systems
Database system
Embeded-SCM Develop
FlashMX/Flex
source in ebook
Delphi VCL
OS Develop
MiddleWare
MPI
MacOS develop
LabView
ELanguage
Software/Tools
E-Books
Artical/Document
Dialog.frm
Package: VBTest.rar [view]
Upload User: hbj111
Upload Date: 2022-07-30
Package Size: 107k
Code Size: 2k
Category:
Com Port
Development Platform:
Visual Basic
- VERSION 5.00
- Begin VB.Form dlgAddr
- BorderStyle = 3 'Fixed Dialog
- Caption = "指定IP地址及端口号"
- ClientHeight = 3195
- ClientLeft = 2760
- ClientTop = 3750
- ClientWidth = 6030
- LinkTopic = "Form1"
- MaxButton = 0 'False
- MinButton = 0 'False
- ScaleHeight = 3195
- ScaleWidth = 6030
- ShowInTaskbar = 0 'False
- Begin VB.TextBox txtPort
- Height = 375
- Left = 1440
- TabIndex = 5
- Top = 480
- Width = 2415
- End
- Begin VB.TextBox txtIP
- Height = 390
- Left = 1440
- TabIndex = 3
- Top = 0
- Width = 2415
- End
- Begin VB.CommandButton btnCancel
- Caption = "取消"
- Height = 375
- Left = 3120
- TabIndex = 1
- Top = 2520
- Width = 1215
- End
- Begin VB.CommandButton btnOK
- Caption = "确定"
- Height = 375
- Left = 840
- TabIndex = 0
- Top = 2520
- Width = 1215
- End
- Begin VB.Label Label2
- Caption = "端口号:"
- Height = 255
- Left = 600
- TabIndex = 4
- Top = 600
- Width = 735
- End
- Begin VB.Label Label1
- Caption = "IP地址:"
- Height = 255
- Left = 600
- TabIndex = 2
- Top = 120
- Width = 855
- End
- End
- Attribute VB_Name = "dlgAddr"
- Attribute VB_GlobalNameSpace = False
- Attribute VB_Creatable = False
- Attribute VB_PredeclaredId = True
- Attribute VB_Exposed = False
- Option Explicit
- Private Sub btnCancel_Click()
- Me.Hide
- End Sub
- Private Sub btnOK_Click()
- Me.Hide
- Me.Tag = "1"
- End Sub
- Private Sub Form_Load()
- Me.Tag = "0"
- End Sub