e.      ChartRenderer

Masih tentang menampilkan nilai field, jika pada rendering-rendering sebelumnya digunakan untuk memperlihatkan nilai satu field, maka rendering tipe ChartRenderer ini dapat digunakan dengan menyajikan nilai beberapa field secara langsung. Nilai-nilai dari beberapa field ini akan disajikan dalam bentuk grafik (chart ). Ada dua tipe grafik yaitu batang/bar dan lingkaran/pie. Selain membandingkan dengan nilai dengan field yang lain dalam satu record, bentuk charnya juga memungkinkan kita untuk membandingkan dengan nilai pada record yang lain. Dalam bentuk bar akan terlihat dari panjangnya bar, sedang dalam bentuk pie akan terlihat dari besarnya lingkaran.

Seharusnya chart renderer digunakan untuk membandingkan beberapa field yang sejajar, seperti misal jumlah_penduduk_kulit_putih, jumlah_penduduk_kulit_hitam ,jumlah_penduduk_asi, dan sebagainya. tetapi karena dalam contoh data mexico tidak ada field yang sejajar untuk ditampilkan, maka untuk contoh berikut digunakan field P_urban90,  P_ing_lang, P_empl_sec. Dengan warna masing-masing adalah merah, kuning, dan hijau. Contoh yang pertama bertipe Bar. Terlihat pada property ChartType. Dan contoh yang kedua hanya mengubah isi property ini dengan nilai moPie. Hasil kedua contoh dapat dilihat pada gambar 26 dan 27.

   Dim L1 As MapObjects2.MapLayer

         Set L1 = New MapObjects2.MapLayer

         L1.GeoDataset = dc.FindGeoDataset("states")

         L1.Symbol.Color = moWhite

         Dim cd As New ChartRenderer

         cd.DrawBackground = True

         cd.FieldCount = 3

         cd.Field(0) = "P_urban90"

         cd.Field(1) = "P_ing_lang"

         cd.Field(2) = "P_empl_sec"

         cd.ChartType = moBar

         cd.Color(0) = moRed

         cd.Color(1) = moYellow

         cd.Color(2) = moGreen

         L1.Renderer = cd

         Map1.Layers.Add L1

Gambar 26. Contoh hasil ChartRenderer tipe Bar

Gambar 27. Contoh hasil ChartRenderer tipe Bar