strTypeEx = ReadIniFile("Type", "Type", App.Path & "\set.ini") 
strTypeEx = Split(strTypeEx, ";") 
For i = LBound(strTypeEx) To UBound(strTypeEx) 
   CboType.AddItem Trim(strTypeEx(i)) 
Next i 

 

相关文章:

  • 2021-06-02
  • 2021-11-27
  • 2022-12-23
  • 2021-05-22
  • 2021-11-21
  • 2021-06-03
  • 2021-12-05
猜你喜欢
  • 2022-12-23
  • 2021-11-25
  • 2022-12-23
  • 2022-02-21
  • 2022-12-23
  • 2021-09-18
  • 2022-01-25
相关资源
相似解决方案