VB6, Visual Basic 6, Создать текстовый файл, Создать файл, Записать в текстовый файл, Запись в текстовый файл

Visual Basic 6

Dim fs, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile("c:\testfile.txt", ForAppending, TristateFalse)
f.Write "Hello world!"
f.Close

Dim fso As New FileSystemObject
Dim fil As File
Set fil = fso.CreateTextFile("c:\testfile.txt", True)
fil.Close

Теги: VB6, Visual Basic 6, Создать текстовый файл, Создать файл, Записать в текстовый файл, Запись в текстовый файл

VB6, Visual Basic 6, Буфер обмена, ClipBoard

Visual Basic 6

ClipBoard.Clear
ClipBoard.SetText "Какое-нибудь сообщение"

Теги: VB6, Visual Basic 6, Буфер обмена, ClipBoard

VB6, Visual Basic 6, Вывести сообщение, MsgBox, соединение строк, конкатенация строк

Visual Basic 6

MsgBox "ЗначениеПеременной1=" & Переменная1 & ", ЗначениеПеременной2=" & Переменная2

Теги: VB6, Visual Basic 6, Вывести сообщение, MsgBox, соединение строк, конкатенация строк