Код процедуры, включающей таймер Timer1:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
________________________
End Sub
Введите пропущенный оператор (без пробелов, прописными буквами).
Код процедуры, включающей таймер Timer1:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Enabled = ______
End Sub
Введите пропущенное выражение (без пробелов, прописными буквами).
Код процедуры, выполняющей установку размеров формы 200x200 пикселов:
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
ClientSize = New Size_______
End Sub
Введите пропущенное выражение (без пробелов, прописными буквами).
Код процедуры, выполняющей установку размеров формы 200x200 пикселов:
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
ClientSize = New _____(200, 200)
End Sub
Введите пропущенное выражение (без пробелов, прописными буквами).
Код процедуры, выполняющей установку размеров формы 400x400 пикселов:
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
ClientSize = New Size________
End Sub
Введите пропущенное выражение (без пробелов, прописными буквами).
Код процедуры, выполняющей установку размеров формы 400x400 пикселов:
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
ClientSize = New ______(400, 400)
End Sub
Введите пропущенное выражение (без пробелов, прописными буквами).
Код процедуры, выполняющей установку размеров формы 400x400 пикселов:
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
ClientSize = New Size________
End Sub
Введите пропущенное выражение (без пробелов, прописными буквами).
Код процедуры, обеспечивающей вращение квадрата:
Dim f As Integer
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Dim g As Graphics = CreateGraphics()
Dim b As New SolidBrush(Color.Fuchsia)
Dim cx As Integer = ClientSize.Width
Dim cy As Integer = ClientSize.Height
g.TranslateTransform(cx / 2, cy / 2)
g.RotateTransform(f)
g.FillRectangle(b, -100, -100, 100, 100)
f = f - 10
If _______ Then
f = 360
End If
End Sub
Введите пропущенное выражение (без пробелов, прописными буквами).
Код процедуры, обеспечивающей вращение квадрата:
Dim f As Integer
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Dim g As Graphics = CreateGraphics()
Dim p1 As New Pen(Color.Blue, 4)
Dim p2 As New Pen(Color.Violet, 3)
Dim cx As Integer = ClientSize.Width
Dim cy As Integer = ClientSize.Height
g.TranslateTransform(cx / 2, cy / 2)
g.RotateTransform(f)
g.DrawEllipse(p1, -100, -100, 200, 200)
g.DrawLine(p2, -70, -70, 0, 0)
f = f + 6
If ________ Then
f = 0
End If
End Sub
Введите пропущенное выражение (без пробелов, прописными буквами).
Код процедуры, обеспечивающей вращение прямой линии:
Dim f As Integer
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Dim g As Graphics = CreateGraphics()
Dim p1 As New Pen(Color.Blue, 3)
Dim cx As Integer = ClientSize.Width
Dim cy As Integer = ClientSize.Height
g.TranslateTransform(cx / 2, cy / 2)
g.RotateTransform(f)
g.DrawLine(p1, -100, -100, 100, 100)
f = f + 10
If _______ Then
f = 0
End If
End Sub
Введите пропущенное выражение (без пробелов, прописными буквами).
Код процедуры, обрабатывающей события от таймера:
Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Label1.Left =______.Left + 1
Label1.Top =______.Top + 1
If Label1.Left >= ClientSize.Width - Label1.Width Then
Timer1.Enabled = False
End If
End Sub
Введите пропущенное выражение (без пробелов, прописными буквами).
Код процедуры, обрабатывающей события от таймера:
Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Label1.Left = Label1.Left __ 1
Label1.Top = Label1.Top + 1
If Label1.Left <= 0 Then
Timer1.Enabled = False
End If
End Sub
Введите пропущенный оператор.
В Microsoft Visual Basic 2005 Express Edition установить интервал обновления таймера можно с помощью свойства
В Microsoft Visual Basic 2005 Express Edition активизировать таймер можно, установив его свойство Enabled в значение
Для включения/выключения Timer1 необходимо задать свойство таймера (введите прописными буквами):
Для включения/выключения Timer1 необходимо задать свойство таймера (введите прописными буквами):
Для включения/выключения Timer1 необходимо задать свойство таймера (введите прописными буквами):
Для организации движения объектов используются свойства объектов:
Для поворота изображения на указанное число градусов используется метод:
Для построения закрашенного квадрата используется метод (введите прописными буквами):
Для построения прямой линии используется метод (введите прописными буквами):
Для построения эллипса используется метод (введите прописными буквами):
Для установки интервала обновления таймера Timer1 необходимо задать свойство таймера (введите прописными буквами):
Для установки интервала обновления таймера Timer1 необходимо задать свойство таймера (введите прописными буквами):
Поворот на указанное количество градусов выполняет метод:
Сдвиг координат по осям координат выполняет метод:
Событие, инициируемое таймером через заданные промежутки времени:
Событие, инициируемое таймером через заданные промежутки времени:
Укажите соответствие между названием метода Microsoft Visual Basic 2005 и его назначением
Элемент управления, обеспечивающий доступ к системным часам, - это
