Проект с формой, но форму не показываем
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim x As Integer = InputBox("Введите число")
MsgBox(x ^ 2)
End
End Sub
Вы помните, что форма появляется на экране только после завершения работы процедуры Form1_Load. Здесь компьютер просит нас ввести число, затем вычисляет и показывает нам его квадрат. Проект завершает свою работу оператором End, вследствие чего форма на экране так и не успевает появиться.
Проект работал без появления формы на экране, однако форма-то все равно была невидимо загружена, хотя в ней и не было нужды. На ее загрузку были израсходованы ресурсы компьютера, а их рекомендуется экономить. Решим ту же задачу возведения в квадрат без загрузки формы.