分享
 
 
 

C# vs VB7之语法与编程

王朝vb·作者佚名  2006-01-08
窄屏简体版  字體: |||超大  

C#与VB7是微软.NET的主要编程工具。本文通过实例比较C#语言与VB7语言及其程序设计,每个程序都先用VB7语言写出,再用C#语言改写,从中看出现在的VB7实际就是C#,而将(不同语言的)编程统一到.NET类函数库就是微软.NET的精髓。

一、变量声明

C#与VB7的变量基本上是一致的。与VB6不同,VB7在声明变量的同时可赋初值,不再用Dim x这种没有确定类型的声明,VB7的整型(Integer)变量是4字节(32位整数,-2147483648--2147483647),长整型(Long)是8字节(64位整数,-9,223,372,036,854,775,808--9,223,372,036,854,775,807)。

C#

VB7

int x;

long y

String s;

String s1, s2;

Object o;

Object obj = new Object();

public String name;

Dim x As Integer

Dim y As Long

Dim s As String

Dim s1, s2 As String

Dim obj As New Object()

Public name As String

下面的VB7与C#程序编译后运行结果相同:

x=99999999

s= VB7程序设计100例

s1= VB7 Programming , s2 ="VB7程序设计

VB7的例程(01_vb.vb):

Imports System

Public Module LY

Public name As String

Sub Main()

Dim x As Integer = 99999999

Dim s As String = "VB7程序设计100例"

Dim s1, s2 As String

'一切变量声明都要有As,不许可如:Dim o 的声明;声明变量的同时可赋初值

Dim obj As New Object()

s1 = "VB7 Programming" : s2 ="VB7程序设计"

Console.WriteLine("x={0}",x) '显示变量x

Console.WriteLine("s={0}",s) '显示变量s

Console.WriteLine("s1={0}, s2={1}",s1,s2) '显示变量s1,s2

End Sub

End Module

C#的例程(01_c#.cs)与VB7例程几乎完全相同:

using System;

class LY{

public String name;

static void Main() {

int x=99999999;

String s= "VB7程序设计100例";

String s1, s2;

Object o;

Object obj = new Object();

s1 = "VB7 Programming"; s2 ="VB7程序设计";

Console.WriteLine("x={0}",x); //显示变量x

Console.WriteLine("s={0}",s); //显示变量s

Console.WriteLine("s1={0}, s2={1}",s1,s2); //显示变量s1,s2

}

}

二、NET类函数库的调用

C#与VB7都调用同一个.NET的类函数库,因此,C#与VB7程序调用.NET类函数库的指令完全一样。

下面的例子定义了方法input()实现从键盘输入一个长整数m,方法CalcSqrt(mm As Long)计算并显示m的平方根;用到了.NET类函数库中System的控制台类Console的输入输出方法和数学计算类Math的(求平方根)方法Sqrt;此外,用了类Int64的方法FromString(cc)将数字字符串cc转为长整数。

程序运行结果(假定输入为999,注意,数学函数返回值一般是双精度的)

请键入一个正整数:

计算结果: Sqrt(999)=31.606,961,258,558,215

容易看出,这个C#与VB7程序几乎是完全一样的,写出了VB7程序,很容易就可改为C#程序;将(不同语言的)编程统一到.NET类函数库,这是微软.NET的精髓。

VB7的例程(02_vb.vb):

Imports System

Public Module LY

Dim m As Long '不区分大小写,Long可写为long, LONG或LoNg

Dim q As Double

'从键盘输入一个长整数m

Public Sub input()

Console.Write("请键入一个正整数:")

Dim cc As string=Console.ReadLine() '得到键盘输入的数字字符串

m=Int64.FromString(cc) '将这个字符串转换为64位整数m

End Sub

'计算并显示mm的平方根

Public Sub CalcSqrt(mm As Long)

q=Math.Sqrt(mm) '数学函数Sqrt在System的类Math中,返回Double,不可用Single

Console.Write("计算结果:Sqrt({0})={1}",m,q) '显示结果

End Sub

Sub Main()

input

CalcSqrt(m)

End Sub

End Module

C#的例程(02_c#.cs)与VB7例程几乎完全相同:

using System;

class LY{

static long m; //注意大小写:不可把long写为Long

static double q;

//从键盘输入一个长整数m

public static void input(){

Console.Write("请键入一个正整数:");

string cc =Console.ReadLine(); //得到键盘输入的数字字符串

m=Int64.FromString(cc); //将这个字符串转换为64位整数m

}

//计算并显示mm的平方根q

public static void CalcSqrt(long mm){

q=Math.Sqrt(mm); //数学函数Sqrt在System的类Math中,返回Double,不可用Single

Console.Write("计算结果:Sqrt({0})={1}",m,q); //显示结果

}

static void Main(){

input();

CalcSqrt(m);

}

}

三、面向对象编程

上面的例子里,定义了方法input()实现从键盘输入一个长整数m,方法CalcSqrt(mm As Long) 计算并显示m的平方根,然后在Main()方法里调用;下面将方法input()与方法CalcSqrt(mm As Long)独立出来放到一个专门的类(LY0)里,然后在类LY的Main()方法中生成实例对象使用:

程序运行结果仍然是与(二)完全相同。

在面向对象的情况下,这个C#与VB7程序也几乎是完全一样的,从这个意义上可以说:VB7就是C#,C#也就是VB7。

VB7的例程(03_vb.vb):

Imports System

Class LY0

'变量m与q现在封装到类LY0里被保护,因为另一个类LY要引用m,对m加public

Public Dim m As Long

Dim q As Double

'从键盘输入一个长整数m

Public Sub input()

Console.Write("请键入一个正整数:")

Dim cc As string=Console.ReadLine() '得到键盘输入的数字字符串

m=Int64.FromString(cc) '将这个字符串转换为64位整数m

End Sub

'计算并显示mm的平方根

Public Sub CalcSqrt(mm As Long)

q=Math.Sqrt(mm) '数学函数Sqrt在System的类Math中,返回Double,不可用Single

Console.Write("计算结果:Sqrt({0})={1}",m,q) '显示结果

End Sub

End Class

Public Module LY

Sub Main()

Dim obj As LY0 = new LY0()

obj.input

obj.CalcSqrt(obj.m)

End Sub

End Module

C#的例程(02_c#.cs)与VB7例程几乎完全相同:

using System;

class LY0{

//变量m与q现在封装到类LY0里被保护,因为另一个类LY要引用m,对m加public

public long m;

double q;

//从键盘输入一个长整数m

public void input(){

Console.Write("请键入一个正整数:");

string cc =Console.ReadLine(); //得到键盘输入的数字字符串

m=Int64.FromString(cc); //将这个字符串转换为64位整数m

}

//计算并显示mm的平方根q

public void CalcSqrt(long mm){

q=Math.Sqrt(mm); //数学函数Sqrt在System的类Math中,返回Double,不可用Single

Console.Write("计算结果:Sqrt({0})={1}",m,q); //显示结果

}

}

class LY{

static void Main(){

LY0 obj = new LY0();

obj.input();

obj.CalcSqrt(obj.m);

}

}

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有