VB中的不明代码 - VB / 数据库(包含打印，安装，报表)

这是VB中的两段代码.看不明白.请高人指教

Private Declare Function setWindowPos Lib "user 32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long




Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpbuffer As String, nSize As Long) As Long

---

这是引用API用的定义. 你可以在VB的API浏览器里面找到各种API的定义
API就是系统预设好的一些功能函数,你编程的时候可以利用API来实现光用VB无法解决的问题

---

Windows API 函数：

Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long



【操作系统】
Win9X:Yes
WinNT:Yes
【说明】
  这个函数能为窗口指定一个新位置和状态。它也可改变窗口在内部窗口列表中的位置。该函数与DeferWindowPos函数相似，只是它的作用是立即表现出来的（在vb里使用：针对vb窗体，如它们在win32下屏蔽或最小化，则需重设最顶部状态。如有必要，请用一个子类处理模块来重设最顶部状态 
【返回值】
  Long，非零表示成功，零表示失败。会设置GetLastError 
【其它】
  窗口成为最顶级窗口后，它下属的所有窗口也会进入最顶级。一旦将其设为非最顶级，则它的所有下属和物主窗口也会转为非最顶级。Z序列用垂直于屏幕的一根假想Z轴量化这种从顶部到底部排列