異常呼籲寬度改變

Question

我有下面的代碼：

Dim widthS = 792 
Dim setW = Me.Controls("TableLayoutPanel" + CStr(x)) 
setW.Width = widthS - 26 

但每當我試試我得到的異常"Object reference not set to an instance of an object."，我已經試過DirectCast()但它沒有任何效果，沒有任何人有一個解決方案？
謝謝。

Answer 1

您需要在Dim語句中實際聲明變量類型。對於VBA，這你打成這樣，它可能是這樣的：

Dim widthS as Long 
Dim setW as Control 

Set setW = Me.Controls("TableLayoutPanel" + CStr(x)) 
widthS = 792 
setW.Width = widthS - 26 

編輯

這聽起來像你正在使用VB.Net。基本的前提是相同的，但在VB.Net中，您可以將變量聲明和實例化結合起來，例如：

Dim widthS as Long = 792