vb.net中怎么使窗體全屏顯示

Me.Height = My.Computer.Screen.Bounds.Height

公司主營(yíng)業(yè)務(wù)：成都網(wǎng)站建設(shè)、網(wǎng)站建設(shè)、移動(dòng)網(wǎng)站開(kāi)發(fā)等業(yè)務(wù)。幫助企業(yè)客戶真正實(shí)現(xiàn)互聯(lián)網(wǎng)宣傳，提高企業(yè)的競(jìng)爭(zhēng)能力。成都創(chuàng)新互聯(lián)公司是一支青春激揚(yáng)、勤奮敬業(yè)、活力青春激揚(yáng)、勤奮敬業(yè)、活力澎湃、和諧高效的團(tuán)隊(duì)。公司秉承以“開(kāi)放、自由、嚴(yán)謹(jǐn)、自律”為核心的企業(yè)文化，感謝他們對(duì)我們的高要求，感謝他們從不同領(lǐng)域給我們帶來(lái)的挑戰(zhàn)，讓我們激情的團(tuán)隊(duì)有機(jī)會(huì)用頭腦與智慧不斷的給客戶帶來(lái)驚喜。成都創(chuàng)新互聯(lián)公司推出廈門(mén)免費(fèi)做網(wǎng)站回饋大家。

Me.Width = My.Computer.Screen.Bounds.Width

這是設(shè)置窗體的長(zhǎng)寬和屏幕的分辨率一樣大小，相當(dāng)于全屏。

如果Me.WindowState=FormWindowState.Maximized的話，只是單純的將窗體最大化，但恢復(fù)窗口大小后窗體的大小實(shí)際上還和原來(lái)一樣大。

VB.NET的特點(diǎn)

1.真正成為面向?qū)ο笠约爸С掷^承性的語(yǔ)言。

2.窗體設(shè)計(jì)器支持可視化繼承，并且包含了許多新的特性，比如自動(dòng)改變窗體大小、資源本地化支持、數(shù)據(jù)類工具內(nèi)在支持XML數(shù)據(jù)。

3.直接建立在.NET的框架結(jié)構(gòu)上，因此開(kāi)發(fā)人員可以充分利用所有.NET平臺(tái)特性，也可以與其他的.NET語(yǔ)言交互。

4.為Windows應(yīng)用程序提供了XCOPY部署，開(kāi)發(fā)者不再需要為DLL的版本問(wèn)題擔(dān)憂。

怎么用VB.net visual basic項(xiàng)目編寫(xiě)天氣預(yù)報(bào)程序

Visual Basic通用報(bào)表設(shè)計(jì)小結(jié)

本文對(duì)vb設(shè)計(jì)報(bào)表的方法作了一個(gè)小結(jié)，大家都知道，在VB平臺(tái)下制作報(bào)表大致有兩種選擇：使用VB自帶的Data Report控件和借助第三方軟件。其中第三方軟件比較著名的就是MS Excel和Seagate公司的CrystalReporter，以下就這三個(gè)方案進(jìn)行詳細(xì)的討論。

1. Data Report控件

1．1 Data Report控件使用方法

由于是VB自帶的控件，所以使用相對(duì)比較方便。使用方法是：首先在"工程"菜單下面選擇"添加Data report"選項(xiàng)，這樣Data Report控件就選入到了應(yīng)用程序。

使用Data report的情況大多數(shù)采用數(shù)據(jù)綁定的模式，也就是將此控件與數(shù)據(jù)庫(kù)的數(shù)據(jù)表綁定起來(lái)以便可以不用編寫(xiě)代碼就輕松完成報(bào)表的設(shè)計(jì)。要使用數(shù)據(jù)綁定就必須要指定數(shù)據(jù)源，這里的數(shù)據(jù)源不是數(shù)據(jù)控件而是數(shù)據(jù)環(huán)境（Data Environment）,選擇"工程"菜單下面選擇"添加Data Environment"選項(xiàng)就可以將數(shù)據(jù)環(huán)境添加進(jìn)應(yīng)用程序中。數(shù)據(jù)環(huán)境有兩個(gè)重要的屬性：Connection 和Command屬性，前者是連接指定的數(shù)據(jù)庫(kù)，后者連接指定的數(shù)據(jù)表，一旦這兩者都設(shè)置成功之后，就可以把數(shù)據(jù)環(huán)境作為數(shù)據(jù)源了。只需要把Data report的DataSource屬性設(shè)置為前面的數(shù)據(jù)環(huán)境對(duì)象以及把DataMember設(shè)置為數(shù)據(jù)環(huán)境對(duì)象的Command對(duì)象即可。

