编写VB程序，实现两位数a与b相乘的运算，其算法如下：

1）将被乘数a转换为二进制数；

2）将转换后的二进制数中每个数码乘以对应的权值，再乘以乘数b；

3）最后将各乘积相加，得到a与b相乘的结果。

图a显示了13与11相乘的过程：

 

在文本框Text1中依次输入被乘数与乘数（输入的字符仅限于数字字符、“*”及“/”，每两个乘数间用“/”分隔，并以“/”结尾），单击“计算”按钮Command1后，将计算结果

依次显示在文本框Text2中。程序运行界面如图b所示。