quarta-feira, 7 de setembro de 2011

on

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

        MsgBox(My.Computer.Info.OSFullName)
        MsgBox(My.Computer.Info.OSPlatform.ToString)
        MsgBox(My.Computer.Info.OSVersion.ToString)

    End Sub

Espero ter ajudado e att.

0 comentários:

Postar um comentário