Error on =4

Simbol Garis Dengan Kategori Tetentu

Pada bagian ini melakukan pemberian warna garis berdasarkan kreterian tertentu, misalkan lebar jalan mulai 12 meter kebawah dikatakan kecil dan diatas 12 meter dikatakan besar.agar peta jalan yang ditampilkan secara otomatis membuat kategori tersebut tuliskan Coding seperti berikut ini:

Dim fs As New FeatureSet(FeatureType.Line)
fs = FeatureSet.Open(Application.StartupPath & "\FilePeta\Jalan_desa.shp")
fs.Projection = Map1.Projection
Dim MyLayer As MapLineLayer = Map1.Layers.Add(fs)

Dim scheme As New LineScheme
scheme.ClearCategories()

Dim KategoriKecil As New LineCategory(Color.Blue, 2)
KategoriKecil.FilterExpression = "[LEBAR_JLN] <= 12"
KategoriKecil.LegendText = "Jalan Kecil"

Dim KategoriBesar As New LineCategory(Color.Red, 5)
KategoriBesar.FilterExpression = "[LEBAR_JLN] > 12"
KategoriBesar.LegendText = "Jalan Besar"

scheme.AppearsInLegend = True
scheme.LegendText = "LEBAR"
scheme.Categories.Add(KategoriKecil)
scheme.Categories.Add(KategoriBesar)

MyLayer.Symbology = scheme

 

Comments

  • A Name wrote:

    This is an example of a comment made on a post. You can either edit the comment, delete the comment or reply to the comment. Use this as a place to respond to the post or to share what you are thinking.

  • A Name wrote:

    This is an example of a comment made on a post. You can either edit the comment, delete the comment or reply to the comment. Use this as a place to respond to the post or to share what you are thinking.

  • A Name wrote:

    This is an example of a comment made on a post. You can either edit the comment, delete the comment or reply to the comment. Use this as a place to respond to the post or to share what you are thinking.


Write A Comment

 

Menampilkan Label dari Tabel Atribut

Dalam hal ini Nama kolom digunakan untuk mengambarkan nama wilayah, Agar dapat menampilkan text label kita hanya perlu apit dengan tanda kurung siku [ ]. Coding secara sederhana sebagi beriku.

Continue Reading »

Website Universitas Islam Kalimantan (UNISKA) Syekh Muhammad Arsyad Al-Banjary - Jl.Adhyaksa No.2 Kayu Tangi - Banjarmasin.

Continue Reading »

Website Fakultas Teknologi Informasi Universitas Islam Kalimantan (UNISKA) Syekh Muhammad Arsyad Al-Banjary.

Continue Reading »

link Elearning

Statistik Pengunjung

71915
  • Total Total Kunjungan : 1506
  • Total Total Hits : 24
  • Today Kunjungan Hari Ini : 7
  • Online Online User : 1
  • Update Last Update : 15-07-2015