Тест Visual Basic (часть 2)

      Укажите свойство, которое изменит цвет надписи на элементе Button

      Выберите свойство элемента TextBox, отвечающее за возможность создания нескольких строк текста

А. Lock  

Б. Location

В. TextAlign

Г. Multiline

        

      Какие действия выполнит программа

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

MsgBox("Текстовое сообщение")

TextBox1.Text = "Текст"

                End Sub

      Укажите свойство, которое запретит раскрывать приложение Form на весь экран

      Какие действия выполнит программа

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

 If TextBox1.Text = "Козьма Прутков" Then

                 MsgBox("Лучше скажи мало, но хорошо")

TextBox1.Text = "Введи имя"

                 ElseIf TextBox1.Text = "Клавдий" Then

                MsgBox("Не говори всегда что знаешь, но знай всегда что говоришь")

TextBox1.Text = ""

                 End If

 

       Какие действия выполнит программа

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

                Button1.Text = "Ответ"

                Button2.Text = "Очистить"

                BackColor = Color.Beige 

                End Sub

 

       Какие действия выполнит элемент Button1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

MsgBox("Текстовое сообщение")

MsgBox("Текстовое сообщение")

End Sub

  

         Какие действия выполнит программа

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

                 If TextBox1.Text = "Ко" Then

                 TextBox2.Text = "Козьма Прутков"

                 ElseIf TextBox1.Text = "Кл" Then

                TextBox2.Text = "Клавдий"

                 End If

                 If TextBox1.Text = "красный" Then

                 BackColor = Color.Red

                 End If

 

             Какие действия выполнит программа

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click

                If TextBox1.Text = "синий" Then

                BackColor = Color.Blue

                ForeColor = Color.White

                Button1.ForeColor = Color.Black

                End If

 

      Напишите код программы. Задача программы: в окне TextBox1 вводится слово на английском языке, в окне TextBox2 после нажатия на элемент Button1 появляется перевод на русском языке.

В окне TextBox2 вводится слово на русском языке, в окне TextBox1 после нажатия на элемент Button2 появляется перевод на английском языке.