使用vb.net打开的简单介绍

如何用vb.net 打开一个既存的txt文档。

可以调用CMD

在鹤山等地区，都构建了全面的区域性战略布局，加强发展的系统性、市场前瞻性、产品创新能力，以专注、极致的服务理念，为客户提供成都做网站、网站设计 网站设计制作按需开发,公司网站建设,企业网站建设,品牌网站设计,营销型网站,外贸网站制作,鹤山网站建设费用合理。

方法一：

Shell("cmd.exe /c call c:\新建文本文档.txt", AppWinStyle.NormalFocus)

缺点：不但会打开文本文件，同时还会显示一个cmd窗体。

方法二：

需要新建一个bat文件到资源里，输入start C:\新建文本文档.txt

代码

shell "bat文件的路径.bat"

这样就好了，两种方法各有好坏。一个会显示cmd窗体，一个需要bat文件。

vbnet打开文件夹下打开jpg和png

XPS文件格式经常在文件处理应用程序中使用。您可以在基于.NET Framework的应用程序中使用C＃或VB.NET以编程方式将XPS或OXPS转换为JPG或PNG图像。

让我们逐步介绍以下方案，以了解有关XPS转换的更多信息：

使用C＃或VB.NET将XPS，OXPS转换为JPG图像

使用C＃或VB.NET将XPS，OXPS转换为PNG图像

目前，.NET版Aspose.page升级到v20.10版，感兴趣的朋友可点击下载

使用C＃或VB.NET将XPS，OXPS转换为JPG图像

JPG文件之所以出名是因为它们在所有系统环境中均受支持。您可以使用C＃或VB.NET以编程方式将XPS或OXPS文件转换为JPG图像。对于XPS或OXPS到JPG图像的转换，应遵循以下步骤：

加载输入XPS或OXPS文件

初始化JpegSaveOptions对象

指定要渲染的SmoothingMode，Resolution和PageNumbers

保存输出的JPG图像

以下代码显示了如何使用C＃语言将XPS或OXPS转换为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＃或VB.NET将XPS，OXPS转换为PNG图像

可能需要使用C＃或VB.NET和Aspose.Page for .NET API将XPS或OXPS文件转换为PNG。您需要按照以下步骤将XPS转换为PNG：

加载输入XPS或OXPS文件

初始化PngSaveOptions对象

设置图像分辨率或页面编号为渲染

保存输出的PNG图像

如何用vb.net打开指定的EXCEL文件并在SHEET1的A1建立超链接指向sheet2的B2

Dim xx As New Microsoft.Office.Interop.Excel.Application '定义进程

Dim yy As Microsoft.Office.Interop.Excel.Workbook '定义工作簿

xx = CreateObject("Excel.Application") '创建Excel对象

yy = xx.Workbooks("sheet1")

yy.Worksheets("sheet1").range("A1")="sheet2!b2"

yy.Save()

yy.Close()

yy = Nothing

xx.Quit()

xx = Nothing '销毁组建释放资源

vb.net 如何打开txt文件？

说明：以下代码在Microsoft Visual Basic 2005 （简体中文版）中通过。

创建新项目：

在窗体上添加文本框2个：TextBox1，TextBox2

TextBox1 -- 用来编辑要写入的文本文件的内容，或显示打开的文本文件的内容

TextBox2 -- 用来输入要打开或要写入的文件名（包括盘符，路径）（例如：c:\123.txt）

在窗体上添加2个按钮：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

补充:你要把读出的数据赋值给一个变量,只要:声明一个变量为数值类型,然后只要读取一行就可以了,把这行数据经过转换成数值后赋给这个变量.

VB编的程序能用VB.NET打开吗?

完全可以打开.你可以选择不升级啊!保持原来的.

VB.NET将你的程序进行一定的转换,转换成.NET下的程序.

文章名称：使用vb.net打开的简单介绍
文章网址：https://www.cdcxhl.com/article16/hissgg.html

成都网站建设公司_创新互联，为您提供用户体验、企业网站制作、网页设计公司、企业建站、微信小程序、自适应网站

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联