Vb.net 在VB中添加不同的表单
我不熟悉使用VB。我确信有一种方法可以实现我所期待的,但我只是不确定如何实现 表格1 x=6+8 表格2 y=8+7Vb.net 在VB中添加不同的表单,vb.net,vba,Vb.net,Vba,我不熟悉使用VB。我确信有一种方法可以实现我所期待的,但我只是不确定如何实现 表格1 x=6+8 表格2 y=8+7 label1.text = x + y 不确定如何将x值从表格1传送到表格2 (将x声明为公共整数) 而且每次我运行我的程序时x值都会改变,所以我不能在模式中声明它的值。。。我不这么认为 基本上计时器开始倒计时 -点击停止按钮,将当前时间添加到标签 -进入下一个表格 -在下一个表单上,如何使标签显示与表单1中标签相同的值?在模块写入上创建模块 Dim x As Integer
label1.text = x + y
不确定如何将x值从表格1传送到表格2
(将x声明为公共整数)
而且每次我运行我的程序时x值都会改变,所以我不能在模式中声明它的值。。。我不这么认为
基本上计时器开始倒计时
-点击停止按钮,将当前时间添加到标签
-进入下一个表格
-在下一个表单上,如何使标签显示与表单1中标签相同的值?在模块写入上创建模块
Dim x As Integer = 0 'or double, depending on your datatype
Dim y As Integer = 0
Dim res As Integer = 0
Public Sub setVar(ByVal var1 As Integer, Byval Var2 As Integer, ByVal whatVar As String)
If whatVar = "y" Then
y = var1 + var2
ElseIf whatVar = "x" Then
x = var1 + var2
End If
End Sub
Public Function getResult() As Integer
res = x + y
return res
End Function
用法:
在表格1中
setVar(6,8, "x")
在表格2上
setVar(8,7,"y")
在标签上
label1.Text = getResult().ToString
尚未测试代码,但它应该可以工作:)