VB要求常数表达式我在VB的form1中声明Private Const ScrnWidth = 100Private Const ScrnHight = 90可是我想把100换成form2.text1.text90换成form2.text2.text这时就发生发生错误了,VB提示要求常数表达式,怎样才可以调
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/28 07:05:17
![VB要求常数表达式我在VB的form1中声明Private Const ScrnWidth = 100Private Const ScrnHight = 90可是我想把100换成form2.text1.text90换成form2.text2.text这时就发生发生错误了,VB提示要求常数表达式,怎样才可以调](/uploads/image/z/4622056-16-6.jpg?t=VB%E8%A6%81%E6%B1%82%E5%B8%B8%E6%95%B0%E8%A1%A8%E8%BE%BE%E5%BC%8F%E6%88%91%E5%9C%A8VB%E7%9A%84form1%E4%B8%AD%E5%A3%B0%E6%98%8EPrivate+Const+ScrnWidth+%3D+100Private+Const+ScrnHight+%3D+90%E5%8F%AF%E6%98%AF%E6%88%91%E6%83%B3%E6%8A%8A100%E6%8D%A2%E6%88%90form2.text1.text90%E6%8D%A2%E6%88%90form2.text2.text%E8%BF%99%E6%97%B6%E5%B0%B1%E5%8F%91%E7%94%9F%E5%8F%91%E7%94%9F%E9%94%99%E8%AF%AF%E4%BA%86%2CVB%E6%8F%90%E7%A4%BA%E8%A6%81%E6%B1%82%E5%B8%B8%E6%95%B0%E8%A1%A8%E8%BE%BE%E5%BC%8F%2C%E6%80%8E%E6%A0%B7%E6%89%8D%E5%8F%AF%E4%BB%A5%E8%B0%83)
VB要求常数表达式我在VB的form1中声明Private Const ScrnWidth = 100Private Const ScrnHight = 90可是我想把100换成form2.text1.text90换成form2.text2.text这时就发生发生错误了,VB提示要求常数表达式,怎样才可以调
VB要求常数表达式
我在VB的form1中声明
Private Const ScrnWidth = 100
Private Const ScrnHight = 90
可是我想把
100换成form2.text1.text
90换成form2.text2.text
这时就发生发生错误了,VB提示要求常数表达式,怎样才可以调用到form2.text1.text的信息呢,VB小菜鸟,
按照 LuoJi_1995 的方法,VB在 Private ScrnWidth = form2.text1.text 那里提示缺少语句结束.
温暖阳阳 的意思是 Private Const ScrnWidth = Val(Form2.Text3.Text) 这样吗,可还是不可以啊.
VB要求常数表达式我在VB的form1中声明Private Const ScrnWidth = 100Private Const ScrnHight = 90可是我想把100换成form2.text1.text90换成form2.text2.text这时就发生发生错误了,VB提示要求常数表达式,怎样才可以调
不行!
如果你要用用户将来输入的量来做“常数”,那是不对的.因为那已经不是常数,而是“变量”了.
建议,设立窗体级变量.
在最前面声明:
dim ScrnWidth as single,ScrnHight as single
后面有两种方案:一个是填写文本框的同时,就改变这个变量;二一个是填写完,点“确定”按钮,再改变.我推荐后者,因为这个符合多数软件的操作习惯.
Private Sub Command1_Click()
ScrnWidth = Val(text1)
ScrnHight = Val(text2)
End Sub
当然看样子,你主要是用来改变什么控件的尺寸?那么也可以直接不要这些变量(包括前面的声明),
Private Sub Command1_Click()
控件.Width = Val(text1)
控件.Hight = Val(text2)
End Sub