1 Κάντε κλικ στο κουμπί " Start" και στη συνέχεια κάντε κλικ στο " Microsoft Visual Basic 6 . " 2
Κάντε κλικ στο " Αρχείο ", επιλέξτε "Άνοιγμα " και στη συνέχεια κάντε διπλό κλικ η Visual Basic αρχείο στο οποίο θέλετε να προσθέσετε τη λειτουργία ανάκτησης το όνομα του υπολογιστή από το μητρώο των Windows
εικόνων 3
Προσθέστε τον ακόλουθο κώδικα στην αρχή του προγράμματός σας : .
Private Declare Function GetComputerName Lib " kernel32 " Alias
" GetComputerNameA " ( ByVal lpBuffer As String , nSize Όπως Long) Όπως
Long
ComputerName Function ( ) Όπως String
Dim strComputername Όπως String Dim
lngSize Όπως Long
Dim lngRetval Όπως Long
strComputername = Διάστημα ( 255 )
lngSize = 255
lngRetval = GetComputerName ( strComputername , lngSize )
ComputerName = Mid $ ( strComputername , 1 , lngSize )
Function End
Η 4
Κάντε κλικ στο " Αρχείο ", επιλέξτε " Αποθήκευση ", και στη συνέχεια κάντε κλικ στο " OK " για να προσθέσετε τη λειτουργία της ανάκτησης ενός ονόματος υπολογιστή στο πρόγραμμα .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα