เนื่องจากผมต้องเขียนโปรแกรมที่ต้องใช้จอทีชกรีน จึงต้องเขียน ฟอร์ม Keyboard ขึ้นมาเองครับ และฟอร์มหลัก ต่างๆ ต้องเรียกฟอร์มนี้ไปใช้งานนะครับ
ดังรูปที่ 1


รูปที่ 2 คือฟอร์มหลักครับ ผมเอามาฟอร์มเดียว คือเมื่อคลิกที่ปุ่มให้โชว์ ฟอร์ม Keyboard ขึ้นมาครับ



คือผมต้องการทราบแนวการเขียน Code ให้สั้นๆ และใช้งานง่ายนะครับ
ตอนนี้ผมเขียนแบบนี้อยู่ครับ  เมื่อคลิกที่ปุ่ม SET ที่รูป 1 โดยใข้ Select Case (ตามด้วยชื่อ Form) และ Case ( ก็จะเป็น ชื่อปุ่มต่างๆ ที่ Click มาครับ)

เนื่องจากที่ฟอร์มหลักเยอะมากๆ ครับ ในการใช้ Select Case แบบนี้ผมว่าต้องเขียนเยอะมากๆ  อยากสอบถามว่ามีวิธีไหนที่เขียนสั่นๆ ง่าย ๆบ้างครับ

Private Sub cmdSet_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdSet.Click

        Select Case frmName
            Case "frmReceive"
                If ControlName = "txtTref" Then
                    frmReceive.txtTref.Text = Me.txtAlpha.Text
                ElseIf ControlName = "txtTref" Then
                    frmReceive.txtTref.Text = Me.txtAlpha.Text
                ElseIf ControlName = "txtWhs" Then
                    frmReceive.txtWhs.Text = Me.txtAlpha.Text
                ElseIf ControlName = "txtLoct" Then
                    frmReceive.txtLoct.Text = Me.txtAlpha.Text
                ElseIf ControlName = "txtComm" Then
                    frmReceive.txtComm.Text = Me.txtAlpha.Text
                End If
        End Select
        Me.Close()
    End Sub

ขอบคุณมากครับ