VB ini文件写入 读取 - VB / 基础类

看了一些VB ini文件写入读取的方法 但是还是不知道怎么写，上面写了很长 很多，但是我不知道怎么用，我想问一下怎样写才能实现在TEXT1中写字，然后点Command1提交，然后TEXT1里面的数字就写进INI里面[Section]的Key1=里面，然后怎么在Combo1的下拉菜单里面能看到key1，然后我点击Command2删除的时候能删掉key1

---

帮顶

---

Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal w_returnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long

'----------------------------------------------------
'------------從INI文件中取得數據---------------------
'---設計者:,設計日期:2004/04/07----------------
'----------------------------------------------------
Public Function GetIni(ByVal KeyName As String, Optional ByVal KeyGroup As String, Optional ByVal PathName As String) As Variant
  Dim strKeyGroup As String, strPathName As String, strRtn As String, nSize As Long
  strRtn = Space(255)
  strKeyGroup = IIf(KeyGroup = "", "Setup", KeyGroup)
  If Path