打印本文 打印本文 关闭窗口 关闭窗口
走近VB.Net(四) 关于数据类型与示例
作者:武汉SEO闵涛  文章来源:敏韬网  点击数2777  更新时间:2009/4/23 19:01:11  文章录入:mintao  责任编辑:mintao

 

 

 

走近VB。Net(四) 关于数据类型与示例

在前面几章谈得最多的是Variant(vb6)到Object(vb.net)的转换,Object被称为通用的数据类型。另外是32位的long(vb6)被integer(vb.net)所取代,在vb.net中long储存64位的带符号整数。而short存储16位的数字取代vb6的integer的位置。而我们在下面要谈的是Decimal数据类型。

在初学vb6的时候,可能所有的人都做过同一个入门程序“计算器”,你可能看到在计算大一点的数字的时候,结果以指数形式出现,如:xxxxE+yyyy。这往往会让使用这个计算器的人莫名其妙,有些人甚至不理解是什么意思。有一些经验的可能会使用format使他用实际的数字出现,可是问题又有了,formatr的小数位是固定的,如果你定为5位小数,那么只有一位小数,他也会在后面出现4个零。当然你很快会用字符处理的方法清除后面的零,这对于你轻而易举。可是你会发现他的计算结果被限定于一定的位,后面全部是零,而不管他实际是什么,就是完全的不精确,甚至于不可靠。而VB6中提供了Currency类型,一般称为货币类型。提供精确的定点运算,不过他只有四位小数,也就是说,哪怕你实际需要的是八位,他也只能有四位。而且在超出了有限的范围时,你必须捕获这个错误,并把他安全地转换到浮点运算。

而在VB.et中为你提供了Decimal的数据类型取代原有的Currency,Decimal存储带有符号的96位整数,以及28位小数,而且他能动地支配小数的位数,当你的数字表现为很大的整数时,他会根据数据的大小减少小数位数而获取最大的准确度。也就是说,我们可以做出一个比windows自带的计算器更精确的计算器了,想到这么容易,应该可以坚定你继续学习VB.Net的信心。

新建一个工程,添加一个welcome窗体

一定要弄一幅很cool的图片作welcome的背景图片
   
添加timer1控件

在工程管理窗口右键点击工程名,点击最后一项属性,设置startup object welcome

form1中添加textbox1在上,textbox2在下,button1在两者中间,text=+.button2在下为“=”。Button3为“退出”

welcome的代码如下:

Option Strict Off ''''打开Option Strict以后调节透明透的数字会有麻烦,总之用这个是没办法

Imports System.Drawing

Imports System.WinForms

Imports System.ComponentModel

Public Class welcome

    Inherits System.WinForms.Form

   

    Public Sub New()

        MyBase.New()

        welcome = Me

        ''''This call is required by the Win Form Designer.

        InitializeComponent()

        Me.BorderStyle = WinForms.FormBorderStyle.None ''''不要标题栏

        Me.Height = Me.BackgroundImage.Height ''''设置窗体高度等于图片高度

        Me.Width = Me.BackgroundImage.Width  ''''设置窗体宽度等于图片宽度

        timer1.Enabled = True ''''启动定时器

        timer1.Interval = 1 : Me.Opacity = 0 ''''让窗体 全透明

        ''''TODO: Add any initialization after the InitializeComponent() call

    End Sub

    ''''Form overrides dispose to clean up the component list.

    Public Overrides Sub Dispose()

        MyBase.Dispose()

        components.Dispose()

    End Sub

   

#Region " Windows Form Designer generated code "

    ''''Required by the Windows Form Designer

    Private components As System.ComponentModel.Container

   

    Private WithEvents Timer1 As System.WinForms.Timer

   

    Dim WithEvents welcome As System.WinForms.Form

   

    ''''NOTE: The following procedure is required by the Windows Form Designer

    ''''It can be modified using the Windows Form Designer. 

    ''''Do not modify it using the code editor.

[1] [2] [3] [4]  下一页

打印本文 打印本文 关闭窗口 关闭窗口