摘要:VB example
Public Shared Sub UseVariableParameters() Shared Sub UseVariableParameters(ParamArray list() as??Integer)??
???? For??i as Integer = 0??to list.Length -1??
????????Console.WriteLine(list(i))
???? Next i??
???? Console.WriteLine()
End Sub
????Public Function bAlreadyOpen() Function bAlreadyOpen(ByVal psProcessName As String) As Boolean
????????Try
????????????mProcess = New Mutex(False, psProcessName)
????????????If mProcess.WaitOne(10, False) Then
????????????????bAlreadyOpen = False
????????????Else
????????????????bAlreadyOpen = True
????????????End If
????????Catch Err As Exception
????????????Call ErrHandler(Err.Message, APP_NAME)
????????End Try
????End Function
------------------
热爱生命 喜爱新奇 有趣的事物
过去 是无法改变
将来 却能够创造
希望使大家生活更便利
世界更美好
a guy who loves IT and life
原文:大专栏 VB example