Public Class Form1
Private R As New Random
Private tabs As New ArrayList
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
For Each tp As TabPage In TabControl1.TabPages
Private Sub ShowRandomTabs(ByVal number As Integer)
Dim temp As New ArrayList
For Each tp As Object in tabs
Dim index As Integer
For i As Integer = 1 to number
If temp.Count > 0 Then
index = R.Next(0, temp.Count)
Open in new window
Be seen. Boost your question’s priority for more expert views and faster solutions
Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.