你的写法是VB6中的
成都创新互联公司专注于企业全网营销推广、网站重做改版、海阳网站定制设计、自适应品牌网站建设、H5技术、商城建设、集团公司官网建设、成都外贸网站建设、高端网站制作、响应式网页设计等建站业务，价格优惠性价比高，为海阳等各大城市提供网站开发制作服务。
在VB.Net中Print函数只能跟参数，无法用“；”连接，或者你可以用:
Print "圆的面积s=" Trim(CStr(s))
转换之前，先判断下，比如是不是空字符串，是不是nothing，判断完再进行转换，建议用Double.TryParse(),这转换不会引发异常，成功返回true,错误返回false，通过ByRef 传址方式返回转换后的结果。
额，，，
那还是不要用这种方式打开EXCEL比较好。
建议还是用EXCEL对象的好。
1、建立一个txt文档
2、改扩展名为*.udl
3、双击运行-》提供程序SQL Native Client
4、连接-》数据源为当前sql 服务器
5、设置登陆方式
6、选择连接的数据库
7、测试连接
8、关闭
9、用记事本打开
10、把记事本里的内容 由provider···开始复制到constring