版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。

1、数值转为字符串类型

实际使用的时候，只需要在变量后面加上方法 ToString()即可，甚至有时候不用加ToString()也可以。

例如：

        Dim aa As Integer = 12

        Dim ss As String = aa.ToString

 

       ’ss="12"

 

 

 

2、字符串类型转为数值

以下以字符串转为整型为例，先介绍四种方法：

 

 

 

    Sub Main()

        Dim a, b, c, d As Integer

        Dim s As String

 

        Console.WriteLine("请输入第1个数字：")

        s = Console.ReadLine()

        a = Integer.Parse(s)

        Console.WriteLine("第1个数字：" & a)

 

        Console.WriteLine("请输入第2个数字：")

        s = Console.ReadLine()

        b = CInt(s)

        Console.WriteLine("第2个数字：" & b)

 

        Console.WriteLine("请输入第3个数字：")

        s = Console.ReadLine()

        c = CType(s, Integer)

        Console.WriteLine("第3个数字：" & c)

 

        Console.WriteLine("请输入第4个数字：")

        s = Console.ReadLine()

        d = Convert.ToInt32(s)

        Console.WriteLine("第4个数字：" & d)

 

        Dim sum As Integer

        sum = a + b + c + d

        Console.WriteLine("总和：" & sum)

 

        Console.ReadKey()

    End Sub

 

 

主要的代码是：

 

a = Integer.Parse(s)

 

b = CInt(s)

 

c = CType(s, Integer)

 

d = Convert.ToInt32(s)

 

大家还可以试一下

 

运行时如下：

 

 

 

 

 

由于输入的时候可能输入的不是整数，被误输入了字母等，那么就会引发错误：

 

 

 

 

 

为了避免错误，我们可以采用 Integer.TryParse() 方法，如果不能转为整数，那么该方法返回False，

 

代码如下：

 

    Sub Main()

        Dim a As Integer

        Dim s As String

 

        Console.WriteLine("请输入1个整数：")

        s = Console.ReadLine()

        Do While (Integer.TryParse(s, a) = False)

            Console.WriteLine("输入的不是整数，请重新输入：")

            s = Console.ReadLine()

        Loop

        Console.WriteLine("输入的数字是：" & a)

        Console.ReadKey()

    End Sub

代码内提前使用了 Do While...Loop 循环语句，现在大家只需要知道Do While 后面接的语句只要为True 就会一直循环。

 

运行时如下：

 

 

 

 

 

另外还要特别介绍的一个方法：

 

 

 

    Sub Main（）

        Dim a As Integer

        Dim s As String

 

        Console.WriteLine("请输入1个整数：")

        s = Console.ReadLine()

        a = Val(s)

        Console.WriteLine("输入的数字是：" & a)

        Console.ReadKey()

    End Sub

val()方法输出字符串最前面的数字，例如：

输入： 1a     输出：1

 

输入： 1a1   输出：1

 

输入： a1     输出： 0

 

 

 

 

 

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供的参考。

 

学习更多vb.net知识，请参看 vb.net 教程 目录

 

 

 

 

VB.Net

关注

 

7

 

5

 

3

 

 

专栏目录

VB中各种数据类型转换函数

10-03

VB中各种数据类型转换函数 HEX STRING

VB.NET 入门经典 （第三版）

07-29

