递归算法实例：十进制转换N进制（vb.net代码）

最新推荐文章于 2024-01-01 00:30:00 发布

清风不拂面

最新推荐文章于 2024-01-01 00:30:00 发布

阅读量540

点赞数

分类专栏： vb.net 源代码

本文链接：https://blog.csdn.net/kguncn/article/details/109010600

版权

这篇博客探讨了如何使用递归算法在VB.NET中将十进制数转换为任意进制。尽管VB.NET内建了进制转换功能，但作者专注于递归方法的实现，并且还涉及了循环算法的运用。

摘要由CSDN通过智能技术生成

vb.net自带进制算法，但我们这里要学习的是递归算法啊！代码中还有循环算法及vb.net自带进制算法

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        txtN.Text = "2"
    End Sub

    Private Sub btnConvto_Click(sender As Object, e As EventArgs) Handles btnConvto.Click
        If IsNumeric(txtSource.Text) AndAlso IsNumeric(txtN.Text) Then
            Try
                Dim intSource As Integer = CInt(txtSource.Text) '十进程要转换的数值
                Dim intN As Integer = CInt(txtN.Text) 'N进制数值
                If intN > 1 AndAlso intN <=