文本框的内容都是字符串。假设Text1保存10进制数,Text2保存16进制数。进制转换一种简便的方法是利用VB的转换函数进行自动转换:Text2.Text = "&H" & Hex(Text1.Text)'转换成16进制。添加 "&H" 便于下面的转换Text1.Text = Format(Val(Text2.Text))'转换成10进制当然也可以自己写过程进行转换,逐个数字分析,利用公式进行转换,有兴趣可以查查相关的资料