用VB.NET編程有什么好處?

vb點虐 是基于.NET框架的完全對向?qū)ο蟮木幊陶Z言，而vb 6.0只是半面向?qū)ο蟮恼Z言，使用vb點虐 可以編制出功能更加強大的windows程序。現(xiàn)在，我們把vb點虐 和vb 6.0做一下比較，看看vb點虐 對比vb 6.0有著什么樣的特性和優(yōu)點。 1.在vb 6.0中，創(chuàng)建對象的時候，需要等這個對象創(chuàng)建完畢后，再另外調(diào)用一個獨立的方法對其進行初始化。在vb點虐 中， 可以利用構(gòu)造函數(shù)為對象賦初值，這樣就不需要進行煩瑣的調(diào)用賦初值了。構(gòu)造函數(shù)的使用，簡化了編碼的過程和出錯的機會。 2.vb點虐 編寫線程的能力比vb 6.0有很大的增強。 3.在vb 6.0中，需要首先聲明一個變量，然后才能對其賦值，這樣就需要寫兩行代碼。在vb點虐 中，可以 使用初始化函數(shù)將這兩個步驟合并在一行代碼中完成，這個似乎微小的改進，提供了更少、更簡單、更易于維護的代碼。 4.vb點虐 基于.NET框架，開發(fā)者可以快速的可視化開發(fā)網(wǎng)絡(luò)應(yīng)用程序、網(wǎng)絡(luò)服務(wù)、Windows應(yīng)用程序和服務(wù)器端組件。 5.因為vb點虐 是基于.NET框架的，可以與其它.NET語言協(xié)同工作。 6.在vb點虐 中，通過Web窗體及ADO.NET，開發(fā)者可以快速開發(fā)可擴展的Web站點。 如果你能進一步學(xué)習(xí)vb點虐 ,你會發(fā)現(xiàn)更多的新特性和優(yōu)點。

創(chuàng)新互聯(lián)服務(wù)項目包括尼勒克網(wǎng)站建設(shè)、尼勒克網(wǎng)站制作、尼勒克網(wǎng)頁制作以及尼勒克網(wǎng)絡(luò)營銷策劃等。多年來，我們專注于互聯(lián)網(wǎng)行業(yè)，利用自身積累的技術(shù)優(yōu)勢、行業(yè)經(jīng)驗、深度合作伙伴關(guān)系等，向廣大中小型企業(yè)、政府機構(gòu)等提供互聯(lián)網(wǎng)行業(yè)的解決方案，尼勒克網(wǎng)站推廣取得了明顯的社會效益與經(jīng)濟效益。目前，我們服務(wù)的客戶以成都為中心已經(jīng)輻射到尼勒克省份的部分城市，未來相信會繼續(xù)擴大服務(wù)區(qū)域并繼續(xù)獲得客戶的支持與信任！

用vb點虐 實現(xiàn)網(wǎng)絡(luò)通信

用 vb點虐 socket通信

Dim th As Threading.Thread

2 Dim tcpl As System.Net.Sockets.TcpListener

3

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

5 th = New System.Threading.Thread(New System.Threading.ThreadStart(AddressOf MyListen))

6 th.Start()

7 End Sub

8

9 Public Sub SendMessage()Sub SendMessage(ByVal IP As String, ByVal SendMsg As String)

10 Try

11 If IP "" Then

12 Dim tcpc As New System.Net.Sockets.TcpClient(IP, 5656)

13 Dim tcpStream As Net.Sockets.NetworkStream = tcpc.GetStream

14 Dim reqStream As New IO.StreamWriter(tcpStream)

15 reqStream.Write(SendMsg)

16 reqStream.Flush()

17 tcpStream.Close()

18 tcpc.Close()

19 End If

20 Catch ex As Exception

21 MsgBox(ex.Message.ToString)

22 End Try

23 End Sub

24 Private Sub MyListen()Sub MyListen()

25 Try

