如有
Lable1
Lable2
Lable3
Picture1

vbqa 發表在 痞客邦 留言(2) 人氣()

Private Sub Form_Load()
List1.AddItem "aaaaa"
List1.AddItem "bbbb"
List1.AddItem "ccccc"
List1.AddItem "dddddd"

vbqa 發表在 痞客邦 留言(0) 人氣()

dear all ,
我正在設計如 puzzle 效果的 program , 但遇到些問題 :
假設有 image1, image2. 如果我 dragdrop and resize image1 去到 image2 既 boundary 裡面 , 就會lost control ( 即係 click_event 會無左 , 似乎係 VB 決定了 ) ,
我怎麼辦 ??
thx all

vbqa 發表在 痞客邦 留言(0) 人氣()

以下是在Tree View下的Drag & Drop的程式,但問題是當選了一個Node之後並開始Drag時,整個Tree View Area也同時Drag。請問這是甚麼緣故?
Private Sub tvIGD_DragDrop(Source As Control, x As Single, y As Single)
'If no Node is highlighted then get out
If tvIGD.DropHighlight Is Nothing Then
bDropFlag = False

vbqa 發表在 痞客邦 留言(0) 人氣()

理論上 ... 物件DradDrop後位置應該就是拖曳時的外框的位置,但實際上卻都有差距. 請問應該如何修正? 謝謝 !

vbqa 發表在 痞客邦 留言(2) 人氣()

我是一個初學VB的新手,有一個問題想請教各位
我想在程式一開始執行就秀出文字檔的內容要如何做
且需把該內容存入一的自訂的變數中
下面是部分程式碼:
Private Sub MAC_DragDrop(Source As Control, X As Single, Y As Single)

vbqa 發表在 痞客邦 留言(5) 人氣()

"請問Form1 裡面的frame1 裡面的一個 textBox的數字要怎麼傳送到 Form2 裡面的另
一個Frame 裡面的textBox去?!
我舉例好了~~
1)在form1中裡面的一個 frame 裡面我放一個 textBox 設為txtDog
2)現在我想要Form1\frame1\txtDog.text = 10 可以傳送到

vbqa 發表在 痞客邦 留言(1) 人氣()

我用陣列產生圖示資料並將它拖曳至picturebox中但無法將拖曳的結果列印出來,把程式post如下:
Private Sub Command1_Click()
Printer.PaintPicture Picture1.Image, 0, 0, Picture1.Width, Picture1.Height
Printer.EndDoc
End Sub

vbqa 發表在 痞客邦 留言(0) 人氣()

DragDrop event 只能用在同一個Form 上的物件嗎?
如果要Drag一個Form上的物件到另一個Form上應該如何處理?

vbqa 發表在 痞客邦 留言(0) 人氣()

1
Blog Stats
⚠️

成人內容提醒

本部落格內容僅限年滿十八歲者瀏覽。
若您未滿十八歲,請立即離開。

已滿十八歲者,亦請勿將內容提供給未成年人士。