/[cvs]/joko/TestArea/vb/NtServices/ServiceApp/FirstSteps/declares.bas
ViewVC logotype

Contents of /joko/TestArea/vb/NtServices/ServiceApp/FirstSteps/declares.bas

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (show annotations)
Mon Jan 20 19:21:32 2003 UTC (21 years, 10 months ago) by joko
Branch: MAIN
CVS Tags: HEAD
+ initial check-in

1 Attribute VB_Name = "declares"
2 Option Explicit
3 Public Declare Sub DebugBreak Lib "kernel32" ()
4
5 Sub setCurrentStatus(txtStatus As String)
6 ServiceMain.StatusBar.Panels(1).Text = txtStatus
7 End Sub
8
9

MailToCvsAdmin">MailToCvsAdmin
ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed