网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索
vb吧 关注：156,176贴子：1,165,912
  • 5回复贴，共1页

文本框。。。。

设计如图所示的文体框，背景色为粉色、无边、平板效果。要求无论窗体大小怎么变化，文本框都居在窗体的上下左右中央。
求教。。


各位大虾帮帮忙啊。。


快试试吧，
可以对自己使用挽尊卡咯~
◆
◆
在Form_Resize事件中写代码就行了
text1.left=.....
text1.top=.....


快试试吧，
可以对自己使用挽尊卡咯~
◆
◆
我就是不知道等号后面该写的是哪个啊。。前面的我都知道了。


Private Sub Form_Resize()
 Text1.Left = (Me.ScaleWidth - Text1.Width) / 2
 Text1.Top = (Me.ScaleHeight - Text1.Height) / 2
End Sub


'添加Text1文本框

Private Sub Form_Load()
 Text1.BorderStyle = 0
 Text1.BackColor = &HFF80FF
End Sub

Private Sub Form_Resize()
 Text1.Left = (Me.ScaleWidth - Text1.Width) / 2
 Text1.Top = (Me.ScaleHeight - Text1.Height) / 2
End Sub


扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！
  • 5回复贴，共1页
分享到: