vf6.0十进制数转换为二进制数

1、1新建表单，添加文本框控件和命令按钮控件，如图所示

2、2命令按钮的Click事件，如图所示

3、3设置两个变量，a1的值将文本框1中的字符串转换成数字，a2的值是空如图所示

4、4设置一个循环，将文本框Text1中输入的十进制数转换为二进制数，如图所示

5、5在文本框Text2中显示该二进制数

6、6运行表单，效果如图所示