vb.net数值转换 vb数据转换

VB.NET 数值怎么转换为字体

可以使用GetItemText

方法vb.net数值转换：返回指定项vb.net数值转换的文本表示形式。使用形式如下vb.net数值转换：

GetItemText(item)

相关问答

Q1: vb.net 如何把大写金额转换成阿拉伯数字金额？

Private Sub Text2_Change() '大写金额转换成阿拉伯数字金额

Dim i As Integer

Dim j As Integer

Dim myint As Integer

Dim myint1 As Integer

Dim mydoub As Double

Dim mystr As String

Dim mystr1 As String

Dim mystr2 As String

Dim mystr3 As String

Dim mystr4 As String

Dim money As Long

Dim money1 As Integer

Dim money2 As Long

mystr = Text2.Text

myint = InStr(mystr, ".")

If myint = 0 Then

mystr = Text2.Text

Else

mystr3 = Right(Text2.Text, Len(Text2.Text) - myint)

If mystr3 "" Then '转换小数位

mystr4 = Left(mystr3, 1)

mystr3 = Right(mystr3, Len(mystr3) - 1)

If mystr4 "0" Then

mystr2 = mystr2 + setdata(Val(mystr4)) + "角"

End If

If mystr3 "" Then

mystr4 = Left(mystr3, 1)

mystr2 = mystr2 + setdata(Val(mystr4)) + "分"

End If

End If

mystr = Left(Text2.Text, myint - 1)

End If

j = Len(mystr)

For i = 1 To Len(mystr) '转换整数位

money2 = Left(mystr, i)

money1 = Right(money2, 1)

If money1 = 0 Then

If j = 5 Then

If Right(mystr1, 1) "万" Then mystr1 = mystr1 "万"

Else

If Right(mystr1, 1) "零" And Right(money, j) 0 Then mystr1 = mystr1 "零"

End If

Else

mystr1 = mystr1 setdata(money1) + chang(j)

End If

j = j - 1

Next i

Text1.Text = mystr1 "元" mystr2 '显示大写

End Sub

Q2: 用VB.NET将二进制数转换为十进制数

.NET 程序写成你这样也算厉害了，好好看看下面的代码

Sub Main()

Console.WriteLine("请输入一个二进制数")

Console.WriteLine(bin2int(Console.ReadLine()))

Console.ReadKey()

End Sub

Function bin2int(ByVal bin As String) As Integer

Dim i As Long

For i = 1 To bin.Length

bin2int = bin2int * 2 + Val(Mid(bin, i, 1))

Next i

End Function

Q3: 谁知道vb.net如何进行数据类型的转换啊？是否和c#一样啊

返回表达式显式地转换为指定数据类型、对象、结构、类或接口后的结果。

CType(expression, typename)各部分说明expression任何有效的表达式。如果 expression 的值超出了 typename 所允许的范围，将会出现错误。

typename任何在 Dim 语句的 AS 子句内合法的表达式，即任何数据类型、对象、结构、类或接口的名称。

备注CType 采用内联方式编译，即转换代码是计算表达式的代码的一部分。因为不需要调用完成转换的过程，因此执行速度更快。

示例本示例使用 CType 函数将表达式转换为指定的数据类型。

Q4: VB.NET的数据类型转换方式主要有哪几种？

CType 函数

任何数据类型

必须在两种数据类型之间定义扩大转换或收缩转换

引发 InvalidCastException

DirectCast

任何数据类型

一个类型必须继承自或者实现另一个类型

引发 InvalidCastException

TryCast

仅引用类型

一个类型必须继承或者实现另一个类型

返回 Nothing (Visual Basic)

Q5: VB.NET的OPC读取西门子PLC数值转换

12601, 转换成16进制是3139，16进制 ASC吗31对应字符1， 39对应9。 后面的用这个思路去转换就对上了。

0001 2569这两个应该是和格式相关的字符。0001一般就是开始的意思。

一个变量包含两个字符，转换算法如下。

1。 取高位字符，除以H100， H是VB中16进制表示法。 除以H100效果是右移8位。 位了保险起见，再和H00FF做与运算，保证取得的ASC码是合法的。

2。取低位字符，与H00FF做与运算，去掉高位数据，剩下的就是低位ASC码。

3。将ASC码转换为字符，用CHR函数即可，然后连接所有的字符即可得String

关于vb.net数值转换和vb数据转换的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。