扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
这是6.0的方法:
站在用户的角度思考问题,与客户深入沟通,找到玉州网站设计与玉州网站推广的解决方案,凭借多年的经验,让设计与互联网技术结合,创造个性化、用户体验好的作品,建站类型包括:成都做网站、网站设计、企业官网、英文网站、手机端网站、网站推广、域名注册、虚拟主机、企业邮箱。业务覆盖玉州地区。
用
先在每个窗体上画一个“下一步”按钮
然后用
窗体名称.Show的方法
切换窗体
例如:
Form1.show
就可以激活Form1窗体
全局变量建议定义在模块(Moudle)中
建立模块的方法是单击菜单
【工程】|【添加模块】命令添加
然后用
Public 变量 As 类型
语句来定义全局变量
Public关键字也可以用Global代替
两者的作用一样
补充:比如流程是这样的(VB6.0版)
Form1-Form2-Form3-FormEnd
在每个窗体上画一个Command按钮
命名为cmdNext
然后在cmdNext_Click事件中添加代码:
Form1:
Private Sub cmdNext_Click()
Form2.show
unload me
end Sub
Form2:
Private Sub cmdNext_Click()
Form3.show
unload me
end Sub
Form3:
Private Sub cmdNext_Click()
FormEnd.show
unload me
end Sub
FormEnd:
Private Sub cmdNext_Click()
END
end Sub
其他的自己加上就行了
方法如下:
每个form上都放一个timer,设置其interval属性=2000
加入有3个form
在第一个form1的代码框中写如下代码:
Option Explicit
Private Sub Form_Activate()
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Form1.Hide
Form2.Show
Timer1.Enabled = False
End Sub
第二个form2如下:
Option Explicit
Private Sub Form_Activate()
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Form2.Hide
Form3.Show
Timer1.Enabled = False
End Sub
第3个form3,如下:
Option Explicit
Private Sub Form_Activate()
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Form3.Hide
Form1.Show
Timer1.Enabled = False
End Sub
若需要更多窗体,请参照上面的例子进行修改!
1、如果不用用户控件,那就用Panel,单击按钮时显示相应的Panel,隐藏不相关的Panel。
2、E死了:
ADD按钮的Click事件:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'要先新建一个Form2窗口,里面有一个文本输入框TextBox1和一个按钮Button1。
Form2.Show() '打开编辑窗口。
End Sub
Form2窗口的Button1按钮事件Click:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text "" Then '当TextBox1的类容不为空时。
Form1.ListView1.Items.Add(TextBox1.Text)'把TextBox1的类容添加到ListView中。
Me.Close()'添加完后关闭窗口。
Else ’Else,如果为空。
Dim k = MsgBox("类容为空!" Chr(10) "是否取消添加?", vbYesNo)'提醒用户是否取消向ListView添加类容。
If k = vbYes Then '用户点击确认时。
Me.Close() '取消操作。
End If
End If
End Sub
新建Form2只要点“项目”“添加Windows窗体”,在弹出的对话框中的“名称”写为“Form2.vb”,再“创建”,就行了。之后在里面添加相应的用户控件。
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流