Private Declare Function GetOEMCP Lib "kernel32" () As Long. Private Sub Command1_Click() Dim uCP As Long Dim CodePage As String uCP = GetOEMCP()
確定! 回上一頁