Declare Function SetComputerName Lib "kernel32" _
Alias "SetComputerNameA" (ByVal lpComputerName As String) As Long
Private Sub cmdChange_Click()
SetComputerName txtNewName.Text
End Sub
[Code] Change Pc Name from VB6 **Code Shared By mjridoy5**
Subscribe to:
Post Comments (Atom)
0 Comments:
Post a Comment