VB.NET沒用過
創新互聯于2013年創立,先為南崗等服務建站,南崗等地企業,進行企業商務咨詢服務。為南崗企業網站制作PC+手機+微官網三網同步一站式服務解決您的所有建站問題。
VB6的話用form.circle方法畫圓,圓的半徑和圓點用form.width或者form.height乘以比例數來得到,然后在form_resize事件中重畫圓就可以了
不知道和VB.NET差別大不大
'我給你找到了,設置region屬性就可
Private?Sub?PictureBox1_DoubleClick(sender?As?System.Object,?e?As?System.EventArgs)?Handles?PictureBox1.DoubleClick
If?PictureBox1.Region?Is?Nothing?Then
Dim?path?As?New?System.Drawing.Drawing2D.GraphicsPath
path.AddEllipse(0,?0,?200,?200)
PictureBox1.Region?=?New?Region(path)
Else
PictureBox1.Region?=?Nothing
End?If
End?Sub
'這個雙擊圖片框使其變形,通過GraphicsPath對象可以作出各種形態來,比如可作出文字形狀
Dim?stringText?As?String?=?"我是誰"
Dim?family?As?New?FontFamily("Arial")
Dim?myfontStyle?As?Integer?=?CInt(FontStyle.Italic)
Dim?emSize?As?Integer?=?86
Dim?origin?As?New?Point(20,?20)
Dim?format?As?StringFormat?=?StringFormat.GenericDefault
path.AddString(stringText,?family,?myfontStyle,?emSize,?_
origin,?format)
PictureBox1.Region?=?New?Region(path)
記得VB6當中有Shape控件,但是VB.net里這個控件不存在了。
提個思路:使用Picture控件或Label控件,通過代碼在控件里繪圖想要的圖形,可以試試。