T A J P R O G Якшанбе, 15.09.2019, 16:54
Приветствую Вас Гость | RSS
Меню сайта

Наш опрос
Аз кадом фанн маълумотнома лозим аст!
Ҷавобҳо ҳамагӣ: 2328

Статистика

Онлайн ҳамагӣ: 1
Меҳмон: 1
Истифодабаранда: 0


22:38
Дарси 38. Ба даст овардани номи ҳаммаи дискҳои компютер
 Dim D() As IO.DriveInfo = IO.DriveInfo.GetDrives
        For Each DI As IO.DriveInfo In D
            MsgBox(DI.Name)
        Next

роҳи дигар

 

 Dim D() As IO.DriveInfo = IO.DriveInfo.GetDrives
        For Each DI As IO.DriveInfo In D
            If DI.DriveType = IO.DriveType.Fixed Then
                MsgBox(DI.Name)
            End If
        Next
Просмотров: 118 | Добавил: aplove | Рейтинг: 0.0/0
Всего комментариев: 0
Ном *:
Email:
Код *:
Реклама

Поиск

Календарь
«  Май 2014  »
ДСЧПҶШЯ
   1234
567891011
12131415161718
19202122232425
262728293031

Архив записей

Друзья сайта

Copyright © Умаров Алибек 2019,. Все права защищены.