转至繁体中文版     | 网站首页 | 图文教程 | 资源下载 | 站长博客 | 图片素材 | 武汉seo | 武汉网站优化 | 
最新公告:     敏韬网|教学资源学习资料永久免费分享站!  [mintao  2008年9月2日]        
您现在的位置: 学习笔记 >> 图文教程 >> 软件开发 >> VB.NET程序 >> 正文
走近VB.Net(四) 关于数据类型与示例         ★★★★

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

作者:闵涛 文章来源:闵涛的学习笔记 点击数:2777 更新时间:2009/4/23 19:01:11

 

 

 

走近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]  下一页


[VB.NET程序]教你编写网络通讯程序源代码之“端口扫描器”VB篇…  [其他]SYBASE数据库迁移到AS400db2的FAQ(四)
[Sql Server]iBATIS SQL Maps(四)  
教程录入:mintao    责任编辑:mintao 
  • 上一篇教程:

  • 下一篇教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    同类栏目
    · C语言系列  · VB.NET程序
    · JAVA开发  · Delphi程序
    · 脚本语言
    更多内容
    热门推荐 更多内容
  • 没有教程
  • 赞助链接
    更多内容
    闵涛博文 更多关于武汉SEO的内容
    500 - 内部服务器错误。

    500 - 内部服务器错误。

    您查找的资源存在问题,因而无法显示。

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved.
    闵涛 投放广告、内容合作请Q我! E_mail:admin@mintao.net(欢迎提供学习资源)

    站长:MinTao ICP备案号:鄂ICP备11006601号-18

    闵涛站盟:医药大全-武穴网A打造BCD……
    咸宁网络警察报警平台