1．2 Data Report控件界面元素

完成了Data report控件的數(shù)據(jù)綁定工作之后就可以直接控制報(bào)表的制作與顯示了。這里首先熟悉一下Data report控件的顯示界面：

Data report控件一共有5個(gè)區(qū)組成，分別是報(bào)表頭、頁(yè)面頭、細(xì)節(jié)區(qū)、頁(yè)面注腳和報(bào)表注腳。報(bào)表頭和報(bào)表注腳是用分別用于整個(gè)報(bào)表的最上部和最下部，它們將出現(xiàn)于整個(gè)報(bào)表的每一頁(yè)，可以放置一些報(bào)表名稱，時(shí)間之類的固定文本；頁(yè)面頭和頁(yè)面注腳只能出現(xiàn)在當(dāng)前頁(yè)的最上部和最下部，也就是說(shuō)它只能出現(xiàn)在當(dāng)前頁(yè)中，不出現(xiàn)在其他頁(yè)面中，可以放置隨頁(yè)面變化的一些量比如頁(yè)碼等；而細(xì)節(jié)區(qū)就是用來(lái)進(jìn)行實(shí)際顯示的區(qū)域，它是我們最為關(guān)心的區(qū)域，通過(guò)在此區(qū)域內(nèi)放置顯示控件可以控制報(bào)表的實(shí)際顯示輸出。這里介紹一下放置文本框控件的使用方法，其實(shí)在綁定情況下只需要設(shè)置其DataMember和Datafield即可，前者用來(lái)指定數(shù)據(jù)表，可以設(shè)置為前面數(shù)據(jù)環(huán)境對(duì)象的Command對(duì)象，后者是指定數(shù)據(jù)段，即綁定的數(shù)據(jù)庫(kù)的指定字段。這樣不需要編寫(xiě)任何代碼就可以實(shí)現(xiàn)報(bào)表的顯示工作。

1．3 Data Report控件的打印功能

對(duì)于報(bào)表的打印可以直接使用Data report自帶的打印功能，即可以實(shí)現(xiàn)簡(jiǎn)易的報(bào)表打印。不過(guò)為了實(shí)現(xiàn)比較復(fù)雜的打印功能，也可以通過(guò)程序控制的方法來(lái)進(jìn)行。這里只是給出一個(gè)實(shí)現(xiàn)思路：首先需要制作一個(gè)按鈕控件來(lái)顯示"打印設(shè)置"的窗口，通過(guò)這個(gè)窗口用戶可以設(shè)置打印的相關(guān)的參數(shù)，然后在實(shí)現(xiàn)打印的子模塊中使用VB內(nèi)嵌的printer對(duì)象來(lái)實(shí)現(xiàn)真實(shí)的打印，該對(duì)象能夠?qū)Υ蛴〉漠?dāng)前位置進(jìn)行定位，而且對(duì)打印的字體等參數(shù)進(jìn)行控制，所以結(jié)合"打印設(shè)置"窗口可以實(shí)現(xiàn)類似于word里面的打印功能。

2．MS Excel

