說明:以下代碼在Microsoft Visual Basic 2005 (簡(jiǎn)體中文版)中通過。
目前創(chuàng)新互聯(lián)建站已為近1000家的企業(yè)提供了網(wǎng)站建設(shè)、域名、虛擬空間、成都網(wǎng)站托管、企業(yè)網(wǎng)站設(shè)計(jì)、衡山網(wǎng)站維護(hù)等服務(wù),公司將堅(jiān)持客戶導(dǎo)向、應(yīng)用為本的策略,正道將秉承"和諧、參與、激情"的文化,與客戶和合作伙伴齊心協(xié)力一起成長(zhǎng),共同發(fā)展。
創(chuàng)建新項(xiàng)目:
在窗體上添加文本框2個(gè):TextBox1,TextBox2
TextBox1 -- 用來(lái)編輯要寫入的文本文件的內(nèi)容,或顯示打開的文本文件的內(nèi)容
TextBox2 -- 用來(lái)輸入要打開或要寫入的文件名(包括盤符,路徑)(例如:c:\123.txt)
在窗體上添加2個(gè)按鈕:Button1,Button2
Button1 -- 寫入文件
Button2 -- 打開文件
代碼如下:
Imports System.IO
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim w As New StreamWriter(TextBox2.Text)
w.Write(TextBox1.Text)
w.Close()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim r As New StreamReader(TextBox2.Text)
Dim s As String
TextBox1.Text = ""
Do While r.Peek -1 '是否到文件尾
s = r.ReadLine
' MessageBox.Show(r.Peek)
TextBox1.Text = TextBox1.Text s vbCrLf
Loop
r.Close()
End Sub
End Class
補(bǔ)充:你要把讀出的數(shù)據(jù)賦值給一個(gè)變量,只要:聲明一個(gè)變量為數(shù)值類型,然后只要讀取一行就可以了,把這行數(shù)據(jù)經(jīng)過轉(zhuǎn)換成數(shù)值后賦給這個(gè)變量.
System.Windows.Forms.OpenFileDialog
System.Windows.Forms.SaveFileDialog
System.Windows.Forms.FolderBrowserDialog
以上三個(gè)類均能夠很好的解決樓主的需求。
具體的請(qǐng)lz自己查msdn
XPS文件格式經(jīng)常在文件處理應(yīng)用程序中使用。您可以在基于.NET Framework的應(yīng)用程序中使用C?;騐B.NET以編程方式將XPS或OXPS轉(zhuǎn)換為JPG或PNG圖像。
讓我們逐步介紹以下方案,以了解有關(guān)XPS轉(zhuǎn)換的更多信息:
使用C?;騐B.NET將XPS,OXPS轉(zhuǎn)換為JPG圖像
使用C?;騐B.NET將XPS,OXPS轉(zhuǎn)換為PNG圖像
目前,.NET版Aspose.page升級(jí)到v20.10版,感興趣的朋友可點(diǎn)擊下載
使用C?;騐B.NET將XPS,OXPS轉(zhuǎn)換為JPG圖像
JPG文件之所以出名是因?yàn)樗鼈冊(cè)谒邢到y(tǒng)環(huán)境中均受支持。您可以使用C?;騐B.NET以編程方式將XPS或OXPS文件轉(zhuǎn)換為JPG圖像。對(duì)于XPS或OXPS到JPG圖像的轉(zhuǎn)換,應(yīng)遵循以下步驟:
加載輸入XPS或OXPS文件
初始化JpegSaveOptions對(duì)象
指定要渲染的SmoothingMode,Resolution和PageNumbers
保存輸出的JPG圖像
以下代碼顯示了如何使用C#語(yǔ)言將XPS或OXPS轉(zhuǎn)換為JPG圖像:
// Input file
string inputFileName = dataDir + "input.xps";
//Output file
string outputFileName = dataDir + "XPStoImage_out.jpeg";
// Initialize XPS input stream
using (Stream xpsStream = File.Open(inputFileName, FileMode.Open, FileAccess.Read))
{
// Load XPS document form the stream
XpsDocument document = new XpsDocument(xpsStream, new XpsLoadOptions());
// or load XPS document directly from file. No xpsStream is needed then.
// XpsDocument document = new XpsDocument(inputFileName, new XpsLoadOptions());
// Initialize options object with necessary parameters.
JpegSaveOptions options = new JpegSaveOptions()
{
SmoothingMode = System.Drawing.Drawing2D.SmoothingMode.HighQuality,
Resolution = 300
};
// Create rendering device for JPG format
ImageDevice device = new ImageDevice();
document.Save(device, options);
// Iterate through document partitions (fixed documents, in XPS terms)
for (int i = 0; i device.Result.Length; i++) // Iterate through partition pages for (int j = 0; j device.Result[i].Length; j++) { // Initialize image output stream using (Stream imageStream = System.IO.File.Open(Path.GetDirectoryName(outputFileName) + Path.GetFileNameWithoutExtension(outputFileName) + "_" + (i + 1) + "_" + (j + 1) + Path.GetExtension(outputFileName), System.IO.FileMode.Create, System.IO.FileAccess.Write)) // Write image imageStream.Write(device.Result[i][j], 0, device.Result[i][j].Length); } }
使用C?;騐B.NET將XPS,OXPS轉(zhuǎn)換為PNG圖像
可能需要使用C?;騐B.NET和Aspose.Page for .NET API將XPS或OXPS文件轉(zhuǎn)換為PNG。您需要按照以下步驟將XPS轉(zhuǎn)換為PNG:
加載輸入XPS或OXPS文件
初始化PngSaveOptions對(duì)象
設(shè)置圖像分辨率或頁(yè)面編號(hào)為渲染
保存輸出的PNG圖像
可以調(diào)用CMD
方法一:
Shell("cmd.exe?/c?call?c:\新建文本文檔.txt",?AppWinStyle.NormalFocus)
缺點(diǎn):不但會(huì)打開文本文件,同時(shí)還會(huì)顯示一個(gè)cmd窗體。
方法二:
需要新建一個(gè)bat文件到資源里,輸入start C:\新建文本文檔.txt
代碼
shell?"bat文件的路徑.bat"
這樣就好了,兩種方法各有好壞。一個(gè)會(huì)顯示cmd窗體,一個(gè)需要bat文件。
添加一個(gè)OpenFileDialog控件。
代碼如下:OpenFileDialog1.ShowDialog()‘打開文件選擇框OpenFileDialog1.FileName’得到選擇的文件
Visual Basic.NET是基于微軟.NET Framework之上的面向?qū)ο蟮木幊陶Z(yǔ)言。
其在調(diào)試時(shí)是以解釋型語(yǔ)言方式運(yùn)作,而輸出為EXE程序是是以編譯型語(yǔ)言方式運(yùn)作。
可以看作是Visual Basic在.Net Framework平臺(tái)上的升級(jí)版本,增強(qiáng)了對(duì)面向?qū)ο蟮闹С?。大多的VB.Net程序員使用Visual Studio .Net作為IDE(integrated development environment).SharpDevelop是另一種可用的開源的IDE。
第一步,新建項(xiàng)目。
1
打開vb.net,也就是打開Microsoft visual studio 2010,第一次使用的時(shí)候設(shè)置為basic語(yǔ)言就行。新建項(xiàng)目--打開excel。
2
新建成功。
END
第二步,添加引用。
1
“項(xiàng)目”--“添加引用”。
2
添加Microsoft Excel 14.0 Object Library。
END
第三步,添加打開文件對(duì)話框工具。
1
工具箱--對(duì)話框--openfiledialog。
2
添加成功。
END
第四步,添加命令按鈕控件。
1
工具箱--公共控件--button。
在控件上右擊鼠標(biāo),進(jìn)入屬性設(shè)置。
2
text屬性設(shè)置為“打開excel”。
3
name屬性也設(shè)置為“打開excel”。
END
第五步,編寫程序。
1
鼠標(biāo)雙擊命令按鈕,進(jìn)入編程界面,編寫程序。
END
第六步,運(yùn)行程序。
1
鼠標(biāo)單擊啟動(dòng)調(diào)式圖標(biāo),程序開始運(yùn)行。
2
單擊打開excel命令按鈕,調(diào)用打開文件對(duì)話框,選擇自己要打開的excel文件。
END
第七步,保存程序。
第一次程序運(yùn)行完,關(guān)閉程序,出現(xiàn)關(guān)閉項(xiàng)目提示,選擇保存。
2
選好自己要保存的位置。