在VB.NET中拆分'Decimal'

在VB.NET中，拆分Decimal类型的数值可以通过以下步骤实现：

将Decimal类型转换为String类型。
使用String类型的Split方法，以小数点（.）为分隔符，将数值拆分为整数部分和小数部分。
将整数部分和小数部分转换回Decimal类型。

以下是一个示例代码：

Dim originalValue As Decimal = 12345.6789D
Dim valueString As String = originalValue.ToString()
Dim parts() As String = valueString.Split(".")

Dim integerPart As Decimal = Decimal.Parse(parts(0))
Dim fractionalPart As Decimal = Decimal.Parse("0." & parts(1))

MsgBox("整数部分：" & integerPart)
MsgBox("小数部分：" & fractionalPart)

在这个示例中，我们将Decimal类型的数值12345.6789转换为String类型的"12345.6789"，然后使用Split方法将其拆分为整数部分"12345"和小数部分"0.6789"。最后，我们将整数部分和小数部分转换回Decimal类型，并将它们分别输出到消息框中。