說(shuō)起報(bào)表設(shè)計(jì)應(yīng)用程序，無(wú)意微軟的Excel是一支獨(dú)秀，MS Excel就是用來(lái)進(jìn)行表格和報(bào)表設(shè)計(jì)用的應(yīng)用程序，它具有優(yōu)秀的方格控制和宏代碼定制功能。所以如果在設(shè)計(jì)自己的應(yīng)用程序的時(shí)候能夠結(jié)合到Excel的話，那么你的應(yīng)用程序就應(yīng)該是相當(dāng)?shù)耐晟屏?，因?yàn)闊o(wú)論是編輯還是打印功能，Excel都提供了很完美的解決方案，所以你的應(yīng)用程序所要做的事情就是實(shí)現(xiàn)程序和Excel通訊即可。

事實(shí)上，可以使用VBscript可以將VB與Excel兩者連接起來(lái)。以下就簡(jiǎn)要介紹在VB下開(kāi)發(fā)基于Excel的編程思路。

在VB中處理Excel的對(duì)象大致分為五個(gè)：Application對(duì)象、WorkBook對(duì)象、WorkSheet對(duì)象、Range對(duì)象以及Cell對(duì)象。它們的功能分別如下：

Application---------用來(lái)指代整個(gè)應(yīng)用程序。

WorkBook----------表示工作簿對(duì)象

WorkSheet---------表示工作表對(duì)象，注意，一個(gè)工作簿可以包含多個(gè)工作表，它們就類似于多文檔中的框架窗口和里面的單個(gè)視圖一樣。

Range-------------表示工作表中的某個(gè)區(qū)域范圍對(duì)象，特殊情況下也可以只代表一個(gè)Cell。

Cell---------------表示特定工作表的一個(gè)單元格對(duì)象。這個(gè)對(duì)象的使用頻率是最高的。

清楚了以上的五個(gè)對(duì)象的應(yīng)用范圍，那么使用它們就很簡(jiǎn)單了，不過(guò)在使用這些對(duì)象之前，首先需要對(duì)它們進(jìn)行聲明。方法是在"工程"的"引用"對(duì)話框之下選擇"Microsoft Excel9.0 Object Library"，這樣就將整個(gè)Excel對(duì)象庫(kù)就引入到程序中來(lái)了。

下面舉一個(gè)示例，其實(shí)現(xiàn)的功能是打開(kāi)一個(gè)工作簿。

Function OpenBook(strFilePath As String) As Boolean

' This procedure checks to see if the workbook

' specified in the strFilePath argument is open.

' If it is open, the workbook is activated. If it is

' not open, the procedure opens it.

Dim wkbCurrent As Excel.Workbook

Dim strBookName As String

On Error GoTo OpenBook_Err

' Determine the name portion of the strFilePath argument.

strBookName = NameFromPath(strFilePath)

If Len(strBookName) = 0 Then Exit Function

If Workbooks.Count 0 Then

For Each wkbCurrent In Workbooks

If UCase$(wkbCurrent.Name) = UCase$(strBookName) Then

wkbCurrent.Activate

Exit Function

End If

Next wkbCurrent

End If

Workbooks.Open strBookName

OpenBook = True

OpenBook_End:

Exit Function

OpenBook_Err:

OpenBook = False

Resume OpenBook_End

End Function

3．Crystal Reporter（水晶報(bào)表）

做為一個(gè)優(yōu)秀的報(bào)表軟件，水晶報(bào)表是實(shí)際應(yīng)用中最多的方案。在這一節(jié)里主要介紹一下水晶報(bào)表的定制和顯示，打印功能的實(shí)現(xiàn)。

首先要區(qū)分Crystal Reports插件程序和Crystal Reports控件。前者主要用來(lái)創(chuàng)建報(bào)表模板，后者主要是用來(lái)在程序中顯示和打印報(bào)表，這兩者的分工決定了它們程序中的功能的不同。

其中Crystal Reports的插件程序可以從Seagate公司的官方網(wǎng)站上下載最新的測(cè)試版本。

3．1 Crystal Reports插件程序的使用

選擇"外接程序"菜單的"報(bào)表設(shè)計(jì)器"選項(xiàng)，則VB將執(zhí)行Crystal Reports Pro插件應(yīng)用程序。在Crystal Reports Pro里選擇"新建報(bào)表"圖標(biāo)，可以選擇8標(biāo)準(zhǔn)模板和一個(gè)自定義的模板來(lái)開(kāi)始報(bào)表工程。

