我正在使用VB 2008访问来自多个数据库,SQL Server和Access的数据。对于此查询,我从名为“People”的SQL表中提取数据并在ListView1中显示结果。 “时间”列以秒为单位。我有一个函数,我用来将秒转换为分钟和秒,但我很难合并函数,当我从数据库中提取数据时,填充listview中的Name列,然后在秒上运行转换计算,然后使用转换的时间填充时间列。
strsql = "SELECT Name, Time from People WHERE Boss ='" & BossSelector1.Text & "'"
'Connection
Dim ds As New DataSet
ListView1.Items.Clear()
While (dr.Read())
With ListView1.Items.Add(dr("Name"))
.subitems.add(dr("Time"))
End With
End While
时间转换代码
Dim iSecond As Double = inputtime.Text
Dim iSpan As TimeSpan = TimeSpan.FromSeconds(iSecond)
time.Text = iSpan.Minutes.ToString.PadLeft(2, "0"c) & ":" & _
iSpan.Seconds.ToString.PadLeft(2, "0"c)
我只有对SQL服务器的只读权限,因此我无法使用任何存储过程来处理我的问题。