扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条
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=",x) 注释:显示变量x
Console.WriteLine("s=",s) 注释:显示变量s
Console.WriteLine("s1=, s2=",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=",x); //显示变量x
Console.WriteLine("s=",s); //显示变量s
Console.WriteLine("s1=, s2=",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()=",m,q) 注释:显示结果
End Sub
Sub Main()
input
CalcSqrt(m)
End Sub
End Module
如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。
现场直击|2021世界人工智能大会
直击5G创新地带,就在2021MWC上海
5G已至 转型当时——服务提供商如何把握转型的绝佳时机
寻找自己的Flag
华为开发者大会2020(Cloud)- 科技行者