Pages

Wednesday, June 29, 2016

Bar Chart Using DataGridView

Graph digunakan untuk membuat menarik maupun membuat mudah pembacaan sebuah object/data yang ingin disampaikan. Jika menggunakan component Visual Studio MSChart kurang menarik, tidak ada salahnya anda mencoba coding menampilkan data Bar Chart dengan menggunakan DataGridView.


Bar Chart Creating using DataGridView Base Component
Silahkan download sample source code
Klik disini

Wednesday, June 15, 2016

VB .NET Rotate your text in Drawing





Pembuatan Axis label pada Bar Chart dengan rotate 270⁰, stepnya adalah text dibuat image dan kemudian gunakan Rotate270Flip


[Sample Code]

img = New Bitmap(100, 100)

Dim newGraphic As Graphics = Graphics.FromImage(img)
Dim GrpText As Graphics


textSize = newGraphic.MeasureString(xBaseString, myFontRegular).ToSize
imgText = New Bitmap(textSize.Width, textSize.Height)
GrpText = Graphics.FromImage(imgText)

GrpText.DrawString(xBaseString, New Font("Calibri", 9, FontStyle.Regular)
, Brushes.Black, Point.Empty)

imgText.RotateFlip(RotateFlipType.Rotate270FlipNone)

newGraphic.DrawImage(imgText, New Point(10, 10))

PictureBox1.Image = img

Tuesday, June 14, 2016

Ascii Code

Anda pasti pernah mengenal Ascii code di kalangan elektronika maupun Information Technology. Ascii kepanjangan dari American Standard Code for Information Interchange, Ascii sendiri terdiri dari 1 byte = 8 bit bilangan binary.


Ascii code digunakan sebagai standard komputerisasi untuk antarmuka antara input perangkat keras dengan system.


Banyak kegunaan dari Ascii code contohnya seperti intruksi untuk printer, barcode scanner maupun software system desktop application.
Next..saya akan upload untuk beberapa sample penggunaan Ascii Code.

Contoh Penggunaan Key Ascii

Sample Barcode Scanner Datalogic M8300 menampilkan message "PLEASE SCAN MC", format sent message from host to reader [DC2]MESSAGE[CR]

  SerialPort1.Write(Chr(18) & Chr(27) & "[2J PLEASE SCAN MC" & Chr(13))

Chr(18) = DC2 (Device Control 2)
Chr(27) = ESC (Escape) For starting Command

Chr(13) = CR (Carriage Return)









Untuk programming VB .NET bisa digunakan untuk focus ke object lain dengan indicator/intruksi dari keyboard ketika menekan tombol ENTER









Pada code diatas dijelaskan jika PurposeTextbox di tekan ENTER pada keyboard maka focus akan berpindah ke object OrderQtyTextBox

Monday, June 13, 2016

Eco Driving Event 2016

Pada tanggal 11 June 2016 diadakan event Eco Driving yang diselenggarakan oleh Kementrian Lingkungan Hidup dan Kehutanan. Saya pun mendaftarkan sebagai peserta, cukup menarik dan mengesankan, karena saya baru pertama kali mengikuti event seperti ini.

Tujuan dari Eco Driving ini adalah untuk memberikan wawasan dan pembelajaran, yaitu dari segi Safety, Environmental, Financial dan Social.

Workshop Eco Driving
Dari segi safety terdapat 2 item pembelajaran yang disampaikan oleh Kompol Yuliati, S.Mn - Ditlantas Polda Metro Jaya

  • Improve road safety
  • Enhance drive skills
Untuk Eco driving disampaikan oleh Heru Sugiarto, ST - Pakar/Praktisi Eco Driving
Environmental

  • Reduce greenhouse gas emissions (CO2)
  • Fewer local air pollutants
  • Noise Reduction
Financial

  • Save fuel / money (5-15% in the long-term)
  • Lower vehicle maintenance costs
  • Reduce costs of accidents
Social

  • More responsible driving
  • Less stress while driving
  • Higher comfort for drivers and passengers

Peserta Eco Driving