www.pudn.com > DataCollectionSystem.rar > modFunction.bas, change:2003-05-20,size:296b


Attribute VB_Name = "modFunction" 
Option Explicit 
Private Declare Function timeGetTime Lib "winmm.dll" () As Long 
 
Public Sub ShowMoveText() 
   frmMain.MyMoveText.SetFontSize (14) 
   frmMain.MyMoveText.SetMoveText ("全站仪自动化监测信息系统") 
   frmMain.MyMoveText.SetTimer (36) 
End Sub