PEMBUATAN GRAFIK MENGGUNAKAN Ms. Visual Basic
Halo teman Dunia IT!,
Apa kabar? disini admin akan membagikan tutorial nih cara membuat grafik dengan aplikasi Ms. Visual Studio, langsung aja langkah langkahnya :
1. Pastikan laptop telah terinstall Microsoft Visual Studio (Versi Bebas).
2. Buka aplikasi Microsoft Visual Studio.
3. Kemudian pilih new file - visual c++ - MFC Application.
4. Cari di sebelah kanan Solution explorer cari source file kemudian klik kiri,lalu klik Add - New item - C++ File (.cpp).
5. Masukkan Codingan yang telah anda buat sebelumnya, atau :
// nyobaView.cpp : implementation of the CnyobaView class
//
#include "stdafx.h"
// SHARED_HANDLERS can be defined in an ATL project implementing preview, thumbnail
// and search filter handlers and allows sharing of document code with that project.
#ifndef SHARED_HANDLERS
#include "nyoba.h"
#endif
#include "nyobaDoc.h"
#include "nyobaView.h"
#include "math.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#endif
// CnyobaView
IMPLEMENT_DYNCREATE(CnyobaView, CView)
BEGIN_MESSAGE_MAP(CnyobaView, CView)
// Standard printing commands
ON_COMMAND(ID_FILE_PRINT, &CView::OnFilePrint)
ON_COMMAND(ID_FILE_PRINT_DIRECT, &CView::OnFilePrint)
ON_COMMAND(ID_FILE_PRINT_PREVIEW, &CnyobaView::OnFilePrintPreview)
ON_WM_CONTEXTMENU()
ON_WM_RBUTTONUP()
END_MESSAGE_MAP()
// CnyobaView construction/destruction
CnyobaView::CnyobaView()
{
// TODO: add construction code here
}
CnyobaView::~CnyobaView()
{
}
BOOL CnyobaView::PreCreateWindow(CREATESTRUCT& cs)
{
// TODO: Modify the Window class or styles here by modifying
// the CREATESTRUCT cs
return CView::PreCreateWindow(cs);
}
// CnyobaView drawing
void CnyobaView::OnDraw(CDC* pDC)
{
CnyobaDoc* pDoc = GetDocument();
ASSERT_VALID(pDoc);
if (!pDoc)
return;
int data[] = {15,10,30,40,10,30,20,20,40,60};
int sisi = 200;
int titikawal = 200;
int a = 5 ;
int b = 5 ;
int i = 0 ;
int grid = 10;
int lgrid = 2;
int titikakhir[] = {titikawal+sisi,titikawal+sisi};
pDC->MoveTo(titikawal,titikawal);
pDC->LineTo(titikawal,titikawal+sisi);
pDC->LineTo(titikawal+sisi,titikawal+sisi);
pDC->MoveTo(titikawal-a,titikawal+b);
pDC->LineTo(titikawal,titikawal);
pDC->LineTo(titikawal+a,titikawal+b);
pDC->MoveTo(titikakhir[0]-b,titikakhir[1]+a);
pDC->LineTo(titikakhir[0],titikakhir[1]);
pDC->LineTo(titikakhir[0]-b,titikakhir[1]-a);
for (i = 1 ;i < grid;i++ )
{
pDC->MoveTo(titikawal + (sisi/grid)*i,titikawal+sisi+lgrid);
pDC->LineTo(titikawal + (sisi/grid)*i,titikawal+sisi-lgrid);
pDC->MoveTo(titikawal + lgrid,titikawal+sisi-(sisi/grid)*i);
pDC->LineTo(titikawal - lgrid,titikawal+sisi-(sisi/grid)*i);
}
for(i = 0 ; i < grid ; i++){
if (i == 0){
pDC->MoveTo(titikawal + (sisi/grid)*i,titikawal+sisi-data[i]);
}
else{
pDC->LineTo(titikawal + (sisi/grid)*i,titikawal+sisi-data[i]);
}
}
}
// CnyobaView printing
void CnyobaView::OnFilePrintPreview()
{
#ifndef SHARED_HANDLERS
AFXPrintPreview(this);
#endif
}
BOOL CnyobaView::OnPreparePrinting(CPrintInfo* pInfo)
{
// default preparation
return DoPreparePrinting(pInfo);
}
void CnyobaView::OnBeginPrinting(CDC* /*pDC*/, CPrintInfo* /*pInfo*/)
{
// TODO: add extra initialization before printing
}
void CnyobaView::OnEndPrinting(CDC* /*pDC*/, CPrintInfo* /*pInfo*/)
{
// TODO: add cleanup after printing
}
void CnyobaView::OnRButtonUp(UINT /* nFlags */, CPoint point)
{
ClientToScreen(&point);
OnContextMenu(this, point);
}
void CnyobaView::OnContextMenu(CWnd* /* pWnd */, CPoint point)
{
#ifndef SHARED_HANDLERS
theApp.GetContextMenuManager()->ShowPopupMenu(IDR_POPUP_EDIT, point.x, point.y, this, TRUE);
#endif
}
// CnyobaView diagnostics
#ifdef _DEBUG
void CnyobaView::AssertValid() const
{
CView::AssertValid();
}
void CnyobaView::Dump(CDumpContext& dc) const
{
CView::Dump(dc);
}
CnyobaDoc* CnyobaView::GetDocument() const // non-debug version is inline
{
ASSERT(m_pDocument->IsKindOf(RUNTIME_CLASS(CnyobaDoc)));
return (CnyobaDoc*)m_pDocument;
}
#endif //_DEBUG
// CnyobaView message handlers
6. Klik F5 untuk start program, hasilnya seperti di bawah ini :
nah itu teman tutorial yang admin buat, selamat mencoba! Share jika bermanfaat.!







Komentar
Posting Komentar