赋值语句中,等号左边必须是一个合法的变量,不能是带运算符号的表达式,所以a（表达式）和d（非法变量名）可以排除.
Basic语言中,赋值语句是没有返回值的.不会像C族那样一句同时搞多种功能.等式当值用时候必然是用作比较,返回boolean.
这个没什么不合理的.语义上又不会混淆.C族赋值同时有返回值,所以必须分开两种符号,但是禁不住很多人比较时候要漏写一个=,于是后来编译器聪明,就在编译时候发出警告.
扩展资料：
Visual Basic.NET 具有"面向对象"的特性,Visual Basic.NET 应用种程序的基本单元是对象,用 Visual Basic.NET 编程就是用"对象"组装程序.这种"面向对象"的编程方法与传统的全部用代码编制程序的方法有很大区别,就像用集成电路芯片组装电视机和用三极管.
二极管组装电视机的区别一样.显然,"面向对象"的编程方法比传统的编程方法更简单,更方便,并且编写出的程序也更加稳定.所以呢,"对象"可以被看做 Visual Basic.NET 程序设计的核心.
在 Visual Basic.NET程序设计中,对象中还可以包含头,手,腿,脚等部位,其中的每个部位又可以单独作为作为被研究的对象.在 Visual Basic.NET程序设计中,整个应用程序就是一个对象,应用程序中又包含着窗体（Form）,命令按钮（Command）,菜单（Menu）等对象.
Dim obj As Object, objName As String, i As Integer
i = 0
For Each obj In Me.Controls '枚举窗体所有控件
Debug.Print TypeName(obj)
If TypeName(obj) = "TextBox" Then '判读是否为文本框
i = i + 1
objName = obj.Name '获取文本控件名称,这里可以根据名称来判读赋值,也可以根据其他属性复制
obj.Text = "文本" i '文本框赋值
End If
Next
dim s() as string
For Each fm1 In Panel1.Controls
dim i=0
if fm1.GetType.ToString = "System.Windows.Forms.TextBox" Then
s(i)=fm1.text
i+=1
vb.netexcel给range赋值的方法如下：
Range是对象类型,对象的赋值要加一个Set,,例如您需要的语句可以这样写：
Set M = Range("A1:I1")
这样赋值以后,M才Range类型,例如可以使用 M.Count 属性,或者 M.ClearContents 方法
如果不写Set,那么会把Range的值赋与变量（数组类型）.
首先打开数据源,然后使用alter table语句即可,具体范例如下：
Set cn = New ADODB.ConnectionSet rs = New ADODB.Recordsetconstr = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" 数据库路径及文件名 ""cn.Open constrDim str As Stringstr = "alter table 表名 add 字段 类型"rs.Open str, cn, adOpenStaticmsgbox"添加字段成功",vbokonly
普通变量赋值,使用Let关键字,通常Let需要省略.比如：
Dim i as Integer
Let i = 100
通常Let需要省略,所以上面语句会写作： i = 100
而对象变量赋值,必须显示的使用Set关键字,而且不准省略,比如：
Dim lblinf as Label '定义一个标签对象lblinf
Set lblinf = Form1.Label1 '给lblinf变量赋值为Form1窗体的Label1对象
Let lblinf.Caption = "Label1被赋值了！" 'Let通常省略
实际上Let是已经被丢弃的一个关键字,这里我给你提一下这个关键字,这样你就能很清楚的记得这两个关键字了,而在vb.Net中,连Set这个关键字也舍弃了.所有赋值语句,都直接写,左边是要赋值的变量或者对象,右边是要赋的值、表达式或者对象！
That's all .