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 

 

相关文章:

  • 2019-08-05
  • 2021-12-10
  • 2020-11-17
  • 2021-12-18
  • 2021-12-23
  • 2021-12-04
  • 2021-12-23
猜你喜欢
  • 2021-11-25
  • 2021-09-18
  • 2021-09-24
  • 2021-11-22
  • 2021-09-24
  • 2021-09-27
  • 2021-09-30
  • 2021-11-29
相关资源
相似解决方案