Public Class 系統選擇
    Private Sub 系統選擇_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        登入人IP = "103.231.201.230,2433"
        'SQL_連線字串_正式() : SQL_連線字串_物料資料庫() : SQL_連線字串_本機()
        系統語言 = "中文" : 公司名稱 = "ICS" : 倉儲資料庫 = "ICS-ASMS-DEPOT1"
        If 系統語言 = "Indonesian" Then
            Me.Text = "Pemilihan Sistem"
        ElseIf 系統語言 = "中文" Then
            Me.Text = "系統選擇"
        End If
    End Sub

    Private Sub EPR_pic_Click(sender As Object, e As EventArgs) Handles EPR_pic.Click
        Me.Hide()
        ICS_ASMS_ERP_SYS.Show()
    End Sub

    'Private Sub POS_pic_Click(sender As Object, e As EventArgs) Handles POS_pic.Click
    '    Me.Hide()
    '    ICS_POS_SYS.Show()
    'End Sub
End Class