1、在Text1中输入一个十进制数，将其转换为Text2规定的N进制数，并在Text3中输出。

Private Sub Command1_Click() Dim T1 As Integer '文本框1的数字 Dim T2 As Integer '文本框2的数字 Dim Tm As Integer '临时数字 Dim T3 As String '返回进制值 Dim T4 As String '进制表示字符串 T1 = Int(Text1.Text) T2 = Int(Text2.Text)