Monday 25 May 2015

VB6.0 :: Membuat Tampilan Form Lebih Menarik Dengan Skin di VB 6.0


Jika Anda merasa bosan melihat tampilan form di visual basic 6.0 dan ingin membuatnya lebih menarik, maka komponen skin yang Anda perlukan. Komponen skin ini berekstensi “.skn” dan memiliki berbagai jenis tampilan form. Tapi untuk menggunakan skin ini Anda harus memiliki komponen “ACTSKIN4.ocx”, karena komponen inilah yang berfungsi untuk menampilkan tampilan Skin ke dalam form. Berikut ini gambar tampilan form yang sudah menggunakan skin :
Berikut ini Skin yang saya miliki :

VB.NET ::Membuat MDI Child pada sebuah Form


Sebuah MDIForm dapat dibuat dari sebuah Form biasa, Yaitu dengan cara mengatur properties IsMdiContainer pada Form tersebut diubah menjadi True
Sebuah Form dapat diatur menjadi MDIChild bagi sebuah MDIForm melalui coding program. Aturan penulisannya sebagai berikut
Contoh :
Form2.MdiParent = Form1
atau juga bisa menggunakan code seperti dibawah ini
Dim anakwin As New Form3()
anakwin.MdiParent = Me
anakwin.Show()
Pada contoh coding program diatas, sebuah Form bernama Form2 diatur agar menjadi MDIChild bagi sebuah MDIForm bernama Form1
untuk lebih jelasnya bisa melihat code program dibawah // tapi ingat !! Pada Form1 yg digunakan sebagai menu utamanya IsMdiContainer pada Form tersebut diubah menjadi True
[Visual Basic.NET] Membuat MDI Child pada sebuah Form
[Visual Basic.NET] Membuat MDI Child pada sebuah Form
[Visual Basic.NET] Membuat MDI Child pada sebuah Form
[Visual Basic.NET] Membuat MDI Child pada sebuah Form
Membuat desain form sebagai tampilan
[Visual Basic.NET] Membuat MDI Child pada sebuah Form
[Visual Basic.NET] Membuat MDI Child pada sebuah Form
Untuk code program bisa dilihat dibawah ini
Kunjungi juga contoh aplikasi laporan CRUD disini
——————————————————————————————————–
Public Class Form1
Private Sub NewDocumentToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesNewDocumentToolStripMenuItem.Click
Dim anakwin As New Form2()
anakwin.MdiParent = Me
anakwin.Show()
End Sub
Private Sub Page2ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Page2ToolStripMenuItem.Click
Dim anakwin As New Form3()
anakwin.MdiParent = Me
anakwin.Show()
End Sub
Private Sub HorizontalToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesHorizontalToolStripMenuItem.Click
Me.LayoutMdi(MdiLayout.TileHorizontal)
End Sub
Private Sub VertikalToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles VertikalToolStripMenuItem.Click
Me.LayoutMdi(MdiLayout.TileVertical)
End Sub
Private Sub CloseAllToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CloseAllToolStripMenuItem.Click
For Each ChildForm As Form In Me.MdiChildren
ChildForm.Close()
Next
End Sub
Private Sub CascadeToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CascadeToolStripMenuItem.Click
Me.LayoutMdi(MdiLayout.Cascade)
End Sub
End Class

Thursday 21 May 2015

DOWNLOAD PROTEUS ISIS 8.0 FULL VERSION + CRACK




Hai sobat jufrikablog kali ini saya akan membagikan software simulasi rangkaian elektronika yang bisa sobat gunakan juga untuk simulasi microcontoller ,atmega , arduino dsb. Dan software ini sudah banyak di pakai untuk para elektronikawan :D langsung saja berikut link downloadnya sobat :D dibagikan secara free dan full


DOWNLOAD  | 168 MB | include crack

review


Cara Penginstalan bisa dilihat di folder download sob

Sekian sobat jufrikablog semoga bermanfaat postingan saya kali ini , dan jika artikel ini bermanfaat bagi sobat mohon dukungannya dengan like blog saya terimakasih :)

Monday 18 May 2015

Serial transmit c#

