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

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

公司主營業務：成都網站建設、網站建設、移動網站開發等業務。幫助企業客戶真正實現互聯網宣傳，提高企業的競爭能力。成都創新互聯公司是一支青春激揚、勤奮敬業、活力青春激揚、勤奮敬業、活力澎湃、和諧高效的團隊。公司秉承以“開放、自由、嚴謹、自律”為核心的企業文化，感謝他們對我們的高要求，感謝他們從不同領域給我們帶來的挑戰，讓我們激情的團隊有機會用頭腦與智慧不斷的給客戶帶來驚喜。成都創新互聯公司推出廈門免費做網站回饋大家。

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

這是設置窗體的長寬和屏幕的分辨率一樣大小，相當于全屏。

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

VB.NET的特點

1.真正成為面向對象以及支持繼承性的語言。

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

3.直接建立在.NET的框架結構上，因此開發人員可以充分利用所有.NET平臺特性，也可以與其他的.NET語言交互。

4.為Windows應用程序提供了XCOPY部署，開發者不再需要為DLL的版本問題擔憂。

怎么用VB.net visual basic項目編寫天氣預報程序

Visual Basic通用報表設計小結

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

1. Data Report控件

1．1 Data Report控件使用方法

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

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

1．2 Data Report控件界面元素

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

Data report控件一共有5個區組成，分別是報表頭、頁面頭、細節區、頁面注腳和報表注腳。報表頭和報表注腳是用分別用于整個報表的最上部和最下部，它們將出現于整個報表的每一頁，可以放置一些報表名稱，時間之類的固定文本；頁面頭和頁面注腳只能出現在當前頁的最上部和最下部，也就是說它只能出現在當前頁中，不出現在其他頁面中，可以放置隨頁面變化的一些量比如頁碼等；而細節區就是用來進行實際顯示的區域，它是我們最為關心的區域，通過在此區域內放置顯示控件可以控制報表的實際顯示輸出。這里介紹一下放置文本框控件的使用方法，其實在綁定情況下只需要設置其DataMember和Datafield即可，前者用來指定數據表，可以設置為前面數據環境對象的Command對象，后者是指定數據段，即綁定的數據庫的指定字段。這樣不需要編寫任何代碼就可以實現報表的顯示工作。

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

對于報表的打印可以直接使用Data report自帶的打印功能，即可以實現簡易的報表打印。不過為了實現比較復雜的打印功能，也可以通過程序控制的方法來進行。這里只是給出一個實現思路：首先需要制作一個按鈕控件來顯示"打印設置"的窗口，通過這個窗口用戶可以設置打印的相關的參數，然后在實現打印的子模塊中使用VB內嵌的printer對象來實現真實的打印，該對象能夠對打印的當前位置進行定位，而且對打印的字體等參數進行控制，所以結合"打印設置"窗口可以實現類似于word里面的打印功能。

2．MS Excel

說起報表設計應用程序，無意微軟的Excel是一支獨秀，MS Excel就是用來進行表格和報表設計用的應用程序，它具有優秀的方格控制和宏代碼定制功能。所以如果在設計自己的應用程序的時候能夠結合到Excel的話，那么你的應用程序就應該是相當的完善了，因為無論是編輯還是打印功能，Excel都提供了很完美的解決方案，所以你的應用程序所要做的事情就是實現程序和Excel通訊即可。

事實上，可以使用VBscript可以將VB與Excel兩者連接起來。以下就簡要介紹在VB下開發基于Excel的編程思路。

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

Application---------用來指代整個應用程序。

WorkBook----------表示工作簿對象

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

Range-------------表示工作表中的某個區域范圍對象，特殊情況下也可以只代表一個Cell。

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

清楚了以上的五個對象的應用范圍，那么使用它們就很簡單了，不過在使用這些對象之前，首先需要對它們進行聲明。方法是在"工程"的"引用"對話框之下選擇"Microsoft Excel9.0 Object Library"，這樣就將整個Excel對象庫就引入到程序中來了。

下面舉一個示例，其實現的功能是打開一個工作簿。

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（水晶報表）

做為一個優秀的報表軟件，水晶報表是實際應用中最多的方案。在這一節里主要介紹一下水晶報表的定制和顯示，打印功能的實現。

