电竞比分网-中国电竞赛事及体育赛事平台

分享

獲取計(jì)算機(jī)名稱

 Ark.xu 2012-01-08

Private Sub Command1_Click()

Dim aa,a1 As String

 

aa =aa & "本機(jī)電腦名稱:" & Environ("computername") & vbCrLf

aa1 = a1 & "本機(jī)用戶名稱:" & Environ("username") & vbCrLf


End Sub

'文內(nèi)容...

    本站是提供個(gè)人知識(shí)管理的網(wǎng)絡(luò)存儲(chǔ)空間,所有內(nèi)容均由用戶發(fā)布,不代表本站觀點(diǎn)。請(qǐng)注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購買等信息,謹(jǐn)防詐騙。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)點(diǎn)擊一鍵舉報(bào)。
    轉(zhuǎn)藏 分享 獻(xiàn)花(0

    0條評(píng)論

    發(fā)表

    請(qǐng)遵守用戶 評(píng)論公約

    類似文章 更多