Scribd Logo
Upload

Welcome to Scribd!

  • 2K views

    Lab Exercises

    Uploaded by

    atul211988
    The document contains code for 3 Vb.net programs: 1. A program to design a form with a combo box to select questions, display the question and options in controls, submit an answer and display the result. 2. A program to accept a character, check if it is a vowel, and display the case. 3. A program to accept a number, calculate its square root, convert it to binary, and display the results.

    Copyright:

    © All Rights Reserved
    Download as DOCX, PDF, TXT or read online from Scribd

    Lab Exercises

    Uploaded by

    atul211988
    2K views6 pages
    The document contains code for 3 Vb.net programs: 1. A program to design a form with a combo box to select questions, display the question and options in controls, submit an answer and display the result. 2. A program to accept a character, check if it is a vowel, and display the case. 3. A program to accept a number, calculate its square root, convert it to binary, and display the results.

    Original Title

    VB.NET Lab Exercises

    Copyright

    © © All Rights Reserved

    Available Formats

    DOCX, PDF, TXT or read online from Scribd

    Did you find this document useful?

    Is this content inappropriate?

    The document contains code for 3 Vb.net programs: 1. A program to design a form with a combo box to select questions, display the question and options in controls, submit an answer and display the result. 2. A program to accept a character, check if it is a vowel, and display the case. 3. A program to accept a number, calculate its square root, convert it to binary, and display the results.

    Copyright:

    © All Rights Reserved
    Download as DOCX, PDF, TXT or read online from Scribd
    Download as docx, pdf, or txt
    2K views6 pages

    Lab Exercises

    Uploaded by

    atul211988
    The document contains code for 3 Vb.net programs: 1. A program to design a form with a combo box to select questions, display the question and options in controls, submit an answer and display the result. 2. A program to accept a character, check if it is a vowel, and display the case. 3. A program to accept a number, calculate its square root, convert it to binary, and display the results.

    Copyright:

    © All Rights Reserved
    Download as DOCX, PDF, TXT or read online from Scribd
    Download as docx, pdf, or txt
    You are on page 1of 6

    1.Write a Vb.

    net program to design the following form, select the question


    number from combo box that question will be displayed into textbox and the
    options for that question will be displayed on four radio buttons, select option
    and click on submit button result should be displayed in another textbox.

    Public Class Form1

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e


    As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

            If ComboBox1.SelectedItem() = "Question 1" Then

                RichTextBox1.Text = "What is Capital Of India ?"

                RadioButton1.Text = "Delhi"

                RadioButton2.Text = "Pune"

                RadioButton3.Text = "Mumbai"

                RadioButton4.Text = "Chennai"

            End If
            If ComboBox1.SelectedItem() = "Question 2" Then

                RichTextBox1.Text = "What is Capital Of Maharashtra ?"

                RadioButton1.Text = "Pune"

                RadioButton2.Text = "Nagpur"

                RadioButton3.Text = "Mumbai"

                RadioButton4.Text = "Nagar"

            End If

        End Sub

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


    Handles Button1.Click

            Dim correct As String

            Dim wrong As String

            correct = "Answer is correct"

            wrong = "Answer is wrong"

            If ComboBox1.SelectedItem() = "Question 1" Then

                If RadioButton1.Checked Then

                    TextBox1.Text = correct

                ElseIf RadioButton2.Checked Then

                    TextBox1.Text = wrong

                ElseIf RadioButton3.Checked Then

                    TextBox1.Text = wrong

                ElseIf RadioButton4.Checked Then

                    TextBox1.Text = wrong

                End If

            End If
            If ComboBox1.SelectedItem() = "Question 2" Then

                If RadioButton1.Checked Then

                    TextBox1.Text = wrong

                ElseIf RadioButton2.Checked Then

                    TextBox1.Text = wrong

                ElseIf RadioButton3.Checked Then

                    TextBox1.Text = correct

                ElseIf RadioButton4.Checked Then

                    TextBox1.Text = wrong

                End If

            End If

        End Sub

    End Class

    2. Write a Vb.net program to accept a character from keyboard and check whether it is vowel or
    not. Also display the case of that character.

    Public Class Form1

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


    Handles Button1.Click

            Dim ch As Char

            ch = TextBox1.Text

            Select Case ch

                Case "A", "E", "I", "O", "U"

                    MessageBox.Show(ch + " is Vowel And UpperCase")


                Case "a", "e", "i", "o", "u"

                    MessageBox.Show(ch + " is Vowel And LowerCase")

                Case Else

                    MessageBox.Show(ch + " is Not Vowel")

            End Select

        End Sub

    End Class

    3. Write a Vb.net program to accept number from user into the TextBox. Calculate the square root of
    that number also convert the entered number into binary number and display result into the Message
    Box

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

            Dim n As Integer

            Dim sqr As Double

            Dim rm As Integer

            Dim str1 As String

            n = CInt(TextBox1.Text)

            sqr = Math.Sqrt(n)

            While n

                rm = n Mod 2

                str1 = str1 & rm

                n = n \ 2

            End While

            MessageBox.Show("Square Roor :" & sqr & " Binary Number : " & str1)

            StrReverse(str1)

        End Sub

    End Class

    You might also like