廣告廣告
  加入我的最愛 設為首頁 風格修改
首頁 首尾
 手機版   訂閱   地圖  簡體 
您是第 4133 個閱讀者
 
發表文章 發表投票 回覆文章
  可列印版   加為IE收藏   收藏主題   上一主題 | 下一主題   
天之心
數位造型
個人文章 個人相簿 個人日記 個人地圖
路人甲
級別: 路人甲 該用戶目前不上站
推文 x0 鮮花 x0
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片
推文 x0
[Basic][求助] VB2008的表單呼叫完程式有衝突
請問各位大大.表單Form1呼叫Form2之後程式有2個地方衝突.
(一)cnt = offset Mod ImageList1.Images.Count
(二)e.Graphics.DrawImage(ImageList1.Images(cnt), dstRect, srcRect, GraphicsUnit.Pixel)
把這2個關掉之後便可以呼叫表單.要如何時這2個程式能夠完整運轉

有建立 ImageList1 元件
 ImageList1 裡面有圖片

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Form2.Show()
    End Sub


Public Class Form2
    ..

訪客只能看到部份內容,免費 加入會員 或由臉書 Google 可以看到全部內容



[ 此文章被天之心在2011-07-21 18:46重新編輯 ]



獻花 x0 回到頂端 [樓 主] From:臺灣中華電信股份有限公司 | Posted:2011-07-18 23:40 |
ebolaman 手機 會員卡
個人文章 個人相簿 個人日記 個人地圖
特殊貢獻獎

級別: 副版主 該用戶目前不上站
版區: 程式設計
推文 x38 鮮花 x458
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

根據

(一)cnt = offset Mod ImageList1.Images.Count
(二)e.Graphics.DrawImage(ImageList1.Images(cnt), dstRect, srcRect, GraphicsUnit.Pixel)

推斷


Mod 會發生錯誤通常都是因為 後面的數值是 0
例如 cnt = 100 Mod 0  就會發生錯誤
或是根本沒有 ImageList1 這個物件,這兩行的共通點就是都有使用到 ImageList1 這個物件


你有建立 ImageList1 元件嗎?
你的 ImageList1 裡面有圖片嗎?


如果以上都沒問題,希望你能給一下 ImageList1 的圖片,以及 offset 值

並給錯誤的敘述 (例如 溢位...)


My BOINC stats :

獻花 x0 回到頂端 [1 樓] From:台灣寬頻通訊顧問股份有限公司 | Posted:2011-07-19 08:21 |
ebolaman 手機 會員卡
個人文章 個人相簿 個人日記 個人地圖
特殊貢獻獎

級別: 副版主 該用戶目前不上站
版區: 程式設計
推文 x38 鮮花 x458
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

由於環境條件不足,我無法推斷錯誤發生的原因 (剛剛用你的 程式碼+圖片 模擬,並沒有任何錯誤發生)


請在錯誤發生的時候,選取錯誤的敘述文字,並且複製 (例如: 嘗試以零除。)

並在此貼上,並且敘述 發生錯誤在 哪行程式碼,以及什麼動作導致這個錯誤發生,以及時間點 (例如:剛開 Form2 的時候...或是跑一陣子,或是 Timer.Interval=300 的情況下,跑了 10 次...)


另外你可以插入一些 Debug 文字,例如

在發生問題的程式碼前插入這一行,並且 點選 功能表 >> Debug >> Windows >> Immediate (Ctrl + G)

複製程式
Debug.Print("offset=" & offset & ", cnt=" & cnt & " [dst] X=" & dstRect.X & ", Y=" & dstRect.Y)

則可以進一步釐清 問題的真相


My BOINC stats :

獻花 x0 回到頂端 [2 樓] From:台灣寬頻通訊顧問股份有限公司 | Posted:2011-07-19 23:58 |
天之心
數位造型
個人文章 個人相簿 個人日記 個人地圖
路人甲
級別: 路人甲 該用戶目前不上站
推文 x0 鮮花 x0
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

請問大大 這一段在VB內我找不到 點選 功能表 >> Debug >> Windows >> Immediate (Ctrl + G)

