just put your code in function method.
this an example :
Public Function GetSpecialFolder(ByVal mFolder As Environment.SpecialFolder) As String
GetSpecialFolder = Environment.GetFolderPath(mFolder)
Private Sub Form1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label1.Text = GetSpecialFolder(Environment.SpecialFolder.System)
Thx For Replying But I Dont want this..Actually my sir told me that this method is not so appropraite..He told that Suppose u on one PC window is installed on C: and on other window is installed on D:.Thn it won't work........