首先要區分Crystal Reports插件程序和Crystal Reports控件。前者主要用來創建報表模板，后者主要是用來在程序中顯示和打印報表，這兩者的分工決定了它們程序中的功能的不同。

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

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

選擇"外接程序"菜單的"報表設計器"選項，則VB將執行Crystal Reports Pro插件應用程序。在Crystal Reports Pro里選擇"新建報表"圖標，可以選擇8標準模板和一個自定義的模板來開始報表工程。

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

3．2 Crystal Reports控件的背景知識

Crystal Reports Pro還提供一個報表生成模塊，該模塊可以連接到并訪問VB應用程序，VB程序員不需花費大量時間寫自己的代碼就可再應用程序中添加復雜的報表生成及輸出功能。

Crystal Reports引擎是一個動態鏈接庫，它可以使應用程序訪問并具有同Crystal Reports 一樣強大的報表輸出功能。應用程序是通過Crystal Reports ActiveX控件來訪問引擎。再編譯時應用程序同報表引擎鏈接，以給應用程序添加了生成報表的功能。

當程序使用Crystal Reports ActiveX控件時，可以通過再設計時設置Crystal對象屬性或者再運行時改變對象屬性，來建立應用程序和Crystal Reports之間的連接。通過Crystal控件的屬性可以指定：

響應應用程序某個事件的輸出報表的名字。

報表的目標位置（預覽窗口、磁盤文件或者電子郵件等）。

想要打印的份數（如果報表提交給打印機的話）。

輸出文件的信息。

預覽窗口的大小及位置信息（如果報表在預覽窗口中顯示時）。

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

排序信息。

其他相關的屬性。

這里要注意一點的是，Crystal控件必須在由Crystal Reports Pro創建的報表中使用，而試圖在VB應用程序里引用之前，必須首先創建報表。

3．3 Crystal Reports控件的使用

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

注意，對于Crystal Reports控件的最重要的屬性就是ReportFileName了，把它設置為前面已經在Crystal Reports Pro里定制好的報表模板的文件路徑。那么只需要調用控件的PrintReport方法就可以將報表顯示出來了。

相對于Data Report控件來說，Crystal Reports控件的功能更加的完善，報表預覽，打印，編輯修改等功能都很完善，所以在實際的報表應用設計方案中，使用Crystal Reports的相對較多。然而Crystal Reports控件也有它的局限性，即它不能在運行時創建自定義的窗口。可以使用控件的數據綁定屬性來創建數據綁定報表，但是報表本身的格式都是由Crystal Reports控件內部進行處理的。一般說來，Crystal Reports控件不提供在程序中對報表字段級的訪問。這一缺陷可以通過設計出足夠多的報表來彌補。

4.其他方法

除了通過上述的三種方法來實現報表設計以外，當然也可以直接利用Win32 API來進行直接進行設計，這種方式是最為靈活也是最為繁瑣的方式，因為所有的編輯、修改、打印等功能都是由程序控制，所以一般情況下不會使用這樣的方式來處理，這里就不介紹了。

5．小結

報表設計是程序員經常要遇到的問題，本文主要介紹目前主流的報表設計方案，由于所涉及到的知識點比較多，限于篇幅，在這里只是作了簡要的介紹，希望可以起到拋磚引玉的作用。

vb 滿天星 代碼

題目真夠簡練的。。

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　怎么樣將一個窗體設為全屏顯示呢 - VB.NET -

回復 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中有沒有哪個控件可以自定義形狀（如圓形，多邊形）和顏色，如果有，希望你您給出代碼

記得VB6當中有Shape控件，但是VB.net里這個控件不存在了。

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

vb.net中,如何實現鼠標在listbox控件上移動時,鼠標所到的條目背景變黑、字變白；移開后還原?

復雜的不會，來點兒簡單的，借用在listbox里按下鼠標時再移動，會高亮顯示選擇行，并且會隨鼠標移動而變化的這一特點改進的，不足之處是在listbox里，此時處于鼠標左鍵在按下狀態。

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 '模擬鼠標左鍵按下

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

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

End Sub

本文名稱：關于vb.net滿天星的信息
本文網址：http://www.yijiale78.com/article4/dodesie.html

成都網站建設公司_創新互聯，為您提供網站排名、搜索引擎優化、商城網站、移動網站建設、服務器托管、小程序開發

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