你搞反了!
成都创新互联坚持“要么做到,要么别承诺”的工作理念,服务领域包括:成都网站建设、成都网站制作、企业官网、英文网站、手机端网站、网站推广等服务,满足客户于互联网时代的平山网站设计、移动媒体设计的需求,帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴!
TextBox1.Text=z1
TextBox2.Text=z2
改成
z1=CDouble(TextBox1.Text)
z2=CDouble(TextBox2.Text)
把 TextBox2.Text = Chr(Val("H" B))
改为
TextBox2.Text =TextBox2.Text Chr(Val("H" B)) VbCrlf
试试?而且 TextBox2 的MultyLine属性要事先改为True
或者是:
TextBox2.Text =TextBox2.Text Chr(Val("H" B)) “ ”
你这个是VB.NET环境,Print 语句与VB6里的功能已经不一样了。
解决的方法可以两种:
方法一:
把 Print(a) 改成 msgbox(a)
方法二:
在窗体上添加一个标签控件Label1
把 Print(a) 改成 Label1.Text = a