摘要:
viewer.vb剩余代码
private sub lstitem_selectedindexchanged(byval sender as system.object, byval e as system.eventargs) handles lstitem.selectedindexchanged
if lstitem.items.count > 0 then
se......
摘要:
tvm_getimagelist = (tv_first + 8),
tvm_setimagelist = (tv_first + 9),
tvm_getnextitem = (tv_first + 10),
tvm_selectitem = (tv_first + 11),
tvm_getitema = (tv_first + 12),
tvm_getitemw = (......
用vb.net开发apiviewer(3)
在项目文件中添加新项-类(cconst.vb)
代码如下:
namespace api
public class cconst
implements istore
dim constlist as sortedlist
dim constlistcsharp as sortedlist
sub new()
constlist = new sortedlist()
constlistcsharp = new sortedlist()
end sub
sub add(byval key as string, byval data as string, optional byval bcsharp as boolean = false) implements istore.add
if not bcsharp then
if not constlist.containskey(key) then
constlist.add(key, data)
end if
else
if not constlistcsharp.containskey(key) then
constlistcsharp.add(key, data)
&n...
下一页 摘要:
imports system.diagnostics
namespace vbcity
public module modfunctions
public sub executeapplication(pstrapplicationname as string)
dim udtprocess as process = new process
udtprocess.start......