VB6.0版本:
For i = 1 To 60
Retstr(i) = ReadfromIni(App.Path & "\PointTable2.ini", "Items", "Itm" & (i))
Set oitem(i) = TheOPCitems.AddItem(Retstr(i), i)
oitem(i).IsActive = True
Next i
VB.NET版本:
For i = 1 To 60
Retstr(i) = ReadfromIni(My.Application.Info.DirectoryPath & "\PointTable2.ini", "Items", "Itm" & (i))
oitem(i) = TheOPCitems.AddItem(Retstr(i), i)
oitem(i).IsActive = True
Next i
http://labs.developerfusion.co.uk/convert/csharp-to-vb.aspx
C# code:
for (i = 1; i <= 60; i++) {
Retstr(i) = ReadfromIni(My.Application.Info.DirectoryPath + "\\PointTable2.ini", "Items", "Itm" + (i));
oitem(i) = TheOPCitems.AddItem(Retstr(i), i);
oitem(i).IsActive = true;
}
在vb这编程里似乎有很多的东西是相联系的,为什么有些人对vb的编程摸不到头脑啊!并且有些事很容易的,但是却把它们的代码变成复杂,也去想一些不能实现的东西啊!
没分了,楼主多来点分!
来接点分
......