[Programmer-VB] Query dari Visual Basic

Tue, 11 Apr 2006 03:42:41 -0700

Dear temen2...
 
saat ini saya sedang membuat program. program saya sederhana saja, yaitu mengakses data di M.Access dan menampilkannya di MS chart menggunakan visual basic tentunya.
 
Langkah pertama yg saya lakukan adalah mengquery database, contoh :
"select * from group1_1 where signal_index=1 order by Earliest_TDate asc"
 
Kemudian langkah berikutnya adalah memasukan tiap data dari kolom value dan kolom date ke variabel bertipe data array dg tipe data single.
 
Private Values() As Single
 
NumPoints = data.RecordCount
ReDim Values(1 To NumPoints, 1 To 2)
 
For i = 1 To NumPoints
   
      
    Values(i, 1) = data.Fields("Sample_TDate_1").Value
   
    Values(i, 2) = data.Fields("Sample_Value_1").Value
 
     data.MoveNext
Next i
 
kemudian langkah terakhir adalah memplotkan data yg diperoleh ke MS Chart dg kode berikut :
 
MSChart1.chartType = VtChChartType2dXY
MSChart1.RowCount = data.RecordCount
MSChart1.ColumnCount = 2
MSChart1.ChartData = Values
 
Tapi permasalahan yg saya hadapi adalah :
 
kenapa ya nilai yg seharusnya bertipe data date/time kok hasilnya jadi bilangan desimal...sebagai contoh di kolom Sample_TDate_1 nilainya 2006-03-12 09:00:00 AM eh begitu dimasukan ke var values di atas jadinya 6128,3. padahal yg saya inginkan formatnya tetap berbentuk tanggal. saya coba pake format$ dan cstr malah error..keterangannya mismatch type.
 
Mohon bantuan dari rekan2 semua...terima kasih banyak sebelumnya :D
 
 
Rgds,
 
Ibnu Q El
 
 

Blab-away for as little as 1ยข/min. Make PC-to-Phone Calls using Yahoo! Messenger with Voice.

Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer


YAHOO! GROUPS LINKS



Kirim email ke