我按照此页面安装了phalcon dev工具。
https://docs.phalconphp.com/en/3.1.0/reference/linuxtools.html
问题是,当我在终端中键入$ phalcon 时,会给出此回复:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim t As Task = Task.Run(Sub()
RecurseNodes(TreeView1.Nodes(0))
End Sub)
End Sub
Private Sub RecurseNodes(ByVal col As TreeNode)
For Each tn As TreeNode In col.Nodes
If tn.Level < 2 AndAlso tn.Nodes.Count > 0 Then
RecurseNodes(tn)
ElseIf tn.Level = 2 Then
Dim tp As Task
tp = Task.Run(Sub()
Dim c As Color
Dim idx As Integer
Try
If My.Computer.Network.Ping(tn.Text) Then
c = Color.Green
idx = 4
Else
c = Color.Red
idx = 5
End If
Catch ex As Exception
c = Color.Red
idx = 5
End Try
Me.Invoke(Sub()
tn.ForeColor = c
tn.StateImageIndex = idx
End Sub)
End Sub)
End If
Next tn
End Sub