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://pwwzsj.com/article/hpdecj.html