如有
Lable1
Lable2
Lable3
Picture1
vbqa 發表在 痞客邦 留言(2) 人氣(62)
Private Sub Form_Load()
List1.AddItem "aaaaa"
List1.AddItem "bbbb"
List1.AddItem "ccccc"
List1.AddItem "dddddd"
vbqa 發表在 痞客邦 留言(0) 人氣(42)
以下是在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) 人氣(40)
理論上 ... 物件DradDrop後位置應該就是拖曳時的外框的位置,但實際上卻都有差距. 請問應該如何修正? 謝謝 !
vbqa 發表在 痞客邦 留言(2) 人氣(17)
"請問Form1 裡面的frame1 裡面的一個 textBox的數字要怎麼傳送到 Form2 裡面的另
一個Frame 裡面的textBox去?!
我舉例好了~~
1)在form1中裡面的一個 frame 裡面我放一個 textBox 設為txtDog
2)現在我想要Form1\frame1\txtDog.text = 10 可以傳送到
vbqa 發表在 痞客邦 留言(1) 人氣(15)
我用陣列產生圖示資料並將它拖曳至picturebox中但無法將拖曳的結果列印出來,把程式post如下:
Private Sub Command1_Click()
Printer.PaintPicture Picture1.Image, 0, 0, Picture1.Width, Picture1.Height
Printer.EndDoc
End Sub
vbqa 發表在 痞客邦 留言(0) 人氣(130)
DragDrop event 只能用在同一個Form 上的物件嗎?
如果要Drag一個Form上的物件到另一個Form上應該如何處理?
vbqa 發表在 痞客邦 留言(0) 人氣(24)