整個(gè)水晶報(bào)表的使用跟第一節(jié)的Data Report的使用很類似。首先需要給報(bào)表選擇數(shù)據(jù)源，（即數(shù)據(jù)庫(kù)），然后就可以在報(bào)表中添加、刪除、修改字段以及為記錄分組，可以利用水晶報(bào)表創(chuàng)建很多具有自定義風(fēng)格的報(bào)表。由于本身Crystal Reports插件程序就是一個(gè)功能強(qiáng)大的報(bào)表設(shè)計(jì)軟件，這里就不能一一的講解了，有興趣可以參考程序自帶的幫助文檔。

3．2 Crystal Reports控件的背景知識(shí)

Crystal Reports Pro還提供一個(gè)報(bào)表生成模塊，該模塊可以連接到并訪問(wèn)VB應(yīng)用程序，VB程序員不需花費(fèi)大量時(shí)間寫(xiě)自己的代碼就可再應(yīng)用程序中添加復(fù)雜的報(bào)表生成及輸出功能。

Crystal Reports引擎是一個(gè)動(dòng)態(tài)鏈接庫(kù)，它可以使應(yīng)用程序訪問(wèn)并具有同Crystal Reports 一樣強(qiáng)大的報(bào)表輸出功能。應(yīng)用程序是通過(guò)Crystal Reports ActiveX控件來(lái)訪問(wèn)引擎。再編譯時(shí)應(yīng)用程序同報(bào)表引擎鏈接，以給應(yīng)用程序添加了生成報(bào)表的功能。

當(dāng)程序使用Crystal Reports ActiveX控件時(shí)，可以通過(guò)再設(shè)計(jì)時(shí)設(shè)置Crystal對(duì)象屬性或者再運(yùn)行時(shí)改變對(duì)象屬性，來(lái)建立應(yīng)用程序和Crystal Reports之間的連接。通過(guò)Crystal控件的屬性可以指定：

響應(yīng)應(yīng)用程序某個(gè)事件的輸出報(bào)表的名字。

報(bào)表的目標(biāo)位置（預(yù)覽窗口、磁盤(pán)文件或者電子郵件等）。

想要打印的份數(shù)（如果報(bào)表提交給打印機(jī)的話）。

輸出文件的信息。

預(yù)覽窗口的大小及位置信息（如果報(bào)表在預(yù)覽窗口中顯示時(shí)）。

選擇公式信息（如果在報(bào)表中限制記錄的話）。

排序信息。

其他相關(guān)的屬性。

這里要注意一點(diǎn)的是，Crystal控件必須在由Crystal Reports Pro創(chuàng)建的報(bào)表中使用，而試圖在VB應(yīng)用程序里引用之前，必須首先創(chuàng)建報(bào)表。

3．3 Crystal Reports控件的使用

了解了Crystal Reports控件的功能，那么就可以使用它了。首先通過(guò)"工程"的"部件"選項(xiàng)里面選擇"Crystal Reports Control"，那么VB的工具箱里面就添加了Crystal Reports控件了。

注意，對(duì)于Crystal Reports控件的最重要的屬性就是ReportFileName了，把它設(shè)置為前面已經(jīng)在Crystal Reports Pro里定制好的報(bào)表模板的文件路徑。那么只需要調(diào)用控件的PrintReport方法就可以將報(bào)表顯示出來(lái)了。

