怎么用VB.NET編程實現(xiàn)在桌面隨機坐標顯示指定的某些圖片（隨機顯示某張圖片），望高手幫忙

1.首先建立一個基于Microsoft?.NET?Framework?2.0以上的VB.NET解決方案。

10年積累的網(wǎng)站制作、成都網(wǎng)站設計經(jīng)驗，可以快速應對客戶對網(wǎng)站的新想法和需求。提供各種問題對應的解決方案。讓選擇我們的客戶得到更好、更有力的網(wǎng)絡服務。我雖然不認識你，你也不認識我。但先制作網(wǎng)站后付款的網(wǎng)站建設流程，更有綠春免費網(wǎng)站建設讓你可以放心的選擇與我們合作。

2.在窗體上面添加一個PictureBox控件，并綁定到父容器里面（綁定到父容器的操作伏態(tài)可以不去實現(xiàn)）。

3.給PictureBox.Image指定路徑，這里以“C:\Windows\Web\Wallpaper\Windows\img0.jpg”為例子，當然這張圖片在Windows?7旗艦版下面會有的。

4.添加代碼：

Public?Class?Form1

Private?Sub?Form1_Load(sender?As?Object,?e?As?EventArgs)?Handles?MyBase.Load

Randomize()

Dim?xScn?As?UInteger?=?My.Computer.Screen.Bounds.Width

Dim?yScn?As?UInteger?=?My.Computer.Screen.Bounds.Height

ReLine:

Dim?xShow?As?Integer?=?Int((xScn?+?1)?*?Rnd())?-?Me.Width

Dim?yShow?As?Integer?=?Int((yScn?+?1)?*?Rnd())?-?Me.Height

Me.FormBorderStyle?=?Windows.Forms.FormBorderStyle.None

拍漏PictureBox1.Image?=?Image.FromFile("C:\Windows\Web\Wallpaper\Windows\img0.jpg")

PictureBox1.SizeMode?=?PictureBoxSizeMode.StretchImage

If?xShow?=?0?And?yShow?=?0?Then

Me.Location?=?New?Point(xShow,?yShow)

Else

GoTo?ReLine

End?If

Me.Show()

End?Sub

End?Class

5.我是襲廳爛使用?Visual?Studio?2012?Ultimate?開發(fā)的，若有錯誤請參考請他方法進行修改

VB點虐 加載圖片某一位置

你要確定每個狀態(tài)的大小是一櫻蔽樣的才可以：

Public Bitmap CutImage(ByVal start As Point, ByVal end As Point, ByVal b As Bitmap)

Dim f As New Bitmap(end.X - start.X + 1, end.Y - start.Y + 1)

For i As Integer = start.X To end.X + 1

For j As Integer = start.Y To end.Y + 1

Dim c As Color = b.GetPixel(i, j)

f.SetPixel(i - start.X, j - start.Y, c)

Next

Next

Return f

End Sub

這個函數(shù)就可以用于裁納頌叢剪圖像，返回裁剪后的圖像，start是開始裁剪的位置，end是結(jié)束裁剪的位置，b是要裁剪的圖像，假如你的這些洞櫻按鈕每個寬30，高20，你就可以用

PictureBox1.Image = CutImage(New Point(第n - 1個按鈕 * 30, 0), New Point(第n個按鈕 * 30, 20), 按鈕存在的位圖)

vb點虐 中通過Graphic怎么在原有的圖片上繪制DrawLines

一般Graphics都是通過控件比如Panel，PictureBox來進行繪制的，

PictureBox pb= new PictureBox();

pb.Paint += new System.Windows.Forms.PaintEventHandler(this.Test_Paint);

void Test_Paint(object sender, PaintEventArgs e)

{

Graphics g = e.Graphics;

g.DrawImage(....);

g.DrawLine(...);

}

求大神指點vb點虐 怎么以指定方式打開圖片呢?

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

'建仔談敗立新的系統(tǒng)進程????

Dim?process?As?New?System.Diagnostics.Process()

If?RadioButton1.Checked?Then

'設置文件名，此處為圖片的真實路徑+文件名????

process.StartInfo.FileName?=?"c:\a.bmp"

'設置進程運行參數(shù)????

process.StartInfo.Arguments?=?"rundll32.exe?shimgvw.dll"

Else

process.StartInfo.FileName?=?"mspaint.exe"

process.StartInfo.Arguments?=?"c:\a.bmp"

End?If

'此項為是否使用Shell執(zhí)行程序，因系統(tǒng)默認為true，此項也可不設，但若設置必須為true????

'process.StartInfo.UseShellExecute?=?True

侍舉?'此處可以更改進念顫程所打開窗體的顯示樣式，可以不設????

'process.StartInfo.WindowStyle?=?System.Diagnostics.ProcessWindowStyle.Hidden

process.Start()

process.Close()

End?Sub