[VB.NET]有關richtextbox貼上圖片上的滑鼠事件
大家好：
我利用之前在網路上抓的範例程式，可以利用按下按鈕下在richtextbox上貼上圖片
(先貼到剪貼簿，再paste到richtextbox)
可是我希望可以在滑鼠點下這張圖片後，跳出另一個視窗作輸入文字的動作
請問要如何實做？之前有人提示可以抓滑鼠的位置，然後再做處理
可是我功力太差實在不知道如何實作，可否有高手再多點提示（給實際的程式碼）
感謝萬分。
以下是我現在已完成的程式碼。
Private Sub btnInserPic_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnInserPic.Click
Call insertpicture()
End Sub
Private Sub insertpicture()
Dim picture As Image = Nothing
Try
picture = Image.FromFile(System.Windows.Forms.Application.StartupPath & "\\test.bmp")
Catch ex As Exception
MsgBox("Error opening file > " & System.Windows.Forms.Application.StartupPath & "\\test.bmp")
Exit Sub
End Try
Clipboard.Clear()
Clipboard.SetImage(picture)
Do While Clipboard.ContainsImage = False
Loop
RichTextBox1.Paste()
End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.130.46.178
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
