Как создать массив? (i = len(text1.text) Dim q(i))

ActiveX Control: Form1.Show bvModal if(Form1.Text1.Text <> '') then UserControl.Text2.Text = Form1.Text1.Text
Имеется проект ActiveX Control, в нем: Form1(имеет Text1, Button1), UserControl1 (имеет Text2,...

Проблема с WInsock'ом Winsock1.GetData Data, vbString Text1.Text = Text1.Text & Data
Получаю данные так: Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long) Dim Data As String...

как сделать что бы 22 числа каждого месяца в text1.text прибавлялось 1?
как сделать что бы 22 числа каждого месяца в text1.text прибавлялось 1? по сути программа...

Text1.Text = "" не очищает Text1
Пример из учебника. Обычное считывание текстового файла. Автор демонстрирует выполнение одного и...

Text1.Text = CommonDialog1.FileTitle
Dopustim ja cherez Common Dialog zapisal v TextBox put' faila. A kak uznat' proso imia faila?

Описать функцию FillStr(S,Len), возвращающую строку длины Len, заполненную повторяющимися копиями строки-шаблона S
Описать функцию FillStr(S,Len) строкового типа, возвращающую строку длины Len, заполненную...

В ассеsse2000 при компиляции модуля выдает ошибку на строки Dim DB As Database Dim q1 As QueryDef
В ассеsse2000 при компиляции модуля выдает ошибку на строки Dim DB As Database Dim q1 As QueryDef...

Ошибка user.exe в коде: Private Sub Text1_Change() If Text1.Text = 'del' Then Unload Me End If End Sub
Подскажите, плз. Почему происходит ошибка Windows, User.exe выполнила недопустимую операцию и будет...