Private Declare Sub

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

声明引用一个私有的函数Sleep()，参数是一个长整形的参数（毫秒数）。

Lib “kernel32”标明这个函数是引用kernel32.dll提供的函数。Kernel32.dll是windows的四个核心库之一。
是用来延时n毫秒的。函数 无返回值。

在Visual Basic中，按值传递方式通过关键字 ByVal (By Value)来实现。也就是说，在定义通用过程时，如果形参前面有关键字ByVal，则该参数用传值方式传送，否则即以引用（即按地址）方式传递。