Как пользоваться функцией Environ -> Форум на Исходниках.Ру

	Наши проекты: Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту

Здравствуйте, Гость ! [3.149.26.176]

Модераторы: SCINER, B.V.

Как пользоваться функцией Environ

D[u]fa

Сообщ. #1 , 30.03.04, 17:28

Master

Рейтинг (т): 112

Environ("windir") – возвращает каталог Windows

Environ("temp") - возвращает директорию временных файлов TEMP

Environ("tmp") - возвращает директорию временных файлов TMP

Но это ещё не всё

Добавьте на форму Textbox, установите свойство Multiline = True и введите следующий код:

Dim i As Integer, EnvString As String

Private Sub Form_Load()

i = 1

EnvString = Environ(i)

Text1.Text = Text1.Text + vbCrLf + Environ(i)

i = i + 1

Loop Until EnvString = ""

End Sub

0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)

0 пользователей:

[ Script execution time: 0,0139 ] [ 16 queries used ] [ Generated: 26.04.24, 21:12 GMT ]