VB-textbox控件问题
首先新建一个textbox控件,在form_load中先初始化textbox的text属性为“Microsoft Visual Basic 6.0”,如何书写代码,让“Microsoft Visual Basic 6.0”处于不可编辑状态,但是还是可以textbox控件内写入内容?
首先新建一个textbox控件,在form_load中先初始化textbox的text属性为“Microsoft Visual Basic 6.0”,如何书写代码,让“Microsoft Visual Basic 6.0”处于不可编辑状态,但是还是可以textbox控件内写入内容?
答案:这个有点复杂。
选择菜单“工程”--“部件”,然后选中Microsoft Forms 2.0 Object Library项,确定
在控件中选择新增加的textbox控件(名称为text1),在窗体上画上一个文本框,把该文本框的属性BackStyle设为0
画一个标签(名称为Label1)在窗体上,设置它的AutoSize发生为true。
然后输入以下代码:Private Sub Form_Load()
Label1.FontSize = 10.5
Label1.FontBold = True
Label1.Caption = "Microsoft Visual Basic 6.0"
Label1.Move (Me.ScaleWidth - Label1.Width) / 2, (Me.ScaleHeight - Text1.Height) / 2
Text1.Move Label1.Left - 200, Label1.Top - 30
Text1.Width = Label1.Width + 300
Text1.Text = vbCrLf
End Sub
上一个:vb多用户登录代码
下一个:怎样用VB写移动文本框