Monday, July 2, 2012

Membuat Aplikasi Google Map (Visual Basic 6.0)

Berikut Langkah-langkahnya:
1. Buka web www.code.google.com
2. Klik Edit Html di pojok kanan dan copy code tersebut
3. Paste code tersebut pada notepad dan simpan dengan attribut .html


01<!--
02You are free to copy and use this sample in accordance with the terms of the
04-->
05 
06<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
07<html xmlns="http://www.w3.org/1999/xhtml" xmlns:v="urn:schemas-microsoft-com:vml">
08  <head>
09    <meta http-equiv="content-type" content="text/html; charset=utf-8"/>
10    <title>Google Maps API Sample</title>
11    <style type="text/css">
12      @import url("http://www.google.com/uds/css/gsearch.css");
14    </style>
16      type="text/javascript"></script>
17    <script src="http://www.google.com/uds/api?file=uds.js&amp;v=1.0" type="text/javascript"></script>
18 
19    <script src="http://www.google.com/uds/solutions/localsearch/gmlocalsearch.js" type="text/javascript"></script>
20    <script type="text/javascript">
21 
22    function initialize() {
23      if (GBrowserIsCompatible()) {
24       
25        // Create and Center a Map
26        var map = new GMap2(document.getElementById("map_canvas"));
27        map.setCenter(new GLatLng(37.4419, -122.1419), 13);
28        map.addControl(new GLargeMapControl());
29        map.addControl(new GMapTypeControl());
30     
31        // bind a search control to the map, suppress result list
32        map.addControl(new google.maps.LocalSearch(), new GControlPosition(G_ANCHOR_BOTTOM_RIGHT, new GSize(10,20)));
33      }
34    }
35    GSearch.setOnLoadCallback(initialize);
36 
37    </script>
38  </head>
39  <body onload="initialize()" onunload="GUnload()" style="font-family: Arial;border: 0 none;">
40    <div id="map_canvas" style="width: 500px; height: 300px"></div>
41  </body>

42</html>  


4. selesai
Setelah membuat file html kita lanjutkan dengan membuat program dengan Visual Basic 6.0, berikut langkah untuk pemprograman di Visual Basic 6.0
1. All Program–> Microsoft Visual Studio–> Visual Basic 6.0 pilih yang standart exe
2. Setelah muncul form klik Project–> Component (Ctrl + T) sehingga muncul form baru dan pilih “Microsoft Internet Controls”

3. Buat web browser pada form dengan mengklik web browser(gambar bola)dunia pada toolbar. untuk lebih jelasnya liat gambar dibawah

4. Masukkan code berikut pada form

1Private Sub Form_Load()
2WebBrowser1.Navigate (App.Path &amp; "/map.html")
3End Sub

keterangan:
WebBrowser1 = properties web browser, map.html = nama file html yang tadi.
Jangan lupa file html diletakkan satu folder dengan program visual basicnya
5. Run program tersebut,seperti gambar dibawah ini

6. Selesai..
Skrinsut seperti ini:

NB: harus online..hehe
 Source :  http://android78.wordpress.com/

 
                                                            


HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari Membuat Visual Basic di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.

1 comment:

  1. Best 3d Poker Rooms in San Diego
    In fact, 포천 출장마사지 Las Vegas is the region's 춘천 출장안마 most populous city, 청주 출장샵 with 2,420 poker 영주 출장샵 rooms, the 하남 출장샵 largest in the country, at 36,000 square feet (and a

    ReplyDelete