vb.net程序（VS2010開發(fā)）中如何嵌入百度地圖?求編程大神指導

這個說簡單也簡單，百度google都有自己的地圖接口，去找一下接口調(diào)用說明，里面都有案例。在程序里面調(diào)用即可。至于調(diào)用后具體的功能則需要查詢接口函數(shù)。我以前做過google的，百度的實際上也是一樣

讓客戶滿意是我們工作的目標，不斷超越客戶的期望值來自于我們對這個行業(yè)的熱愛。我們立志把好的技術(shù)通過有效、簡單的方式提供給客戶，將通過不懈努力成為客戶在信息化領(lǐng)域值得信任、有價值的長期合作伙伴，公司提供的服務項目有：主機域名、網(wǎng)絡空間、營銷軟件、網(wǎng)站建設、洪江管理區(qū)網(wǎng)站維護、網(wǎng)站推廣。

怎么在VB.NET中將要加載的地圖文檔設置為相對路徑？

可以用split函數(shù)將文件路徑進行分割，如我只想要文件名可以這樣做：

dim path as string =me.opendialog1.filename

dim s() as string=path.split("\")

dim filename as string=s(s.length-1)

vb.net 繪圖，重繪知識

繼承（Inherits）控件就可以重寫它的屬性和方法，圖標可以在paint中重繪，用gdi，工具主要在drawing和drawing2d中。

combobox彈出的框增加圖標嗎？個人看法可能需要得到那個句柄，才可以重繪，但那個好像是一體的，不知道能不能弄到句柄。

textbox可以自定義高度。只是以行高度為單位，改變字體大小即可，沒必要重寫吧。

我也自學，感覺基礎(chǔ)容易學，進階資料少。循序漸進也沒序可循，基本是在摸索。

都是想到什么問題，就立下一個目標，然后攻破他，結(jié)果可能是嘗試幾天后，發(fā)現(xiàn)目標超出能力范圍。

晦澀是相對的，實踐出真知，多動手，基礎(chǔ)就好了。

vb.net 如何嵌入地圖

新建一個文件,寫入下面的代碼:

!doctype?html

html

head

meta?name="viewport"?content="initial-scale=1.0,?user-scalable=no"?/

meta?http-equiv="Content-Type"?content="text/html;?charset=gbk"?/

titleBaidu?Map?V1.2/title

script?type="text/javascript"?src=";services=true"

!--?add?baidu?map?api?--

/script

/head

body

div?id="container"?style="width:?600px;?height:?400px;"

/div

/body

/html

script?type="text/javascript"

var?map?=?new?BMap.Map("container");???????????? ????//?new?Map

var?point?=?new?BMap.Point(116.397128,?39.916527);??????//?Location,?（經(jīng)度,?緯度）

map.centerAndZoom(point,?15);??????????????????? ????//?show?Map

//?添加縮放功能

map.enableScrollWheelZoom();

map.enableKeyboard();

/script

保存到程序exe同一目錄下,文件名:map.html

然后BUTTON點擊事件:

WebBrowser1.Navigate(Application.StartupPath??"\map.html")

這樣就可以了

ps:經(jīng)緯度可以到百度地圖官網(wǎng)去獲取

或者到: ?去生成代碼

VB.NET (c#) 想做個電子地圖 用什么控件或者第三方控件 （C/S）具體點，謝謝了！ 可以追加100分

是做網(wǎng)站中的電子地圖嗎？試試百度或者google地圖，很簡單有例子的。

其他的天地圖、MapABC、圖吧等。

vb.net桌面中bitmap類如何直接繪制到屏幕?

可以直接顯示的。你看下面的示例，使用vb.net畫的齒輪：

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

b = New Bitmap(PictureBox1.Width, PictureBox1.Height)

g = Graphics.FromImage(b)

'g.RotateTransform(90)

g.Clear(Color.White)

g.TranslateTransform(PictureBox1.Width / 2, PictureBox1.Height / 2)

g.ScaleTransform(1, -1)

'g.SmoothingMode = Drawing2D.SmoothingMode.AntiAlias

g.SmoothingMode = Drawing2D.SmoothingMode.HighQuality

DrawCL(g, New PointF(Val(TextBox1.Text), Val(TextBox2.Text)), Val(TextBox3.Text), Val(TextBox4.Text), Val(TextBox5.Text), Val(TextBox6.Text), Val(TextBox7.Text), Val(TextBox8.Text), Val(TextBox9.Text))

DrawCL(g, New PointF(Val(TextBox18.Text), Val(TextBox17.Text)), Val(TextBox16.Text), Val(TextBox15.Text), Val(TextBox14.Text), Val(TextBox13.Text), Val(TextBox12.Text), Val(TextBox11.Text), Val(TextBox10.Text))

PictureBox1.Image = b

End Sub