|
|||||
|
show all subfolders of a drive show all subfolders Dim subs() As String subs = System.IO.Directory.GetDirectories("c:\") Dim enumerator As System.Collections.IEnumerator enumerator = subs.GetEnumerator While enumerator.MoveNext Console.WriteLine(CStr(enumerator.Current)) End While Bookmark It display icon in picturebox control display icon in picturebox control Private Sub Form1_Load(ByVal sender As System.Object Bookmark It App path in VB.net App path in VB.net Module Module1 Sub Main() Console.WriteLine(System.AppDomain.CurrentDomain.BaseDirectory()) End Sub End Module Bookmark It get ip address get ip address Module Module1 Sub Main() Dim h As System.Net.IPHostEntry = System.Net.Dns.GetHostByName(System.Net.Dns.GetHostName) Console.WriteLine(CType(h.AddressList.GetValue(0) Bookmark It opening and reading a file using the FileStream a filestream example Imports System.IO Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object Bookmark It |
  |
||||
|
Copyright © 2012 Programmingsite : source code - All Rights Reserved |
|||||
