深圳易高科技有限公司面试题目

 







Recruitment Quiz

Paper A






Prepare By

2GoTrade Ltd.

Version:  1.0

6  Jan  2006
 
Please complete the following  8  questions within  2  hours.

Question  1

The VB  Function ,() function, GetCurrencyCode demonstrates the translation between the currency code and currency number.  However, the performance of this Function is()function is not good enough; the higher order of input number takes much more times to calculate.  Please suggest a way to improve the program performance:

Function GetCurrencyCode()Function GetCurrencyCode(ByVal input As String) As String
If input = "01" Then
return = "AFA"
ElseIf input = "02" Then
return = "ALL"
ElseIf input = "03" Then
return = "DZD"
ElseIf input = "04" Then
return = "USD"
ElseIf input = "05" Then
return = "HKD"
ElseIf input = "75" Then
return = "EUR"
ElseIf input = "76" Then
return = "XCD"
ElseIf input = "77" Then
return = "AMD"
End If
End Function

Answer: 
Function GetCurrencyCode()Function GetCurrencyCode(ByVal input As String) As String     Select Case input         Case "01":    
return = "AFA"         Case "02":    
return = "ALL"         Case "03":    
return = "DZD"         Case "04":    
return = "USD"         Case "05":    
return = "HKD"
Case "75":    
return = "EUR"
Case "76":    
return = "XCD"
Case "77":    
return = "AMD"
Case Else:    
return = "unknown"     End Select End Function

 
Question 2

Write a Function that()function that reverses the order of the words in a string. For instance, your Function should()function should transform the string “Do or do not, there is no try.” To “try. No is there not, do or Do”. Assume that all words are space delimited and treat punctuation the same as letters.

Use your most hands-on programming language.

Answer: 

JavaScript Version:
Function ReversesOrder()function ReversesOrder()
{
    var OldStr = "Do or do not, there is no try."
    var NewStr = "";
    var ArrayStr = OldStr.split(" ");

    for (var i = ArrayStr.length - 1 ;i >= 0 ; i--)
    {
        NewStr += ArrayStr[i] + " ";
    }
    return NewStr;
}  
Question 3

Study the following VB program:

Imports System
Imports System.IO
Module Module1Module Module1
Public ArtList As ArrayList
End Module

Public Class Form1Class Form1
Inherits System.Windows.Forms.Form

Windows Form Designer generated code#Region " Windows Form Designer generated code "
…
#End Region

<[Serializable]()> Public Class ArtClass Art
Public Title As String
Public Des As String
Public Value As Integer
Public Price As Double
Public Picture As String
End Class

Private Sub Button1_Click_1()Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myArt As New Object
Dim hashtable As New Collections.Hashtable
Dim key As String

Try
myArt = New Art
With myArt
.Title = "Title"
.Des = "Desc"
.Value = 123
.Price = 321.05
End With
key = myArt.Title & myArt.Des & CStr(myArt.Value) & CStr(myArt.Price)
hashtable.Add(key, myArt)
ArtList.Add(myArt)

Catch ex As Exception 'This is the line 94’
MsgBox(ex.Message & vbCrLf & ex.StackTrace)
End Try
End Sub
End Class
A form is created on which a button control is placed.  When the Button1_Click is fired, a message box is popup:

 

What is the problem and how to fix it?

Answer: 

 
Question 4

In the following VB program, please states any potential problem(s) and how to correct.

Private Sub btnCalc_Click()Sub btnCalc_Click( )
Dim result As Integer
Try
Me.Cursor = Windows.Forms.Cursors.WaitCursor
result = Convert.ToInt32(txtInput1.Text) / Convert.ToInt32(txtInput2.Text)
txtResult.Text = result
Me.Cursor = Windows.Forms.Cursors.Default
Catch ex As Exception
MsgBox(ex.StackTrace)
Catch ex As ArgumentNullException
MsgBox("Input Test box cannot be null.")
Catch ex As OverflowException
MsgBox("Input Test box 2 cannot be zero!")
Catch ex As FormatException
MsgBox("Input Test box should be numeric format!")
End Try
End Sub

Answer: 

 
Question 5

GetRecordset() is a VB Function that()function that returns a ADODB.Recordset object:

        Ref_ID    Qty    Price
Row 0    00123    1000    60.50
Row 1    00123    2000    60.00
Row 2    00123    3500    59.50
Row 3    00124    3000    60.50
Row 4    00125    2000    59.50
Row 5    00125    1000    58.00

 (This recordset is sorted by Ref_ID)

The following program 

Dim rst as ADODB.Recordset
Rst = GetRecordset
Do While Not rst.EOF
Console.writeline(rst.Fields("Ref_ID") & vbcrlf & rst.Fields("Qty") & vbcrlf & rst.Fields("Price"))
rst.MoveNext()
Loop