hai sobat jufrikablog seperti biasa setiap seminggu sekali jufrikablog akan memposting tentang c# selama pelajaran c# di kuliahan ada :D . Sekilas tentang serial transmit intinya adalah mengirim dan menerima data dengan serial port dengan method write dengan parameter berupa string yang ingin dikirim. Nah untuk lebih paham mari kita buat aplikasi chat dengan serialport

1.  Buat solution baru. dan sesuaikan dengan desain di bawah

2. masukan komponen serialport dan timer
3. pada event form load maka kita buka dahulu serial portnya dengan mengetikan seperti ini
   serialPort1.Open();
4. lalu pada tombol kirim kita buat seperti ini
  serialPort1.Write(textBox1.Text);
5. lalu pada timer kita setting pembacaannya menjadi 500 ms dan visiblenya dari false ke true
6. Double click untuk timer. Ketikkan statemen di bawah ini di dalam fungsi TimerTick :

if (serialPort1.BytesToRead != 0) // maksudnya kita kondisikan bahwa jika kondisi bye tidak 0 baru menulis
{
textBox2.Text = serialPort1.ReadExisting(); // membaca dari serial port yang diterima
 }

7.Buka hyperterminal, kemudian amati data yang tampil pada hyperterminal saat anda mengirim data. (jangan lupa setting com dan baudaratenya sob)

8. Buka Arduino.exe.
9.  Ketikkan program dibawah ini pada Arduino IDE.

10. compile dan upload ke arduino dan coba kirim karater khusus sesuai program yaitu a
dan lihat led akan hidup dan coba karater lainya :D

sekian 10 langkah tutorial kali ini sob semoga bermanfaat :)

Menghidupkan 3 Buah Lampu Arduino dengan Compiler C#


Hai sobat jurikablog sebenarnya pengiriman data melalui serial port sangat sederhana, cukup menggunakan method Write dengan parameter berupa string yang ingin dikirim. disini jufrikablog mencontohkan jika sobat ingin membuat program compile untuk mematikan dan menghidupkan lampu pada arduino dengan simple


1. Alat dan bahan
    3 Buah software : arduino simulator / memakai proteus isis , virtual port setting , dan sharpdevelop atau visual studio c#
2. buat program compiler nya dengan design yang akan jadi seperti ini (komponen : button , serialport, timer, label, textbox)


3. lalu masukan program ini ke tombol send
    serialPort1.Write(textBox1.text);
4.dan pada button on  setting seperti ini (contoh pada button on untuk lampu led 1 memakai karakter 'a')
   Button2.Enabled = false;
   Button5.Enabled = true;
   serialPort.Write('a'); // lihat karakter a di arduino untuk menghidupkan lampu led a
dan pada button off kebalikannya (false dan truenya) dan sesuaikan pembacaan karaternya
  
5. pada void main formnya kita setting serial port open terlebih dahulu
    serialPort1.Open();
6. atur timer menjadi 500 ms dan ubah dari false jadi true
 
dan juga pada serialport atur com yang akan digunakan (misal com1)

7. pada program arduino buat seperti ini
int LEDA=13;
int LEDB=12;
int LEDC=8;


void setup()
{
 Serial.begin(9600);
 pinMode(LEDA,OUTPUT);
 pinMode(LEDB,OUTPUT);
 pinMode(LEDC,OUTPUT);

}

void loop()
{
 if (Serial.available())
{
  char inChar = (char)Serial.read();
  if(inChar=='a')digitalWrite(LEDA,1);
  else if (inChar=='b')digitalWrite(LEDB,1);
  else if (inChar=='c')digitalWrite(LEDC,1);
  else if (inChar=='d')digitalWrite(LEDA,0);
  else if (inChar=='e')digitalWrite(LEDB,0);
  else if (inChar=='f')digitalWrite(LEDC,0);
  else {
    digitalWrite(LEDA,0);
    digitalWrite(LEDB,0);
    digitalWrite(LEDC,0);
  }
}

}

8. Masukan program tersebut ke dalam rangkaian arduino tadi dengan cara seperti digambar
9. Setelah sukses setting com nya di db 9 nya (contoh com 3) dan baud rate 9600
10. lalu jalankan program di c# dan simulasi arduino nya cek video berikut sob :D
note : untuk menghubungkan virtual port bisa di setting dengan software virtual port bisa download disini

Saturday 16 May 2015

