Chapter 4, Problem 1FTE

Explanation of Solution

a.

Given code:

'if the condition is true

If intX > 100

    'Set the result

    lblResult.Text = "Invalid Data"

'End the statement

End If

Error in the statement:

The “Then” keyword is missing in the “If” statement...

Explanation of Solution

b.

Given code:

'Create a variable "str" and set the value

Dim str As String = "Hello"

'Create an integer variable "intLength"

Dim intLength As Integer

'set the value of "intLength" as the length of "str"

intLength = Length(str)

Error in the statement:

  The last statement should read “intLength = str.Length”...

Explanation of Solution

c.

Given code:

'if the condition is true

If intZ < 10 Then

'set the value of result

lblResult.Text = "Invalid Data"

Error in the statement:

    The “End If” statement is missing in the above snippet.

Corrected statement:

'if the condition is true

If intZ < 10 Then

Explanation of Solution

d.

Given code:

'Create a variable "str" and set the value

Dim str As String = "123"

'if the condition is true

If str.IsNumeric Then

  'set the result

  lblResult.Text = "It is a number."

'end if condition

End If

Error in the statement:

The If statement should read: “If IsNumeric(str) Then”

Corrected statement:

'Create a variable "str" and set the value

Dim str As String = "123"

'if the condition is true

If IsNumeric(str) Then

  'set the result

  lblResult...

Explanation of Solution

Given code:

'start select case

Select Case intX

'case 1

Case < 0

    'set the result

  lblResult. Text = “Value too low”

'case 2

Case > 100

  'set the result

  lblResult. Text = “Value too high”

'else case

Case Else

  'set the result

  lblResult. Text =”Value just right”

'end select

End Select

Explanation:

The above code snippet is used to execute select statements. In the code,

• Start a select case
  • Case 1 “<0”
    • Set the result as “Value too low”
  • Case 2 “>100”
    • Set the result as “Value too high”
  • Else Case
    • Set the result as “Value just right”
• End select statement.

Error in the statement:

The “Is” keyword is missing in the “Select Case” statements...