真实的国产乱ⅩXXX66竹夫人,五月香六月婷婷激情综合,亚洲日本VA一区二区三区,亚洲精品一区二区三区麻豆

成都創(chuàng)新互聯(lián)網(wǎng)站制作重慶分公司

vb.net界面調(diào)用桌面 VB程序界面

用《VB.NET》設(shè)置桌面圖標(biāo)位置

什么位置呀?是路徑還是坐標(biāo)?路徑很簡單,坐標(biāo)要復(fù)雜點(diǎn)。如果是路徑可以首先獲取系統(tǒng)路徑,這樣可以根據(jù)不同的系統(tǒng)或者系統(tǒng)安裝路徑不同都能獲取到,坐標(biāo)的獲取或者是截圖的話,可以參考別的東西,如果需要我再給你找找文件

創(chuàng)新互聯(lián)成立于2013年,是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司,擁有項(xiàng)目成都網(wǎng)站設(shè)計(jì)、成都網(wǎng)站建設(shè)網(wǎng)站策劃,項(xiàng)目實(shí)施與項(xiàng)目整合能力。我們以讓每一個(gè)夢想脫穎而出為使命,1280元烏審做網(wǎng)站,已為上家服務(wù),為烏審各地企業(yè)和個(gè)人服務(wù),聯(lián)系電話:13518219792

vb.net ( 注意是vb.net不是vb6.0) 如何打開桌面上的exe文件。急救?。。?/h2>

想不起來了,不過給你個(gè)思路,要沒人回答也許能用上。

VB里有一個(gè)聲音播放控件。把這個(gè)放在窗體上。

它有一些屬性,和方法。

你在窗體加載的時(shí)候就使用播放方法。

而當(dāng)播放完畢的事件發(fā)生后,在使用播放方法。

這樣同一個(gè)歌曲就可以循環(huán)播放了。

很簡單的,只是那是我一年前做的程序了,又沒有備份。

怎么用VB.NET2005編程實(shí)現(xiàn)在桌面隨機(jī)位置顯示隨機(jī)不同的圖片,一下顯示一種圖片),望高手幫忙,

當(dāng)程序運(yùn)行的時(shí)候你可以將窗體作為Form的背景圖,然后創(chuàng)建一個(gè)類,類繼承Picture,然后用一個(gè)線程不停的創(chuàng)建這個(gè)類,再使用Form中的鼠標(biāo)點(diǎn)擊事件,或者退出程序,或者清除掉所有的類

vb.net怎么寫代碼給指定的硬盤里的文件創(chuàng)建桌面快捷方式

簡單啊,可以調(diào)用命令行,不要死腦筋哦

[InternetShortcut] "E:\guiminer.url"

URL="E:\guiminer.exe" "E:\guiminer.url"

IconIndex=0 "E:\guiminer.url"

IconFile="E:\guiminer.exe" "E:\guiminer.url"

VB.NET怎么調(diào)用別的窗體!

在 VB.NET 中,你編好的窗體僅僅是一個(gè)類而已,不像 VB6,窗體本身就是一個(gè)對象。就是說,如果要顯示窗體,你需要將你編的窗體類實(shí)例化對一個(gè)對象,然后再調(diào)用這個(gè)對象:

Dim frm As New frmDlg ' 將 frmDlg 窗體類實(shí)例化為對象 frmfrm.Show() ' 將實(shí)例化的對象顯示出來

怎么用VB.NET2005編程實(shí)現(xiàn)在桌面隨機(jī)位置顯示隨機(jī)不同的圖片,望高手幫忙

基本搞定,你需要改的是count的值,圖片的路徑,并記得在Form1中添加一個(gè)Timer1,設(shè)置Interval的值

我的實(shí)現(xiàn)方法是把Form1做成全屏,懶得去碰Window的Screen,挺麻煩的

----------------------------------------------------------------------------------------------------------------------

Public?Class?Form1

Dim?count?As?Integer?=?4

Dim?pics(count)?As?String

Dim?x?=?SystemInformation.PrimaryMonitorSize.Width

Dim?y?=?SystemInformation.PrimaryMonitorSize.Height

Dim?ran?As?Random?=?New?Random()

Private?Sub?Form1_Click(ByVal?sender?As?Object,?ByVal?e?As?System.EventArgs)?Handles?Me.Click

Timer1.Stop()

Me.Close()

End?Sub

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

pics(0)?=?"D:\pics\10-100FQ94307.jpg"

pics(1)?=?"D:\pics\10-100FQ94310.jpg"

pics(2)?=?"D:\pics\10-100FQ94316.jpg"

pics(3)?=?"D:\pics\10-100FQ94317.jpg"

pics(4)?=?"D:\pics\10-100FQ94324.jpg"

Me.ControlBox?=?False

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

Me.MaximizeBox?=?False

Me.MinimizeBox?=?False

Me.StartPosition?=?System.Windows.Forms.FormStartPosition.Manual

Me.Text?=?""

Me.WindowState?=?FormWindowState.Maximized

Randomize()

Timer1.Start()

End?Sub

Private?Sub?Timer1_Tick(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Timer1.Tick

Dim?tmpPic?As?PictureBox?=?New?PictureBox()

tmpPic.AutoSize?=?True

tmpPic.Load(pics(CInt(ran.NextDouble()?*?count)))

tmpPic.Visible?=?True

tmpPic.Left?=?CInt(ran.NextDouble?*?x)

tmpPic.Height?=?CInt(ran.NextDouble?*?y)

Controls.Add(tmpPic)

AddHandler?tmpPic.Click,?AddressOf?Form1_Click

End?Sub

End?Class


網(wǎng)頁名稱:vb.net界面調(diào)用桌面 VB程序界面
網(wǎng)站網(wǎng)址:http://weahome.cn/article/dodgsgc.html

其他資訊

在線咨詢

微信咨詢

電話咨詢

028-86922220(工作日)

18980820575(7×24)

提交需求

返回頂部