1 生成txt文件。
為揭西等地區(qū)用戶提供了全套網(wǎng)頁設(shè)計制作服務(wù),及揭西網(wǎng)站建設(shè)行業(yè)解決方案。主營業(yè)務(wù)為網(wǎng)站設(shè)計制作、成都做網(wǎng)站、揭西網(wǎng)站設(shè)計,以傳統(tǒng)方式定制建設(shè)網(wǎng)站,并提供域名空間備案等一條龍服務(wù),秉承以專業(yè)、用心的態(tài)度為用戶提供真誠的服務(wù)。我們深信只要達到每一位用戶的要求,就會得到認(rèn)可,從而選擇與我們長期合作。這樣,我們也可以走得更遠!
DimSaveFileDialog1AsNewSaveFileDialog()?'創(chuàng)建一個保存對話框
SaveFileDialog1.Filter?="txt?files?(*.txt)|*.txt"?'設(shè)置擴展名
IfSaveFileDialog1.ShowDialog()?=?System.Windows.Forms.DialogResult.OKThen?'如果確定保存
My.Computer.FileSystem.WriteAllText(SaveFileDialog1.Filename,?Textbox1.Text,False)?'保存文本,False表示不追加文本,直接覆蓋其內(nèi)容
EndIf
原文鏈接:
在任意form類或模塊中都可以創(chuàng)建類,跟建立函數(shù)和過程一樣。
示例:
public class form1
‘創(chuàng)建一個屬于form的子類,名稱為【類名】。
public class 類名
’定義類成員text
public text as string
end class
‘定義一個【類名】類的公共變量。
dim 類名1 as 類名
’定義一個過程,使用【類名】類的text成員
public sub 過程
‘實例化【類名1】
類名1=new 類名
類名1.text=“賦值”
’定義一個【新類】類的私用變量,并實例化。
dim 新類1 as new 新類
新類1.name=“一個字符串”
新類1.age=12
end sub
end class
‘’‘創(chuàng)建一個與form同級的類,名稱為【新類】
public class 新類
public sub new()
end sub
public name as string
public age as integer
end class
在模塊中使用:
public class module1
dim a as new form1.類名
end module
1.不正確
Dim abc As myClass,定義一個可以引用myClass類型對象的變量abc。這個abc變量存在于棧上。
abc=New myClass。New myClass創(chuàng)建myClass實例對象,這個對象存在于托管堆上。然后(同時)讓abc引用(指向)這個對象。
abc變量在棧上,而對象在托管堆上。
abc儲存的是對象的地址,而不是對象本身。
看下面的代碼
Dim a As myClass,b As myClass,c As myClass
a=New myClass
b=a
c=a
整個過程中只創(chuàng)建了一個myClass對象,位于托管堆上。
三個myClass類型的變量a、b、c位于棧上,都指向了這一個myClass對象
2.類的成員分 實例成員 和 靜態(tài)成員
實例成員 必須在實例對象上調(diào)用
靜態(tài)成員 可以直接調(diào)用,不需要實例對象。