Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Pridať vnútorné funkcie systému Windows Visual Basic kód súboru . Operačný systém Windows má funkciu interného pridáte kód , ktorý vám umožní získať názov počítača . Pridajte nasledujúci kód na začiatku svojho kódu súboru :
Declare Function GetComputerName Lib " Kernel32 " Alias " GetComputerNameA " ( ByVal lpBuffer As String , nVeľkosť As Long ) As Long
2
Načítať názov počítača . Nasledujúci kód vytvorí premennú a používa pridanou funkciu v kroku 1 , aby sa názov počítača :
Dim name As String
meno = GetComputerName ( strBuffer , lngBufSize )
sims 3
Zobrazte načítať názov počítača . To je výhodné pri testovaní aplikácie alebo keď chcete zobraziť výsledky užívateľmi . Pridajte nasledujúci kód na zobrazenie výsledkov :
MsgBox ( " Meno počítača je : " & name )
Copyright © počítačové znalosti Všetky práva vyhradené