mozgotron (VisualBasic) все записи автора Private Sub Text1_KeyPress(KeyAscii As Integer) ' Процедура фильтрации символов, недопустимых в файловых именах
Select Case KeyAscii
Case 34, 42, 47, 58, 60, 62, 63, 92, 124
KeyAscii = 0
End Select
Text1.MaxLength = 256 - Len(File1.Path + "\") ' Ограничение количества символов для файлового имени
End Sub

В этом листинге:
File1 — указание на элемент управления FileListBox, в котором пользователь выбрал переименовываемый файл.
Text1 — указание на элемент управления TextBox, в который пользователь вводит новое имя файла перед переименованием.

Bizkit (VisualBasic) все записи автора нуна сделать 4 задания в Visual Basic'е

1)написать программу которая проверяет являеться ли введенная с клавиатуры квадратная матрица магическим квадратом(магическим квадратом наз матрица сумма элементов которой в каждой строке в каждом столбце и каждой диагонали одинаково)


2)программа для подсчета количества цифр в десятичной записи целого неотрицательного числа

3)написать программу печатуюшую четверки простых чисел введеных с клавиатуры последовательность чисел принадлежаших одному десятку(например 11,13,17,18)

4)программма. данна последовательность различных чисел за которыми следует ноль. определить порядковый номер наименьшего из них..

ребят помогите пожалуйста горю)))
просто програмнный код нужен плиз!))))

Manequin (VisualBasic) все записи автора Hello , я - модератор данного сообщества. У меня давно была мысль посвятить VB дневник или сообщество , что я , собственно и сделал. Я надеюсь , что у меня найдутся сообщники:) Итак , здесь будет:
1) Обмен исходниками, секретами , прогами , статьями.
2) И все вытекающее из первого пункта...
Спасибо за внимание. По всем вопросам и предложениям оставлять комменты в этом посте.

Сообщество програмистов , пишущих на VB - обмен статьями , исходниками , секретами.

Сообщество програмистов , пишущих на VB - обмен статьями , исходниками , секретами.