忍者ブログ

[PR]

2024年11月21日
×

[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。

Environ関数

2009年06月08日
APIでもPC名等だせますが、VBで簡単に出す方法
 
Private Sub Environ一覧()
    Dim K As Integer
    Dim S As String
    Do
        K = K + 1
        S = Environ(K)
        Debug.Print S
    Loop Until S = ""
End Sub
Kの部分は文字列で指定しても良い

拍手[0回]

PR
Comment
  Vodafone絵文字 i-mode絵文字 Ezweb絵文字
Trackback
トラックバックURL: