9. 按照表01所示调整窗体中各组件属性的数值:
| 组件类型 | 组件名称 | 属性 | 设置结果 |
| Form | Form1 | Text | 测试Web Service |
| Form1 | MaximizeBox | False | |
| Form1 | FormBorderStyle | FixedSingle | |
| Button | Button1 | Text | 绑定 |
| Button1 | FlatStyle | Flat | |
| Button2 | Text | 修改 | |
| Button2 | FlatStyle | Flat |
在调整完组件属性值后,再按照图04所示调整组件的位置和排列顺序:

图04:【TestWebService】项目中组件排列位置和顺序
Private Sub Button1_Click ( ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles Button1.Click
Dim MyService As New localhost.Service1 ( )
DataGrid1.DataSource = MyService.Binding ( )
DataGrid1.DataMember = "Cust"
End Sub
Private Sub Button2_Click ( ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles Button2.Click
Dim MyService As New localhost.Service1 ( )
Dim ds As DataSet = DataGrid1.DataSource
Dim dsChanges As DataSet = ds.GetChanges ( )
If Not ( dsChanges Is Nothing ) Then
ds.Merge ( MyService.Update ( dsChanges ) , True )
End If
End Sub

图05:【TestWebService】的运行界面
