vb.net参数保存读取,vb 保存数据

关于VB.net中读取Excel数据存入数组后的再读取问题

因为Excel表的左上角的单元格都是以第一行第一列

为原平等地区用户提供了全套网页设计制作服务,及原平网站建设行业解决方案。主营业务为成都做网站、成都网站建设、成都外贸网站建设、原平网站设计,以传统方式定制建设网站,并提供域名空间备案等一条龙服务,秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求,就会得到认可,从而选择与我们长期合作。这样,我们也可以走得更远!

MsgBox(LBound(arr, 1)) '一维最小下标

MsgBox(LBound(arr, 2)) '二维最小下标

测试:用上面函数(LBound)得到的结果都是1

vb.net程序需要将一些参数保存到外部文件中,那么保存到什么文件比较方便

保存的方法有挺多的,比如保存到数据库中,保存到ini文件里,保存到注册表里,保存到自定义文件中等等。如果就是一些设置参数,直接保存到ini文件中即可(或者自己自定义的文件)。比较重要的可以保存到数据库里,除了设置自己开机启动,注册服务等一般不把东西存如注册表,以免被某些注册表清理软件当垃圾给清理掉。

VB.NET读取TXT文件数据保存为数组

VB.NET编程读取txt文本文档中的数据,并把数据保存为数组,代码如下:

'写配件文件

Private Sub saveIni(ByVal filePath As String, ByVal str As String)

Dim sw As StreamWriter = New StreamWriter(filePath, True) 'true是指以追加的方式打开指定文件

sw.WriteLine(str)

sw.Flush()

sw.Close()

sw = Nothing

End Sub

'读配件文件

Private Function readIni(ByVal filePath As String)

Dim iniDt As New DataTable

iniDt.Columns.Add("text")

iniDt.Columns.Add("value")

Try

Dim sr As StreamReader = New StreamReader(filePath, System.Text.Encoding.Default)

Dim line As String = ""

While Not sr.EndOfStream

Dim str = sr.ReadLine()'读取当前行

iniDt.Rows.Add(New String() {

str(0),

str(1)

})

End While

sr.Close()

sr = Nothing

Catch ex As Exception

End Try

Return iniDt

End Function

vb.net编写程序时如何存储设置参数?

比较专业的做法是在项目中添加微软的Application Settings类,详细帮助文档:

使用极其简单,假设在settings1.settings设置一个项目,名称:IP,类型:String,范围:用户,值:192.168.1.1

调用:Dim sIP As String = setting.IP

获取缺省值:Dim sIP As String = Settings1.Default.IP

保存: setting.IP = "192.168.1.30" : setting.Save()

vb.net如何打开选定文件夹下所有TXT文件,读取数据,写入数据,并保存数据至新的文件

Using FolderBrowserDialog As New FolderBrowserDialog

If FolderBrowserDialog.ShowDialog = Windows.Forms.DialogResult.OK Then

Dim 资料夹 As String() = System.IO.Directory.GetFiles(FolderBrowserDialog.SelectedPath, "*")

For Each 文件 In 资料夹

MsgBox(My.Computer.FileSystem.ReadAllText(文件)) '读取数据

My.Computer.FileSystem.WriteAllText(文件, "数据", False) '写入数据

Next

End If

End Using

vb.net保存数据

都是用SQL语句完成的

写入数据库

strSQL="INTO TABLENAME (OPTION1,OPTIN2)VALUES(VALUE1,VALUE2)";

cmd.Connection = conn;

cmd.CommandText = strSQL;

cmd.Parameters.Add(paramrs[i]);

try

{

conn.Open();

}

catch(Exception ex)

{

throw ex;

}

finally

{

cmd.Parameters.Clear();

cmd.CommandText = null;

cmd.Dispose();

conn.Close();

}

读取值

strSQL ="SELECT OPTION1,OPTION2 FROM TABLENAME";

cmd.CommandText = strSQL;

cmd.Connection = conn;

DataSet ds = new DataSet();

try

{

conn.Open();

SqlDataAdapter da = new SqlDataAdapter(cmd);

da.Fill(ds);

}

catch (Exception ex)

{

throw ex;

}

finally

{

cmd.Dispose();

conn.Close();

}

TextBox2.text = ds.Tables[0].rows[0][0].value.tostring();


新闻标题:vb.net参数保存读取,vb 保存数据
网页地址:http://ybzwz.com/article/dssscoe.html