是对的..
我们提供的服务有：成都网站制作、做网站、外贸营销网站建设、微信公众号开发、网站优化、网站认证、定结ssl等。为数千家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的定结网站制作公司
检查其他地方的错误吧..
If A B Then
VB不支持这个符号
但在某些其他编程语言里，!=表示不等于。
关于Vb中！的用法：
感叹号“！”常用于当一个控件作为一个特性访问的情况下，例如引用Fomr2中Text1文本框文本属性时，可采用response＄＝Form2！text1．text语法格式。
虽然跟.的语法应用结构有较大差异，但两条语句的性能是相同的，值得注意的是如果你在感叹号“！”的位置使用“．”可以获得对窗体上Text1特性的直接访问权。
根据使用位置的不同，有三种不同的意思：
1、字符串连接符：
s = "123" "abc"
那么s的值是"123abc"
2、长整型数（Long）定义符：
Dim k
相当于
Dim k As Long
3、十六进制或八进制数的前导符：
Print H3EF7
H3EF7就是个16进制数
Print O542
O542则是个8进制数
=也有两种不同意思：
1、赋值命令符：
a = 123
就是把变量a的值设为123的意思
2、逻辑比较运算符：
If a = b Then
如果a等于b就怎样怎样
另外，你说的VB是指VB6还是VB.NET？如果是VB.NET，那么
a = b 相当于 a = a b
如果是VB6，那么：
a = b
VB会先定义一个长整型变量a，然后让它的值等于变量b
TextBox1.Text = 7 And 10
TextBox1.Text = 7 Or 10
TextBox1.Text = 7 Xor 10
TextBox1.Text = Not 10
TextBox1.Text = 7 10
TextBox1.Text = 7 10
如这些,我在VB.Net中也找不到shl和shr运算符~
不过可以通过"自定义运算符"来写出我们想要的功能
Dim pic() As String = {"慧利艺术.jpeg","马头兰.jpeg","南政院.jpeg","心烛.jpeg"}
这句试试吧.
下一句：
response.write("现在显示的是第"ViewState("index")+1"张，"Image1.ImageUrl"br/")
把所有的 两边加上空格。
response.write ("现在显示的是第" ViewState("index") + 1 "张," Image1.ImageUrl "br/")
VB6中没有=，如果你有看到，那一定是类似这样的：if 100+c(i) = 111 then，这里的和=不能并在一起，=在vb6中是等于或赋值的意思，而放在这里是起一个定义数据类型的作用，vb中的常用数据类型都是可以用一些符号表示的，这里c假设是一个子程序，但是返回的是string文本型，而这个if判断的是整数型的结果，所以就需要数据类型转换，而代表的是long类型，所以这里就把c(i)返回的string类型转换成了类型。
如果是vb.net中，=也还是等于或赋值的意思，=是一种简写，例如：a=b 就是a = a b的简写，还有a+=b就是a = a + b的简写
