【首發(fā)答案】 VB6 中才有Set,VB.net中沒有了
成都創(chuàng)新互聯(lián)堅(jiān)持“要么做到,要么別承諾”的工作理念,服務(wù)領(lǐng)域包括:網(wǎng)站建設(shè)、成都網(wǎng)站制作、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣等服務(wù),滿足客戶于互聯(lián)網(wǎng)時(shí)代的柳城網(wǎng)站設(shè)計(jì)、移動(dòng)媒體設(shè)計(jì)的需求,幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴!
直接 a = New a 即可。
^_^ 給分撒~
cnum 沒有聲明dim的聲明一下,
你必須明白,如果你用 vb.net 做開發(fā)就別再用 ado 而改用ado.net
用oledb.oldbconnection代替 adodb.connection
如果你堅(jiān)持在 .net 中用ado,請?zhí)砑右?,引?com 中的 ado
setfocus 不是.net 用法 改成 focus
unload改成 close
或者你可以用vb.net 的自帶工具,升級vb6的代碼。
看樣子應(yīng)該是設(shè)置和讀取某個(gè)物件的屬性。。而這個(gè)屬性就是sslStatus.Text的值。
在這里Get是將sslStatus.Text這個(gè)結(jié)果讀取出來;而Set(ByVal value As String)是將value這個(gè)參數(shù)值賦值給sslStatus.Text,也即是讓這個(gè)名為sslStatus的文本框顯示value這個(gè)值。
Set 語句 將對象引用賦給變量或?qū)傩浴?語法 Set 語句中使用 New 關(guān)鍵字,那么實(shí)際上就會(huì)新建一個(gè)該對象的實(shí)例。
Set objA=objAA.getObjOfA()
Or
Set objA = new ObjOfA()
這種寫法在.net
2.0后才出現(xiàn)的,目的是為了減輕程序員的工作量,編譯器會(huì)自動(dòng)為你補(bǔ)充完整,如:
public
string
name{get;set;}
編譯器自動(dòng)生成(可能會(huì)更負(fù)責(zé)更完善):
private
string
name;
public
string
Name
{
get
{
return
name;
}
set
{
name=
value;
}
}
這種寫法在一般時(shí)候很好,但是有一種情況你不得不放棄這種寫法,那就是你要在里面進(jìn)行校驗(yàn)的時(shí)候,比如set中有運(yùn)算或者校驗(yàn)之類的,get中有轉(zhuǎn)換等等,這種情況下,你就必須老老實(shí)實(shí)的寫個(gè)完整的才可以。