воскресенье, 22 июня 2014 г.

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



      Укажите свойство, которое не позволит вводить текст в элементе TextBox при помощи клавиатуры

 



      Укажите свойство элемента TextBox, отвечающее за фоновый цвет
А. Lock  
Б. Location
В. TextAlign
Г. Multiline

      Какие действия выполнит программа
Private Sub Button34_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button34.Click
TextBox1.Text += " "
End Sub

 




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

 



      Какие действия выполнит программа
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If Button1.Text = "й" Then
            TextBox1.Text = "й"
        ElseIf Button1.Text = "q" Then
            TextBox2.Text += "q"
   End If
End Sub

 






      Какие действия выполнит программа
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        TextBox1.Text &= "н"
 End Sub

 





      Какие действия выполнит элемент Button1.
А) Если в элементах TextBox1 и TextBox2 будут введены буквы
Б) Если в элементах TextBox1 и TextBox2 будут введены цифры

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim x As String = TextBox1.Text
        Dim y As String = TextBox2.Text

        TextBox3.Text = (x + y)
End Sub

                А)
 



                Б)
 




       Какие действия выполнит программа. Если на кнопках: Button5 свойство Text="e", Button4 Button5 свойство Text="к", Button 3 свойство Text="  ",  Button 2 свойство Text="  ",  Button1 свойство Text=" й"
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
             Dim z As String = Button2.Text
             Dim x As Double
             Button1.Text = "q"
             Button2.Text = z + z
             Button3.Text = (x + 5)
       Button4.Text = "r"
       Button5.Text += "t"
End Sub
 







      Какие действия выполнит программа
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      Button1.Text = "Программа работает"
         Button1.BackColor = Color.Green
      TextBox1.TextAlign = HorizontalAlignment.Right
         TextBox1.Text = "Программа работает нормально"
Button2.Text=TimeOfDay
    End Sub
 







      Напишите код программы. Задача программы: нажатие на кнопку Button5 (свойство text= EN) текст на кнопках Button1 и Button2 меняется на английские буквы, нажатие на кнопку button6 (свойство text= РУ) текст на кнопках Button3 и Button4 меняется на русские буквы. В окне TextBox1 после нажатия на кнопки  Button1, Button2, Button3 и Button4 вводится текст соответственно отображаемой букве на кнопке