vb租号
2021-01-10 11:38:19 · 浏览次数：0 来源：U租号网
vb中怎么直接在窗体放加号和等号？
以下代码单击窗体后在鼠标位置创建一个新的textbox。
OptionExplicit
PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
DimTAsObject
StaticNumAsLong
'在本窗体内添加（可以是其他如picturebox等）；第一个参数是要添加的控件，第二个是控
件名
SetT=Me.Controls.Add("VB.textbox","Text"&Num)
'当然还有其他属性一样的设置，如高度宽带等
T.Text="Text"&Num'指定控件文本内容
T.Visible=True'设置控件可见
T.Left=X'设置左边距离
T.Top=Y'设置顶部距离
Num=Num+1'防止控件名重复
EndSub
如果要在其他控件添加，就在第三个参数填上容器
如在picture1里面添加：SetT=Me.Controls.Add("VB.textbox","Text"&Num,Picture1)
游戏租号平台有哪些？
我一般用租号网，不是给他们打广告，只是简单方便，游戏多！每个人爱好不一样，我就不做过多评论