Public Class Form1
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
HoldYourpants(2) ‘ wait 2 seconds
HoldYourWater(2) ‘ more efficient code
End Sub
Public Sub HoldYourPants(ByVal PauseTime As Integer)
Dim Start As Double
Start = Microsoft.VisualBasic.Timer ‘ Set start time.
Do While Microsoft.VisualBasic.Timer < Start + PauseTime
Application.DoEvents()
Loop
End Sub
Public Sub HoldYourWater(ByVal Seconds As Integer)
System.Threading.Thread.Sleep(Seconds * 1000)
End Sub
End Class
The following code is a working example for determining the MAC address of your network card.
Imports System.Net.NetworkInformation
Public Class Form1
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
MessageBox.Show(getMacAddress)
End
End Sub
Function getMacAddress()
Dim nics() As NetworkInterface = NetworkInterface.GetAllNetworkInterfaces()
Return nics(1).GetPhysicalAddress.ToString
End Function
End Class
I recently had to define a default Enter button on an ASP.NET page but could not use the Form field because it was inherited from a master page. I eventually discovered that this can be done by defining the button in a panel as shown below.
<asp:Panel runat=”server” DefaultButton=”btnSearch”>
..
<asp:Button ID=”btnSearch” runat=”server” Text=”Search” />
..
</asp:Panel>
Use txtSearch.Focus() to set focus on the default field (in this case txtSearch).
