你这是vb.net的代码,vb中不允许那么写:
创新互联服务项目包括衢江网站建设、衢江网站制作、衢江网页制作以及衢江网络营销策划等。多年来，我们专注于互联网行业，利用自身积累的技术优势、行业经验、深度合作伙伴关系等，向广大中小型企业、政府机构等提供互联网行业的解决方案，衢江网站推广取得了明显的社会效益与经济效益。目前，我们服务的客户以成都为中心已经辐射到衢江省份的部分城市，未来相信会继续扩大服务区域并继续获得客户的支持与信任！
Dim
strdx()
As
String
=
{"0",
"0",
"0"}
'定义个数组,从后面的值能看的出最大下标是2,也就是strdx(0),strdx(1)和strdx(2),3个的默认值都为0
Dim
calcount1
As
String
=
"0"
'定义个字符串变量
Dim
calcount2
As
String
=
"0"
Dim
strvalue
As
Boolean
=
False
'定义strvalue为bool值,改类型变量只有true和false
2种值
If
strdx(0)
=
"0"
Then
TextBox1.Text
=
strdx(0)
"."
这是字符串连接符号,和"+"的区别是,他把左右2边的内容直接连接的,而"+"可能会编程运算符,例如
2
3
=
"23"
而
2
+
3
=
5
ElseIf
strvalue
=
False
Then
strdx(0)
=
strdx(0)
"0"
TextBox1.Text
=
strdx(0)
"."
strvalue
=
True
Else
strdx(0)
=
strdx(0)
"0"
TextBox1.Text
=
strdx(0)
Select
Case
calcount1
'
这里开始是分支语句
Case
"+"
TextBox1.Text
=
Str(Val(strdx(1))
+
Val(strdx(0)))
VB是是一种编程语言。VBA主要VB是office上的应用，VB.net可以说是VB的最新版本，如果就是业余或者刚入门的话，语法什么的和VB几乎完全一样。只是语法上面，要求比VB要求规范，比方说VB6.0里面Text1="1"读的出来，VB.net就会报错，一定要textbox1.text="1"才可以。对于初学者来说，VB.net这种规范要求有益无害。
如果你想学的话，最好学VB.net，一来功能强，二来，能帮助你学习基本概念。比方说我学VB的时候，什么是类一点概念都没有。都是学了.net之后才懂得。三来么，学会了VB.net.学其他都很方便的。
但是如果就是用用excel的话么，VBA就可以了。不过说句老实话，光学VBA的话，很多东西理解起来比较难。我是最后学VBA的，看了书一个礼拜之后就能随便编了。但是书上很多代码的，我猜如果没有VB基础，估计看不懂
不一样的，主要的关键字差不多，语法有一些有变化
vb.net与vb语法的一个很大不同——oop设计
例如
sMyString = Mid(sMyString,3,4)
现在，它可以被替换为：
sMyString = sMyString.substring(3,4)
