vb.netweb开发 vbnet web编程( 四 )


图 :【TestWebService】的运行界面
Form vb的代码清单如下:
Public Class Form Inherits System Windows Forms Form#Region Windows 窗体设计器生成的代码 Public Sub New ( ) MyBase New ( )该调用是 Windows 窗体设计器所必需的InitializeComponent ( )在 InitializeComponent ( ) 调用之后添加任何初始化End Sub 窗体重写处置以清理组件列表 Protected Overloads Overrides Sub Dispose ( ByVal disposing As Boolean ) If disposing ThenIf Not ( ponents Is Nothing ) Then ponents Dispose ( )End If End If MyBase Dispose ( disposing )End Sub Windows 窗体设计器所必需的Private ponents As System ComponentModel IContainer注意 以下过程是 Windows 窗体设计器所必需的可以使用 Windows 窗体设计器修改此过程不要使用代码编辑器修改它Friend WithEvents Button As System Windows Forms Button Friend WithEvents Button As System Windows Forms Button Friend WithEvents DataGrid As System Windows Forms DataGrid System Diagnostics DebuggerStepThrough ( )Private Sub InitializeComponent ( ) Me Button = New System Windows Forms Button ( ) Me Button = New System Windows Forms Button ( ) Me DataGrid = New System Windows Forms DataGrid ( ) CType ( Me DataGrid System ComponentModel ISupportInitialize ) BeginInit ( ) Me SuspendLayout ( ) Me Button FlatStyle = System Windows Forms FlatStyle Flat Me Button Location = New System Drawing Point ( ) Me Button Name = ButtonMe Button Size = New System Drawing Size ( ) Me Button TabIndex =Me Button Text = 绑定Me Button FlatStyle = System Windows Forms FlatStyle Flat Me Button Location = New System Drawing Point ( ) Me Button Name = ButtonMe Button Size = New System Drawing Size ( ) Me Button TabIndex =Me Button Text = 修改Me DataGrid DataMember =Me DataGrid Dock = System Windows Forms DockStyle Top Me DataGrid HeaderForeColor = System Drawing SystemColors ControlText Me DataGrid Name = DataGridMe DataGrid Size = New System Drawing Size ( ) Me DataGrid TabIndex =Me AutoScaleBaseSize = New System Drawing Size ( ) Me ClientSize = New System Drawing Size ( ) Me Controls AddRange ( New System Windows Forms Control ( ) {Me DataGrid Me Button Me Button } ) Me Name = FormMe Text = 测试Web ServiceCType ( Me DataGrid System ComponentModel ISupportInitialize ) EndInit ( ) Me ResumeLayout ( False )End Sub#End RegionPrivate Sub Button _Click ( ByVal sender As System Object ByVal e As System EventArgs ) Handles Button Click Dim MyService As New localhost Service ( ) DataGrid DataSource = MyService Binding ( ) DataGrid DataMember = Cust End SubPrivate Sub Button _Click ( ByVal sender As System Object ByVal e As System EventArgs ) Handles Button Click Dim MyService As New localhost Service ( ) Dim ds As DataSet = DataGrid DataSource Dim dsChanges As DataSet = ds GetChanges ( ) If Not ( dsChanges Is Nothing ) Thends Merge ( MyService Update ( dsChanges ) True ) End IfEnd SubEnd Class
六 总结
lishixinzhi/Article/program/net/201311/11839
vb和vb.net的区别和特点VB.NET不单单是web应用程序 , 还有windows窗口程序、智能设备程序
能代替vb,vb.net相当于是基于 。net framework,vb的升级版本
能编译exe , 这是基本功能 。VB.NET在C/S架构和B/S架构上都表现出色 。需要运行VB.NET,主要考虑的是.NET framework的版本,需要和你发布的应用程序版本保持一致
vb.net的优点是什么?VB.NET是基于.NET框架的完全对向对象的编程语言vb.netweb开发,而vb 6.0只是半面向对象的语言vb.netweb开发,使用vb.net可以编制出功能更加强大的windows程序 。现在,vb.netweb开发我们把vb.net和vb 6.0做一下比较,看看vb.net对比vb 6.0有着什么样的特性和优点 。1.在vb 6.0中 , 创建对象的时候,需要等这个对象创建完毕后,再另外调用一个独立的方法对其进行初始化 。在vb.net中 ,  可以利用构造函数为对象赋初值,这样就不需要进行烦琐的调用赋初值vb.netweb开发了 。构造函数的使用,简化了编码的过程和出错的机会 。2.vb.net编写线程的能力比vb 6.0有很大的增强 。3.在vb 6.0中,需要首先声明一个变量,然后才能对其赋值 , 这样就需要写两行代码 。在vb.net中,可以 使用初始化函数将这两个步骤合并在一行代码中完成,这个似乎微小的改进,提供了更少、更简单、更易于维护的代码 。4.vb.net基于.NET框架,开发者可以快速的可视化开发网络应用程序、网络服务、Windows应用程序和服务器端组件 。5.因为vb.net是基于.NET框架的,可以与其它.NET语言协同工作 。6.在vb.net中,通过Web窗体及ADO.NET , 开发者可以快速开发可扩展的Web站点 。如果你能进一步学习vb.net,你会发现更多的新特性和优点

推荐阅读