Visual Basic .NET提供了大量的工具和语言方面的功能。当然，不可能用一本书包含Visual Basic .NET的所有内容，这些内容要用一个书库来容纳。本书的目的是让您尽快入门，它相当于一个路标，可以指导您的学习。在介绍完创建应用程序的基础知识后(如创建窗口和对话框，如何用代码处理突发事件，什么是面向对象的程序设计，以及如何在应用程序中使用它等)。 目录: 第1章 初识Visual Basic .NET 1 1.1 Windows和DOS编程 1 1.2 安装Visual Basic .NET 3 1.3 Visual Basic .NET集成开发环境 7 1.3.1 配置文件设置页 7 1.3.2 Projects选项卡 7 1.3.3 菜单 8 1.3.4 工具栏 9 1.4 创建简单的应用程序 10 1.4.1 Visual Studio .NET集成开发环境中的窗口 12 1.4.2 工具箱 14 1.4.3 改进型匈牙利表示法 17 1.4.4 代码编辑器 18 1.5 使用帮助系统 21 1.6 小结 23 1.7 练习 23 第2章 Microsoft .NET Framework 24 2.1 Microsoft的信心来自于Windows 24 2.1.1 MSN 1.0 25 2.1.2 .NET理念 25 2.1.3 .NET与Java有些类似 26 2.1.4 现在所处的阶段 27 2.2 为Windows编写软件 27 2.2.1 .NET Framework类 28 2.2.2 执行代码 29 2.3 公共语言运行库 30 2.3.1 载入并执行代码 31 2.3.2 应用程序隔离 31 2.3.3 安全性 31 2.3.4 互操作 32 2.3.5 异常处理 32 2.4 通用类型系统和公共语言规范 32 2.5 小结 33 2.6 练习 33 第3章 编写软件 34 3.1 信息和数据 34 3.1.1 算法 34 3.1.2 编程语言 35 3.2 变量 36 3.3 注释和空白 38 3.3.1 注释 38 3.3.2 空白 39 3.4 数据类型 39 3.4.1 使用数字 39 3.4.2 使用字符串 45 3.4.3 使用日期 52 3.4.4 布尔型 58 3.5 存储变量 58 3.5.1 二进制 59 3.5.2 位和字节 59 3.5.3 值的表示 60 3.5.4 值的转换 61 3.6 方法 63 3.6.1 使用方法的原因 63 3.6.2 创建方法 67 3.6.3 选择方法名称 69 3.6.4 作用域 70 3.7 小结 72 3.8 练习 72 第4章 流程控制 73 4.1 做出决策 73 4.2 If语句 73 4.2.1 Else语句 75 4.2.2 可进行多重选择的ElseIf语句 76 4.2.3 嵌套的If语句 77 4.2.4 单行If语句 78 4.2.5 比较运算符 78 4.2.6 字符串比较 86 4.3 Select Case语句 87 4.3.1 使用Select Case语句 88 4.3.2 不区分大小写的Select Case语句 91 4.3.3 多重选择 93 4.3.4 Case Else语句 95 4.3.5 Select Case中的不同数据类型 96 4.4 循环 96 4.4.1 For…Next 循环 96 4.4.2 For Each…Next循环 100 4.4.3 Do…Loop循环 101 4.4.4 嵌套循环 107 4.4.5 提前退出循环 108 4.4.6 死循环 110 4.5 小结 111 4.6 练习 111 第5章 处理数据结构 112 5.1 数组 112 5.1.1 定义和使用数组 112 5.1.2 用值初始化数组 120 5.2 枚举 121 5.2.1 使用枚举 121 5.2.2 确定状态 124 5.2.3 设置无效值 127 5.3 常量 127 5.3.1 使用常量 128 5.3.2 改变常量 129 5.3.3 各种常量类型 130 5.4 结构 130 5.4.1 创建结构 130 5.4.2 为结构添加属性 133 5.5 集合和列表 133 5.5.1 使用数组列表 134 5.5.2 从数组列表中进行删除操作 137 5.5.3 显示数组列表中的项 140 5.5.4 集合 141 5.6 用散列表创建查询表 144 5.6.1 使用散列表 145 5.6.2 Remove. RemoveAt和Clear方法 148 5.6.3 区分大小写 150 5.7 高级数组操作 152 5.8 小结 154 5.9 练习 155 第6章 构建Windo

 

 

 

wuganxiu:老师您好，请教一个问题，我用的是VS2010版软件，定义一个64位的类型数据，Dim position2 As Int64 position2 = 1742 * 1024 * 1204，提示position2运算溢出，position2只能承载32位的数据，不能承载大于32的数据，可是我定义的是64位的数据类型，什么原因，我电脑是win7 64位的2 年前回复

 

 

VB.Net回复: Dim pos As Int64 'Dim a, b, c As Int32 'a = 1742 'b = 1024 'c = 1024 'pos = a * b * c pos = CLng(1742) * 1024 * 12042 年前回复

 

1

 

zyjq52uys:你好！又来麻烦你。Integer.TryParse(s, a) = False，像这个类型转换可以返回2个值，一个是真假，一个是把字符串s转换成数字a。写自定义函数可不可以像这样返回多个值？我查网上C#可用out关键字来设置参数，但VB.NET没有out关键字。3 年前回复

 

 

VB.Net回复:这里评论显示的代码有问题，请参看https://blog.csdn.net/UruseiBest/article/details/848981033 年前回复

 

 

VB.Net回复:使用byref传址方式。例如：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim a As String

        Dim b As Integer

        a = TextBox1.Text

        If parsenumber(a, b) = True Then

            MessageBox.Show("转换成功：" & b.ToString)

        Else

            MessageBox.Show("不可转换")

        End If

    End Sub

 

    Private Function parsenumber(ByVal intStr As String, ByRef toInt As Integer) As Boolean

        Try

            toInt = Integer.Parse(intStr)

            Return True

        Catch ex As Exception

            toInt = 0

            Return False

        End Try

    End Function

3 年前回复

 

 

————————————————

版权声明：本文为CSDN博主「VB.Net」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。

原文链接：https://blog.csdn.net/uruseibest/article/details/62454202