VB example

摘要: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