(一)cnt = offset Mod ImageList1.Images.Count
(一)[偵錯]嘗試以零除。
(二)e.Graphics.DrawImage(ImageList1.Images(cnt), dstRect, srcRect, GraphicsUnit.Pixel)
(二)[偵錯]InvalidArgument='0' 不是 'index' 的有效值。 參數名稱: index

Form2表單 單獨呼叫是可以正常運作.但是Form1表單呼叫Form2表單就會出現2個錯誤
正常表單呼叫表單應該是不會有錯誤訊息.我想會不會是呼叫表單不可以用Form2.Show()
類型呼叫


獻花 x0 回到頂端 [3 樓] From:臺灣中華電信股份有限公司 | Posted:2011-07-20 21:25 |
ebolaman 手機 會員卡
個人文章 個人相簿 個人日記 個人地圖
特殊貢獻獎

級別: 副版主 該用戶目前不上站
版區: 程式設計
推文 x38 鮮花 x458
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

下面是引用 天之心 於 2011-07-20 21:25 發表的 : 到引言文
請問大大 這一段在VB內我找不到 點選 功能表 >> Debug >> Windows >> Immediate (Ctrl + G)

(一)cnt = offset Mod ImageList1.Images.Count
(一)[偵錯]嘗試以零除。
(二)e.Graphics.DrawImage(ImageList1.Images(cnt), dstRect, srcRect, GraphicsUnit.Pixel)
(二)[偵錯]InvalidArgument='0' 不是 'index' 的有效值。 參數名稱: index

Form2表單 單獨呼叫是可以正常運作.但是Form1表單呼叫Form2表單就會出現2個錯誤
正常表單呼叫表單應該是不會有錯誤訊息.我想會不會是呼叫表單不可以用Form2.Show()
類型呼叫


你是不是把 ImageList1 放在 Form1 了?

我在 1樓有提過 這個錯誤


My BOINC stats :

獻花 x0 回到頂端 [4 樓] From:台灣寬頻通訊顧問股份有限公司 | Posted:2011-07-20 22:20 |
天之心
數位造型
個人文章 個人相簿 個人日記 個人地圖
路人甲
級別: 路人甲 該用戶目前不上站
推文 x0 鮮花 x0
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

Public Class Form1

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


Form1 表單只有這個
另外我傳上圖片


本帖包含附件
zip VB2008.rar   (2022-06-09 14:18 / 1008 KB)   下載次數:3


[ 此文章被天之心在2011-07-21 18:49重新編輯 ]


獻花 x0 回到頂端 [5 樓] From:臺灣中華電信股份有限公司 | Posted:2011-07-21 18:30 |
ebolaman 手機 會員卡
個人文章 個人相簿 個人日記 個人地圖
特殊貢獻獎

級別: 副版主 該用戶目前不上站
版區: 程式設計
推文 x38 鮮花 x458
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

下面是引用 天之心 於 2011-07-21 18:30 發表的 : 到引言文
Public Class Form1

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


Form1 表單只有這個
另外我傳上圖片



在 Form2 的程式碼使用以下兩行

(一)cnt = offset Mod ImageList1.Images.Count
(一)[偵錯]嘗試以零除。
(二)e.Graphics.DrawImage(ImageList1.Images(cnt), dstRect, srcRect, GraphicsUnit.Pixel)
(二)[偵錯]InvalidArgument='0' 不是 'index' 的有效值。 參數名稱: index


時候會發生錯誤就明顯的代表著 ImageList1.Images.Count 這個值 是 0

也就代表著 ImageList1 這個物件的圖片的 總數是 0

就是說,沒有圖片在 ImageList1 裡面


請檢查一下 Form2 ImageList1


此文章被評分,最近評分記錄
財富:50 (by 三仙) | 理由: ^^ 因為您的參與,讓程式設計更容易!!


My BOINC stats :

獻花 x1 回到頂端 [6 樓] From:台灣寬頻通訊顧問股份有限公司 | Posted:2011-07-21 19:42 |

首頁  發表文章 發表投票 回覆文章
Powered by PHPWind v1.3.6
Copyright © 2003-04 PHPWind
Processed in 0.056428 second(s),query:16 Gzip disabled
本站由 瀛睿律師事務所 擔任常年法律顧問 | 免責聲明 | 本網站已依台灣網站內容分級規定處理 | 連絡我們 | 訪客留言