图 :【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.net编写网页游戏辅助工具,应该学习哪一个方面的知识?2.语法,,数据类型
3.能编一些小程序..
4.类集
5.JDBC...
6.事件驱动
7.网络.
8.hibernate
9.spring
10.j2ee
编号错了..呵呵...算了不管了..
其实JAVA嘛...很简单...对一个有C基础的人来说
没C基础的人学起来也很简单....
最重要的是要有一个类与对象的概念....
class __Main_Test
{
public static void main(String[] args) throws Exception
{
//最简单的程序的结构
}
}
【vb.net基本知识的简单介绍】__Main_Test就是一个类...
而对象呢....对象就是一个类的实体..
比如说人是一个类...人说起人...你想到的是什么???
人是不是包括你我他...
而你就是一个对象....先只要知道这个就行了..
理解了类与对象...学起来会得心应手....看代码也比较轻松...
推荐阅读
- 体育竞技类游戏的推广,体育竞赛类游戏
- jquery轮播动画特效,jquery轮播图自动播放
- python爬虫如何获取数据,python爬虫获取指定内容
- 直播伴侣实景直播怎么调色,直播伴侣实景直播怎么调色的
- mysql命令行怎么出现 mysql命令行在哪里打开
- 苏宁直播可以做什么活动,苏宁在哪儿直播
- 如何实现智能营销,如何实现智能化的销售
- vb.netdll文件,vbnet ado
- linux跳转主机命令 linux跳转其他主机