vb點虐 網絡通訊編程 vbnet opc通訊

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

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

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

用vb點虐 實現網絡通信

用 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編程

不是阿.你的東西完全可以實現那.

我給你寫了個

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設置interval 1000 就是1秒

然后就可以啦.

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

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

這是個屬性沒有什么不能設置的.

再給你點參考關于

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

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

全部顯示

獲取或設置窗體的不透明度級別。

[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 提供的透明度不同，后者只能使窗體及其控件完全透明，條件是當窗體及其控件與 TransparencyKey 屬性中指定的值所表示的顏色相同。當將此屬性設置為小于 100% (1.00) 的值時，將使整個窗體（包括邊框）更透明。將此屬性設置為值 0% (0.00) 時，將使該窗體完全不可見?？梢允褂么藢傩蕴峁┎煌墑e的透明度，或者提供如窗體逐漸進入或退出視野這樣的效果。例如，可以通過將 Opacity 屬性設置為值 0% (0.00)，并逐漸增加該值直到它到達 100% (1.00)，來使某窗體逐漸進入視野。

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

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

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

怎樣用VB.NET進行網絡編程？

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

網站標題：vb點虐 網絡通訊編程 vbnet opc通訊
鏈接地址：http://muchs.cn/article16/ddighgg.html

成都網站建設公司_創(chuàng)新互聯，為您提供定制開發(fā)、網站導航、品牌網站制作、品牌網站建設、網站策劃、網頁設計公司

廣告

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