VB 2008を使用して、SQLServerとAccessの複数のデータベースのデータにアクセスしています。このクエリでは、「People」という名前のSQLテーブルからデータを取得し、結果をListView1に表示しています。「時間」列は秒単位です。秒を分と秒に変換するために使用する関数がありますが、データベースからデータをプルし、リストビューの[名前]列に入力してから秒で変換計算を実行する関数をマージするのに苦労しています。次に、[時間]列に変換された時間を入力します。
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サーバーへの読み取り専用アクセスしか持っていないため、問題を処理するためのストアドプロシージャを作成できません。