vb.net数组拷贝 c#数组拷贝

如何将VB.NET字符串转换成字节数组

1、字节数组转换为字符串

创新互联建站主营古城网站建设的网络公司,主营网站建设方案,成都App定制开发,古城h5重庆小程序开发公司搭建,古城网站营销推广欢迎古城等地区企业咨询

byte[] byBuffer = new byte[20];

String strRead = new String(byBuffer);

strRead = String.copyValueOf(strRead.toCharArray(), 0, byBuffer.length]);

2、字符串转换成字节数组

byte[] byBuffer = new byte[200];

String strInput=abcdefg;

byBuffer= strInput.getBytes();

注意:如果字符串里面含有中文,要特别注意,在android系统下,默认是UTF8编码,一个中文字符相当于3个字节,只有gb2312下一个中文相当于2字节。这种情况下可采取以下办法:

vb.net一段关于数组的程序哪位兄弟看一下?

而testarray里的全部成员都是同一个对象testarray1,

testarray中的对象仅仅是指向了testarray1,

testarray1加来减去的最后只剩下d,

foreach了testarray实际上都是读到了testarray1的值,出来三个d.

要实现你想要的效果可以这样做:

ArrayList testarray1 = new ArrayList();

ArrayList testarray = new ArrayList();

testarray1.Add("a");

testarray1.Add("b");

testarray1.Add("c");

testarray1.Add("d");

testarray1.Remove("a");

testarray.Add(testarray1.Clone());

testarray1.Remove("b");

testarray.Add(testarray1.Clone());

testarray1.Remove("c");

testarray.Add(testarray1.Clone());

将testarray1拷贝一份再放到testarray里最后testarray里的最想就是不同的东西了

VB.NET 如何将ListBox列表框的所有项复制到一个数组中,便于排序?谢谢解答

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim ListboxTotalItem As Integer = ListBox1.Items.Count - 1

Dim a(ListboxTotalItem) As String

For i As Integer = 0 To ListboxTotalItem

a(i) = i

Next

Label1.Text = a(5)

End Sub

End Class

-------------

一个Form1

一个Label1

一个Listbox1

一个Button1

在Listbox1中加入10个值

-------------

只是一个演示,其他的要靠自己。

VB6 使用copymemory直接复制数组

CopyMemory()函数功能描述:将一块内存的数据从一个位置复制到另一个位置。

函数原型

VOID CopyMemory(PVOID Destination,CONST VOID *Source,SIZE_T Length);

参数

Destination要复制内存块的目的地址。

Source要复制内存块的源地址。

Length指定要复制内存块的大小,单位为字节

返回值该函数为VOID型,没有返回值。

备注如果目的块与源块有交叠,结果是不可预料的,使用MoveMemory可以解决这个问题。

注意一点CopyMemory和MoveMemory不过是RtlMoveMemory的一个别名而已

示例代码段

char szname[50]="阵雨";

char szfriend[]="polelf,oo";

CopyMemory(szname+4,szfriend,10);

OutputDebugString(szname);//输出结果为"阵雨polelf,oo"

vb6的声明:

Private Declare Sub CopyMemory Lib "kernel32" Alias"RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length AsLong)

如何把VB.NET内部资源文件复制到磁盘上

可以查看附件,或则使用以下代码。应该注释的满全了。

随便建一个窗口工程,窗口代码帖入以下代码。

Imports System.IO

Imports System.Text

Imports System.Reflection

Public Class Form1

Const ResName As String = "123.txt" ' 需要保存的资源名

Const BufferSize As Integer = 4096  ' 复制时缓冲的大小

Private Sub Demo()

' 变量声明

Dim strDisplayText As StringBuilder ' 保存输出信息

Dim strResName As String            ' 保存目标资源的名称

' 变量初始化

strDisplayText = New StringBuilder()

strResName = String.Empty

' 获取所有资源

strDisplayText.AppendLine("文件中存在以下资源:")

For Each strName As String In Assembly.GetExecutingAssembly.GetManifestResourceNames()

strDisplayText.AppendLine("  "  strName)

' 获得目标资源的全名

If strName.EndsWith("."  ResName) Then

strResName = strName

End If

Next

' 目标资源不存在

strDisplayText.AppendLine()

If strResName = String.Empty Then

strDisplayText.AppendLine("抱歉,没有找名为"""  ResName  """的资源")

Else ' 复制资源的代码

' 打开资源文件,在End Using的时候自动关闭。

Using ms As UnmanagedMemoryStream = Assembly.GetExecutingAssembly.GetManifestResourceStream(strResName)

' 打开磁盘文件,在End Using的时候自动关闭。

Using fs As New FileStream("C:\"  ResName, FileMode.Create)

' 变量声明

Dim Buffer(BufferSize - 1) As Byte  ' 复制文件时的缓冲数组

Dim ReadCount As Integer            ' 此次读取数据的数量

' 还有数据可以读取的情况,一直循环

ReadCount = ms.Read(Buffer, 0, BufferSize)

While ReadCount  0

fs.Write(Buffer, 0, ReadCount) ' 写入到磁盘文件

ReadCount = ms.Read(Buffer, 0, BufferSize)

End While

End Using

End Using

strDisplayText.AppendLine("文件已经复制完毕。")

End If

' 显示消息

MessageBox.Show(strDisplayText.ToString())

End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Call Demo()

End

End Sub

End Class


文章标题:vb.net数组拷贝 c#数组拷贝
分享路径:http://bzwzjz.com/article/hpdecj.html

其他资讯

Copyright © 2007-2020 广东宝晨空调科技有限公司 All Rights Reserved 粤ICP备2022107769号
友情链接: 高端网站设计 成都网站建设 成都网站制作 成都网站建设 网站制作 高端网站设计 定制网站建设 成都网站设计 成都网站设计 网站建设费用 成都网站制作 成都网站建设 企业网站设计 重庆网站设计 成都网站建设 泸州网站建设 成都网站设计 营销网站建设 专业网站设计 自适应网站建设 网站建设 网站设计