📄 module1.bas

📁 电子书“Visual Basic 6 网络编程实例教程.rar”

💻 BAS

字号:

Attribute VB_Name = "Module1"
Option Explicit

Public Const NETWORK_ALIVE_LAN = &H1  '网卡连接
Public Const NETWORK_ALIVE_WAN = &H2  'RAS连接
Public Const NETWORK_ALIVE_AOL = &H4  'AOL
       
Public Declare Function IsNetworkAlive Lib "Sensapi.dll" _
  (lpdwFlags As Long) As Long

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -