扫描二维码下载沐宇APP

沐宇

微信扫码使用沐宇小程序

沐宇
沐宇首页 互联网技术知识问答 vb.net鏁扮粍鎬庝箞娣诲姞鍏冪礌

vb.net鏁扮粍鎬庝箞娣诲姞鍏冪礌

扬州沐宇科技
2023-11-10 09:20:16
VB.NET

鍦╒B.NET涓紝鍙互浣跨敤Resize鏂规硶鏉ユ坊鍔犲厓绱犲埌鏁扮粍涓€備笅闈㈡槸涓€涓ず渚嬩唬鐮侊細

' 澹版槑涓€涓暣鏁版暟缁?/span>
Dim numbers() As Integer = {1, 2, 3, 4, 5}

' 浣跨敤Resize鏂规硶娣诲姞鍏冪礌鍒版暟缁勪腑
Array.Resize(numbers, numbers.Length + 1)
numbers(numbers.Length - 1) = 6

' 杈撳嚭鏁扮粍涓殑鍏冪礌
For Each num As Integer In numbers
    Console.WriteLine(num)
Next

杩愯浠ヤ笂浠ｇ爜锛屽皢浼氳緭鍑轰互涓嬬粨鏋滐細

1
2
3
4
5
6

鍦ㄨ繖涓ず渚嬩腑锛屾垜浠鍏堝０鏄庝竴涓暣鏁版暟缁?code>numbers锛岀劧鍚庝娇鐢?code>Array.Resize鏂规硶灏嗘暟缁勫ぇ灏忚皟鏁翠负鍘熸潵鐨勯暱搴﹀姞1銆傛帴涓嬫潵锛屾垜浠皢鏂扮殑鍏冪礌6璧嬪€肩粰鏁扮粍鐨勬渶鍚庝竴涓綅缃€傛渶鍚庯紝閫氳繃寰幆閬嶅巻鏁扮粍骞惰緭鍑烘瘡涓厓绱犵殑鍊笺€?/p>

相关问答

扫码添加客服微信