VB提示錯誤的引數號或無效的屬性賦值是怎麼回事啊。。高手求助

時間 2021-07-08 20:34:05

1樓:匿名使用者

pset用法錯誤,沒有指定顏色引數

pset 方法

將物件上的點設定為指定顏色。

語法object.pset [step] (x, y), [color]

pset 方法的語法有如下物件限定符和部分:

部分 描述

object 可選的。 物件表示式,其值為「應用於」列表中的物件。如果object 省略,具有焦點的窗體作為object。

step 可選的。關鍵字,指定相對於由 currentx 和 currenty 屬性提供的當前圖形位置的座標。

(x, y) 必需的。 single (單精度浮點數),被設定點的水平( x 軸)和垂直( y 軸)座標。

color 可選的。long (長整型數),為該點指定的 rgb 顏色。如果它被省略,則使用當前的 forecolor 屬性值。

可用 rgb 函式或 qbcolor 函式指定顏色。

pset 方法示例

這個示例用 pset 方法在窗體上畫五彩碎紙。想執行這個示例,將**放入窗體的general 部分。按 f5 並單擊窗體。

xpos = rnd * scalewidth ' 得到水平位置。

ypos = rnd * scaleheight ' 得到垂直位置。

pset (xpos, ypos), qbcolor(rnd * 15) ' 畫五彩碎紙。

2樓:匿名使用者

我用你的**測試沒有發現問題:

option explicit

dim *** as string

dim interest as stringprivate sub command1_click()if option1.value = true then*** = "男生"

else

*** = "女生"

end if

if check1(0).value = 1 theninterest = check1(0).captionend if

if check1(1).value = 1 theninterest = check1(1).captionend if

if check1(2).value = 1 theninterest = check1(2).captionend if

text1.text = "我是" + *** + "我的愛好是" + interest

end sub

3樓:匿名使用者

你介面上有沒有check1(0),check1(1),check1(2)這三個checkbox 控制項陣列?或者說這控制項名字是不是對的

vb編譯錯誤錯誤的引數號或無效的屬性賦值怎麼辦

4樓:匿名使用者

在我電腦上可以正常的執行。y = val(text1, text)m = val(text2, text)

裡面的逗號改為.y = val(text1.text)m = val(text2.text)

vb程式提示錯誤的引數號或無效的屬性賦值,求教,

5樓:

問題的提示是在這,但出錯不一定是這句,你要向上翻,看看myfeature的定義。

VB中的子函式或函式未定義怎麼回事

過程名稱拼錯。檢查拼寫並改正。試圖從另一個工程呼叫過程,但並沒有在 引用 對話方塊中將該引用新增到該工程。子函式或函式未定義屬 sub,function,或 property 未定義 錯誤 35 sub,function,或 property 未定義 錯誤 35 子函式或函式未定義屬 sub,fun...

DNF中的屬性強化是怎麼回事?

強化的是所有有屬性傷害的技能,如果 也有屬性,平砍也有加成。無視傷害是和物理攻擊魔法攻擊算在一起的,不能這麼算的。可以增加相應屬性技能的傷害,比如暗屬性強化高,墓碑傷害就高了。強化15點加百分之10傷害,我見過極限的元素暗強化50 dnf單屬性強化和全屬性強化有什麼區別 一 屬性數目不同 1 單屬性...

我的電腦提示虛擬記憶體最小值太小是怎麼回事

開始 在我的電腦上點右鍵 屬性 高階 效能那點設定 高階 虛擬記憶體那點更改 然後把c最小設定為1000,最大1500 點設定 應用 確定 ok搞定 清理磁碟,或刪掉磁碟裡一些沒用的東西 電腦提示虛擬記憶體不足 1 感染了病毒 有些病毒發作時會占用大量記憶體空間,導致系統出現記憶體不足的問題。趕快去...