Question

VB加载读取ini配置

ini文件里其中一项如下
[保护设置]
红药=金创药(中)

界面里combobox数组控件里2个,也即是combobox(1)的list里是
自动选择
行血散(小)
行血散(中)
行血散(大)
金创药(小)
金创药(中)
金创药(大)
活血酥(小)
活血酥(大)
九转通天丸(小)
九转通天丸(大)

现在我界面选择那个ini配置名称加载,老是失败,请高手指点,我刚学vb,谢谢.
' Combobox(i).ToolTipText 为方便读取区分每个数组控件键名不一样,设置的.也就是以它为键名,此问题中例子 Combobox(1).ToolTipText = 红药
For i = 0 To CoList - 1 Step 1
If ReadINI("保护设置", Combobox(i).ToolTipText, path) <> "" Then
For N = 0 To Combobox(i).ListCount - 1 Step 1
If Combobox(i).List(N) = ReadINI("保护设置",Combobox(i).ToolTipText, path) Then
Combobox(i).ListIndex = CInt(N)
Exit For
End If
Next
End If
Next

Answer 1

' Combobox(i).ToolTipText 为方便读取区分每个数组控件键名不一样,设置的.也就是以它为键名,此问题中例子 Combobox(1).ToolTipText = 红药
For i = 0 To CoList - 1 Step 1 <===Colist 是什么，自己定义的么？
If ReadINI("保护设置", Combobox(i).ToolTipText, path) <> "" Then <<==这里可以断点看一下读取内容是否出错
For N = 0 To Combobox(i).ListCount - 1 Step 1
If Combobox(i).List(N) = ReadINI("保护设置",Combobox(i).ToolTipText, path) Then
Combobox(i).ListIndex = CInt(N)
Exit For
End If
Next
End If
Next

追问

结构没错,我调试找到问题了,Combobox(i).List(N) = ReadINI("保护设置",Combobox(i).ToolTipText, path) 等号两边内容一样时也不行,具体原因是字节不一样,我知道原因但是不会解决.

追答

你要看下两边字节相差在什么地方，我认为如果有空格之类的，用TRIM可以处理，你的问题应该是自己定义的ReadINI函数里。