SERVICE TV :: TV mati total MCB Turun

Bagaimana jika saat posisi TV ON , MCB trip dan jika dinaikan langsung trip lagi dengan cepat ? Ini pasti ada masalah dengan TVnya. Serahkan saja pada tukang servis di tempat anda. Untuk tehnisi atau tukang servis : pada kasus yang Maswar Servis sarankan pada orang umum untuk membeli auto start, tidak berlaku untuk tukang servis. Kita ketahui bahwa arus listrik saat pertama di on sangatlah besar, maka agar arus yang mengalir bisa dikurangi adalah dengan memberi hambatan. Masih ingat hukum ohm kan ? (tidak dibahas di sini). Langkah praktisnya adalah menambahkan resistor diseri pada kabel sebelum masuk ke mainboard atau mesin televisi. Maswar Servis biasa menambahkan resistor 12 ohm 10 watt, jika pada mesin sudah ada perbesar saja nilai ohmnya. InsyaAlloh akan beres permasalahannya.

Hasil gambar untuk gambar tv

Namun jika penyebab trip nya MCB adalah TV yang bermasalah, maka kita harus membongkar tivinya. Kita tak boleh main tebak, tapi harus di cek dengan seksama mana penyebabnya. Berdasarkan pengalaman pribadi Maswar Servis yang paling sering terjadi adalah transistor regulator yang short. Untuk goldstar sering STR mati. Pada TV Samsung SMR**** juga sering short untuk gejala serupa.

Serial received di c#


Hai sobat jufrikablog nah kali ini saya akan kembali lagi memberikan tutorial habis habisan tentang serial hahahahahahaha . yaitu serial received . langsung saja berikut prakteknya

1. Buat solution baru dan buat seperti ini di visula studio anda
2. Klik 2 kali pada form load misalnya, dan masukkan program ini
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace seri1
{
public partial class Form1 : Form
{
string rxString;
int[] lokasiY = new int[100];

public Form1()
{
InitializeComponent();
}
private Graphics objGraphic;

private void Form1_Load(object sender, EventArgs e)
{
objGraphic = CreateGraphics();
if (objGraphic == null)
return;
}

private void button1_Click(object sender, EventArgs e)
{
if (button1.Text == “Connect”)
{
button1.Text = “Disconnect”;
serialPort1.Open();
//richTextBox1.text = “”;
//a = 0;
}
else
{
button1.Text = “Connect”;
serialPort1.Close();
}
}

void SerialPort1DataReceived(object sender, System.IO.Ports.SerialDataReceivedEventArgs e)
{
rxString = serialPort1.ReadLine();
this.Invoke(new EventHandler(DisplayText));
}

private void DisplayText(object sender, EventArgs e)
{
richTextBox1.Text += rxString;
float tinggi = float.Parse(rxString);
tinggi = 179 – (tinggi / 1023 * 179);
// geser arraynya
for (int i = 0; i < 99; i++)
{
lokasiY[i] = lokasiY[i + 1];
}
lokasiY[99] = (int)tinggi;
}

private void timer1_Tick(object sender, EventArgs e)
{
Pen pena = new Pen(Color.Black);
int awalX = 0;
int titikMulaiX, titikMulaiY, titikAkhirX, titikAkhirY;
// hapus dulu semuanya
objGraphic.Clear(Color.White);
for (int i = 0; i < 99; i++)
{
titikMulaiX = awalX + i * 5;
titikMulaiY = lokasiY[i];
titikAkhirX = awalX + (i + 1) * 5;
titikAkhirY = lokasiY[i + 1];
objGraphic.DrawLine(pena, titikMulaiX, titikMulaiY, titikAkhirX, titikAkhirY);
}
}
}
}


3. Setelah program selesai, runningkan/jalankan programnya jika bisa dijalankan dan tidak ada eror maka lanjut ke arduino
4. buat program arduino ini dan upload ke arduino yang siertai potensio untuk mengatur tegangan input dan akan di baca di aplikasi
void setup() 
{ Serial.begin(9600); }
void loop()

 { int sensorValue = analogRead(A1); delay(500); Serial.println(sensorValue, DEC); }
5. setelah itu running programnya sob ;)

ini tampilannya jika tidak menggunakan potensio
sekian semoga bermanfaat :)