[.NET] VB6轉VB.net的問題~~

看板Visual_Basic作者 (山中雜草一隻鹿)時間13年前 (2011/05/18 11:56), 編輯推噓2(200)
留言2則, 1人參與, 最新討論串1/1
小弟最近將VB6轉成VB.net,但是在Structure部份卻出了問題.. Structure的程式碼是: Public Structure dotSCRIBELINEINFO Dim ixScribeLineCount As Short 'Line Count <VBFixedArray(100)> Dim xScribeLine() As dotPIX Dim iyScribeLineCount As Short 'Line Count <VBFixedArray(100)> Dim yScribeLine() As dotPIX Public Sub Initialize() ReDim xScribeLine(100) ReDim yScribeLine(100) End Sub End Structure 其中,dotPIX是另一個Structure .. 因為要將資料使用FileGet讀出到到這個個Structure中.. 但卻一直出現"無法讀取資料末端之外"的錯誤訊息.. 後來才發現,在VB6中,使用Len去查看這個Structure的大小是3120 但是到了VB.net,使用Len去查看卻只剩下4... 這是怎麼一回事呢?? 為何長度會縮水這麼多?? 懇請高手指導~~~ 這是原本在VB6的Structure Public Type dotSCRIBELINEINFO ixScribeLineCount As Integer xScribeLine(BUFFERCOUNT_SCRIBELINEINFO) As dotPIX iyScribeLineCount As Integer yScribeLine(BUFFERCOUNT_SCRIBELINEINFO) As dotPIX End Type -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 211.20.115.210 ※ 編輯: kight 來自: 211.20.115.210 (05/18 11:57) ※ 編輯: kight 來自: 211.20.115.210 (05/18 11:57)

05/18 13:25, , 1F
你的VB6原來的structure內容可否貼上來?
05/18 13:25, 1F
※ 編輯: kight 來自: 211.20.115.210 (05/18 13:36)

05/18 18:21, , 2F
把你的兩個Structure寄過來, 我幫你轉.
05/18 18:21, 2F
文章代碼(AID): #1DqqE6HM (Visual_Basic)