VBNet - все что Вы хотели знать о VB, но не знали где найти!

Visual Basic, .NET, ASP, VBA, VBScript

	Как получить имена всех дисков
	Функция возвращает имена всех логических дисков. Добавьте на форму элемент Button. Public Function ListAllDrives() As String() Dim arDrives() As String arDrives = Directory.GetLogicalDrives() Return arDrives End Function Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim sDrive As String, sDrives() As String sDrives = ListAllDrives() For Each sDrive In sDrives Debug.WriteLine(sDrive) Next End Sub

VBNet online (всего: 52050)

Лучшие материалы

ActiveX контролы (112)

Примеры кода (546)

Статьи по VB (136)