相對(duì)于Data Report控件來(lái)說(shuō)，Crystal Reports控件的功能更加的完善，報(bào)表預(yù)覽，打印，編輯修改等功能都很完善，所以在實(shí)際的報(bào)表應(yīng)用設(shè)計(jì)方案中，使用Crystal Reports的相對(duì)較多。然而Crystal Reports控件也有它的局限性，即它不能在運(yùn)行時(shí)創(chuàng)建自定義的窗口?？梢允褂每丶臄?shù)據(jù)綁定屬性來(lái)創(chuàng)建數(shù)據(jù)綁定報(bào)表，但是報(bào)表本身的格式都是由Crystal Reports控件內(nèi)部進(jìn)行處理的。一般說(shuō)來(lái)，Crystal Reports控件不提供在程序中對(duì)報(bào)表字段級(jí)的訪問(wèn)。這一缺陷可以通過(guò)設(shè)計(jì)出足夠多的報(bào)表來(lái)彌補(bǔ)。

4.其他方法

除了通過(guò)上述的三種方法來(lái)實(shí)現(xiàn)報(bào)表設(shè)計(jì)以外，當(dāng)然也可以直接利用Win32 API來(lái)進(jìn)行直接進(jìn)行設(shè)計(jì)，這種方式是最為靈活也是最為繁瑣的方式，因?yàn)樗械木庉?、修改、打印等功能都是由程序控制，所以一般情況下不會(huì)使用這樣的方式來(lái)處理，這里就不介紹了。

5．小結(jié)

報(bào)表設(shè)計(jì)是程序員經(jīng)常要遇到的問(wèn)題，本文主要介紹目前主流的報(bào)表設(shè)計(jì)方案，由于所涉及到的知識(shí)點(diǎn)比較多，限于篇幅，在這里只是作了簡(jiǎn)要的介紹，希望可以起到拋磚引玉的作用。

vb 滿天星 代碼

題目真夠簡(jiǎn)練的。。

private sub Form_Click()

dim X as single,Y as single, L as long

dim i as long

me.Line(0,0)-(me.scalewidth,me.scaleheight),h0,BF

for i=1 to 1000

X=rnd()*me.scalewidth

Y=rnd()*me.scaleheight

L=int(rnd()*256)

me.Pset(X,Y),Rgb(L,L,L)

next i

end sub

vb.net　怎么樣將一個(gè)窗體設(shè)為全屏顯示呢 - VB.NET -

回復(fù) 1# [ol][*]Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load[*]? ???Me.Height = My.Computer.Screen.WorkingArea.Height[*]? ???Me.Width = My.Computer.Screen.WorkingArea.Width[*]? ???Me.WindowState = FormWindowState.Maximized[*]? ???Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None[*]End Sub[/ol]

vb.net中有沒(méi)有哪個(gè)控件可以自定義形狀（如圓形，多邊形）和顏色，如果有，希望你您給出代碼

記得VB6當(dāng)中有Shape控件，但是VB.net里這個(gè)控件不存在了。

提個(gè)思路：使用Picture控件或Label控件，通過(guò)代碼在控件里繪圖想要的圖形，可以試試。

vb.net中,如何實(shí)現(xiàn)鼠標(biāo)在listbox控件上移動(dòng)時(shí),鼠標(biāo)所到的條目背景變黑、字變白；移開(kāi)后還原?

復(fù)雜的不會(huì)，來(lái)點(diǎn)兒簡(jiǎn)單的，借用在listbox里按下鼠標(biāo)時(shí)再移動(dòng)，會(huì)高亮顯示選擇行，并且會(huì)隨鼠標(biāo)移動(dòng)而變化的這一特點(diǎn)改進(jìn)的，不足之處是在listbox里，此時(shí)處于鼠標(biāo)左鍵在按下?tīng)顟B(tài)。

Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

Public Const MOUSEEVENTF_LEFTDOWN = H2 '模擬鼠標(biāo)左鍵按下

Private Sub ListBox1_MouseMove(sender As Object, e As MouseEventArgs) Handles ListBox1.MouseMove

mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0)

End Sub

本文名稱：關(guān)于vb.net滿天星的信息
本文網(wǎng)址：http://chinadenli.net/article4/dodesie.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站排名、搜索引擎優(yōu)化、商城網(wǎng)站、移動(dòng)網(wǎng)站建設(shè)、服務(wù)器托管、小程序開(kāi)發(fā)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)