Задание 1:

Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim a As Double = Val(TextBox1.Text)
Dim b As Double = Val(TextBox2.Text)
Dim h As Double = Val(TextBox3.Text)
Dim area As Double = (a + b) * h / 2
MessageBox.Show("Площадь трапеции равна: " & area)
End Sub
End Class

Задание 2:

Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim rnd As New Random
Me.BackColor = Color.FromArgb(rnd.Next(256), rnd.Next(256), rnd.Next(256))
Me.Width = rnd.Next(200, 800)
Me.Height = rnd.Next(200, 600)
End Sub
End Class

Это примеры простых программ на Visual Basic, которые могут решить задачи по вычислению площади трапеции и изменению цвета и размера формы.