26 Dim ipAddress As System.Net.IPAddress = System.Net.Dns.Resolve(System.Net.Dns.GetHostName).AddressList(0)

27 tcpl = New System.Net.Sockets.TcpListener(ipAddress, 5656)

28 tcpl.Start()

29 While True

30 Dim s As System.Net.Sockets.Socket = tcpl.AcceptSocket()

31 Dim MyBuffer(1024) As Byte

32 Dim i As Integer

33 i = s.Receive(MyBuffer)

34 If i 0 Then

35 Dim lstrRec As String

36 Dim j As Integer

37 For j = 0 To i - 1

38 TextBox1.Text += Chr(MyBuffer(j)) ","

39 Next

40 End If

41 End While

42 Catch ex As Exception

43 MsgBox(ex.Message.ToString)

44 End Try

45 End Sub

46

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

48 SendMessage("192.168.0.61", TextBox2.Text)

49 End Sub

VB.NET編程

不是阿.你的東西完全可以實現(xiàn)那.

我給你寫了個

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

Me.Opacity = 0.5

Timer1.Enabled = True

'TestEvents()

End Sub

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

Me.Opacity += 0.1

End Sub

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

Me.Opacity += 0.1

End Sub

Button1點擊可以加透明度

也可以timer控制 你timer設(shè)置interval 1000 就是1秒

然后就可以啦.

你的失誤在于你沒有啟動 timer

Timer1.Enabled = True 就可以了. 還有不要弄的太快、不然你眼睛還來不及反應(yīng)就已經(jīng)好了.

這是個屬性沒有什么不能設(shè)置的.

再給你點參考關(guān)于

===================================================

Form.Opacity 屬性 [Visual Basic]請參見

Form 類 | Form 成員 | System.Windows.Forms 命名空間 | TransparencyKey | 創(chuàng)建透明 Windows 窗體 | Form 成員（Visual J# 語法） | C++ 托管擴展編程

要求

平臺: Windows 2000, Windows XP Home Edition, Windows XP Professional, Windows Server 2003 系列

語言

C#

C++

JScript

Visual Basic

全部顯示

獲取或設(shè)置窗體的不透明度級別。

[Visual Basic]

Public Property Opacity As Double

[C#]

public double Opacity {get; set;}

[C++]

public: __property double get_Opacity();

public: __property void set_Opacity(double);

[JScript]

public function get Opacity() : double;

public function set Opacity(double);

屬性值

窗體的不透明度級別。默認值為 1.00。

備注

此屬性使您得以指定窗體及其控件的透明度級別。此屬性與 TransparencyKey 提供的透明度不同，后者只能使窗體及其控件完全透明，條件是當(dāng)窗體及其控件與 TransparencyKey 屬性中指定的值所表示的顏色相同。當(dāng)將此屬性設(shè)置為小于 100% (1.00) 的值時，將使整個窗體（包括邊框）更透明。將此屬性設(shè)置為值 0% (0.00) 時，將使該窗體完全不可見。可以使用此屬性提供不同級別的透明度，或者提供如窗體逐漸進入或退出視野這樣的效果。例如，可以通過將 Opacity 屬性設(shè)置為值 0% (0.00)，并逐漸增加該值直到它到達 100% (1.00)，來使某窗體逐漸進入視野。

Windows 2000, Windows Server 2003 系列平臺說明: 此屬性在無法顯示分層窗口的平臺上不起作用。

=======================================================

餓的神阿、不給我加分就太不厚道列.

怎樣用VB.NET進行網(wǎng)絡(luò)編程？

都可以,可以用winsock,也可以自己重寫SOCKET套接字.建議你如果工期緊,可以先用WINSOCK.當(dāng)然最好是自己學(xué)用SOCKET套接字.這對未來開發(fā)網(wǎng)絡(luò)通訊是很有幫助的.因為用WINSOCK有個毛病就是殺毒軟件總會阻止