level 1
设计如图所示的文体框,背景色为粉色、无边、平板效果。要求无论窗体大小怎么变化,文本框都居在窗体的上下左右中央。求教。。。
2007年11月15日 01点11分
1
level 0
在Form_Resize事件中写代码就行了text1.left=.....text1.top=.....
2007年11月15日 01点11分
3
level 0
我就是不知道等号后面该写的是哪个啊。。前面的我都知道了。。
2007年11月15日 01点11分
4
level 1
Private Sub Form_Resize() Text1.Left = (Me.ScaleWidth - Text1.Width) / 2 Text1.Top = (Me.ScaleHeight - Text1.Height) / 2End Sub
2007年11月15日 12点11分
5
level 7
'添加Text1文本框Private Sub Form_Load() Text1.BorderStyle = 0 Text1.BackColor = &HFF80FFEnd SubPrivate Sub Form_Resize() Text1.Left = (Me.ScaleWidth - Text1.Width) / 2 Text1.Top = (Me.ScaleHeight - Text1.Height) / 2End Sub
2007年11月16日 04点11分
6