Second Life Blog

Offentlig Funksjon SoftReset () As Integer
Dim bytesReturned As Integer = 0
Dim R Som System.Windows.Forms.DialogResult
"Vis brukeren en dialog først, gi dem muligheten til å avbryte
r = System.Windows.Forms.MessageBox.Show (_
"Kjører denne testen vil myke tilbakestille enhet og avbryter påfølgende tester. Ønsker du å fortsette? ", _
"ResetDevice Test", _
System.Windows.Forms.MessageBoxButtons.YesNo, _
System.Windows.Forms.MessageBoxIcon.Question, _
System.Windows.Forms.MessageBoxDefaultButton.Button2 _
)
'Dersom brukeren sa "ja, soft reset", da ...
Hvis r = System.Windows.Forms.DialogResult.Yes Deretter
Dim IOCTL_HAL_REBOOT As Integer = CTL_CODE (FILE_DEVICE_HAL, _
15, METHOD_BUFFERED, FILE_ANY_ACCESS)
"Kjør funksjonen fra coredll.dll
Tilbake KernelIoControl (IOCTL_HAL_REBOOT, IntPtr.Zero, 0, _
IntPtr.Zero, 0, bytesReturned)
Else
'Dersom brukeren sa "nei, ikke soft reset", deretter vise en melding
Boksen
System.Windows.Forms.MessageBox.Show ("Soft Reset avbrutt av bruker")
Tilbake bytesReturned
End If
End Function