易截截图软件、单文件、免安装、纯绿色、仅160KB

急,帮忙把一段delphi的代码改成VB.NET的

Delphi(Pascal) code:

for I := 0 to ListBox1.Items.Count -1 do
begin
if ListBox1.Selected[I] then ListSelectItem := I;
ListBox1.Selected[I] := False;
end;
ListBox1.Selected[ListSelectItem] := True;



VB.NET code:

for I = 0 to ListBox1.Items.Count -1 do
if ListBox1.Selected[I] is True then ListSelectItem = I
else
ListBox1.Selected[I] = False
end if
end for
ListBox1.Selected[ListSelectItem] = True




ListBox1这是个ListBox,我不知道在D下的Selected这个属性在VB.NET下有没有

ListBox1.SelectedIndex = 0 '选中第一项
str = ListBox1.SelectedItem '当前选定项

实际上我是想实现当我点击ListBox空白处的时候,能让ListBox选中状态都变成未选中状态。默认的情况下点击空白的地方,上一次选中的行数还是有蓝底的。
上面我的代码在D下是通过的,是可以实现我所要的结果,但在VB.Net不知道应该怎么写

ListBox1.SelectedIndex=-1试试

这样好象不行的。虽然可能这时候ListBox是没选中那一行,但是那一行还是蓝底的,我不想显示这蓝底

哪位帮忙一下呢?我不会VB.NET。分不够可以再加

引用
ListBox1这是个ListBox,我不知道在D下的Selected这个属性在VB.NET下有没有


有这个属性的

for I = 0 to List


相关问答:

VB中有无TApplication对应类型

我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用?
你好,用instance不是就可以了&# ......

vb如何调用Illustrator(此前Illustrator未启动)?

请教一下:我用vb写了一个调用Illustrator的测试程序,代码很简单:Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......

VB如何联系两个窗体?

就是设计一个计算机模拟考试系统,带有学生和管理员,所以登录窗体和主窗体想分开,登陆学生的显示学生的主窗体,登陆管理员显示管理主窗体,我只会一个窗体用一堆控件,现在享有多个主窗体,不知道怎么做,希望请大 ......

VB调用水晶报表Design 平凡提示MemoryFull问题

  各位大虾:
        我有一个VB调用水晶报表的系统,报表是作为一个Design嵌在VB里的,今天发现打印第一张报表正常,同样的数据,在点打印再调用一次就会报 Memory Full的错误,但是 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号