Can generate the following output:

Output:

00123 1000 60.50
00123 2000 60.00
00123 3500 59.50
00124 3000 60.50
00125 2000 59.50
00125 1000 58.00

Please suggest how to modify the above program to generate the following output:

Output:
00123 
1000         60.50
2000         60.00
3500        59.50
----         -----
6500        60.00
00124 
3000        60.50
----         -----
3000         60.50
00125 
2000        59.50
1000        58.00
----         -----
3000        58.75


Answer: 

Dim rst as ADODB.Recordset
Rst = GetRecordset
Do While Not rst.EOF
Console.writeline(rst.Fields("Ref_ID") & vbcrlf & rst.Fields("Qty") & vbcrlf & rst.Fields("Price"))
rst.MoveNext()
Loop
 
Question 6

Problem: Use your most hands-on programming language to implement a Function that()function that prints all possible combinations of the characters in a string. These combinations range in length from one to the length of the string. Two combinations that differ only in ordering of the characters ARE the same combination.  In other words, “12” and “31” are different combinations from the input string “123”, but “21 is the same as “12”.

For example, if we use “wxyz” as parameter for Combination(“wxyz”) the Function will()function will print out

w
x
y
z
wx
wy
wz
xy
xz
yz
wxy
wxz
wyz
xyz
wxyz

Answer: 

 
Question 7

Module modFreeModule modFree
clsShape#Region "clsShape"
Public Class clsShapeClass clsShape
Private m_Area As Double
Private m_Sides As Integer

Public Sub New()Sub New()
m_Area = 0.0
m_Sides = 0
End Sub

Public Sub New()Sub New(ByVal Sides As Integer)
m_Sides = Sides
End Sub

Public Sub New()Sub New(ByVal Area As Double)
m_Area = Area
End Sub

Public Sub New()Sub New(ByVal Area As Double, ByVal Sides As Integer)
m_Area = Area
m_Sides = Sides
End Sub

Public Property Area()Property Area() As Double
Get
Return m_Area
End Get
Set(ByVal Value As Double)
m_Area = Value
End Set
End Property

Public Property Sides()Property Sides() As Integer
Get
Return m_Sides
End Get
Set(ByVal Value As Integer)
m_Sides = Value
End Set
End Property
End Class
#End Region


clsTriangle#Region "clsTriangle"
Public Class clsTriangleClass clsTriangle
Inherits clsShape

Public Sub New()Sub New()
MyBase.New(3)
End Sub

Public Sub New()Sub New(ByVal Area As Double)
MyBase.New(Area, 3)
End Sub

Public Function CalculateArea()Function CalculateArea(ByVal SideBase As Double, ByVal Height As Double, _ Optional ByVal AssignToArea As Boolean = False) As Double
Dim Area As Double = (SideBase * Height) / 2

If AssignToArea Then
Me.Area = Area
End If

Return Area
End Function
End Class
#End Region

Public Sub Main()Sub Main()
Dim objTriangle As New clsTriangle
Dim objShape As New clsShape

objTriangle.Area = -330
objTriangle.Sides = 5.5
objTriangle.CalculateArea(10.0, 2.5)

objShape.Area = 123
objShape.Sides = -2
objShape = CType(objShape, clsTriangle)

Console.WriteLine(TypeOf objTriangle Is clsShape)
Console.WriteLine(TypeOf objShape Is clsTriangle)
Console.WriteLine(objTriangle.Area)
End Sub
End Module

7.1 Please find the line of code from the procedure Main to cause run-time error.

Answer: 

7.2 Please write the result output from the procedure Main.

Answer: 

 
Question 8

Consider the following account and customer tables:

cust_tbl
cust_id    title    e_first_name    e_last_name    address1    .
0    MR    Martin    Ma    .    
1    MR    Kirs    Cheung    .    
2    MR    Ricky    Chan    .    
3    MR    Tom    Kwan    .    
4    MR    Corporate Default    Corporate Default    .    
5    MRS    Mary     Mok    .    
.    .    .    .    .    

acc_grp_cust_tbl
acc_group    Cust_id1    Cust_id2    Cust_id3    Cust_id4
1400    0    1    2    
1500    3    4        
1600    5            
.    .    .    .    .
.    .    .    .    .

The acc_grp_cust_tbl table is responsible to store the customer ID, and the cust_tbl table is responsible to store customer personal information such as name, address, etc… Please write a SQL query in order to provide following result.

ACC_GROUP    PAYEENAMES
1400    Ma Martin/Cheung Kris/Chan Ricky
1500    Kwan Tom/Corporate Default Corporate Default
1600    Mok Mary
.    .
.    .

Answer: