两个frm之间如何传参数?简单问题。立等给分 faint,先把值保存为全局变量..... 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在frmA中定义 Public valueA as string 在frmB中调用 x=frmA.valueA 不要关闭FRMA,使用FRMA.HIDE,取值后再UNLOAD 在FrmA.Unload前把变量存在FrmB.tag中 设置valueA为Public变量在frmB中调用frmA.valueA 用DDE吧!把FORM、TEXTBOX中关于DDE的设置一下就行了。顺便送你一MSDN的例子:LinkItem、LinkMode、LinkTopic 属性示例在这个例子中,每一次敲击鼠标都会使 Microsoft Excel 工作单中的单元更新 Visual Basic 的 TextBox 控件的内容。要试用此例,必须启动 Microsoft Excel,打开一个新的名叫 Sheet1 的工作单,在第一列中放入一些数据。在 Visual Basic 中,创建一个有 TextBox 控件的窗体。把代码粘贴到声明部分,然后按 F5 键运行该程序。Private Sub Form_Click () Dim CurRow As String Static Row ' 工作单的行数. Row = Row + 1 ' 增加行. If Row = 1 Then ' 只第一次. ' 确保连接不是活动的. Text1.LinkMode = 0 ' 设置应用程序的名字和题目名. Text1.LinkTopic = "Excel|Sheet1" Text1.LinkItem = "R1C1" ' 设置 LinkItem. Text1.LinkMode = 1 ' 设置 LinkMode 为自动. Else ' 在数据项目中更新行. CurRow = "R" & Row & "C1" Text1.LinkItem = CurRow ' 设置 LinkItem. End IfEnd Sub 请用dim codeword as string Public Property Let KeyString(sKeyString As String) CodeWord = sKeyStringEnd Propertyform2中调用form1.keystring = "aaa" 把formA的变量设置为全局的。在formB中就可以引用了,如下:x=formA.变量并且和formA是否被UNLOAD也没有关系的。 方法很多, 一般是, 在 模块中 定义一个全局变量 来保存 这个 valueA即 在模块中定义 Public valueA As String 方法很多, 一般是, 在 模块中 定义一个全局变量 来保存 这个 valueA即 在模块中定义 Public valueA As String 嘿嘿,的解有很多解决方法。但就已知解答来说。都并不十分满意,gump2000(阿甘)的方法总是很有新意的。学了一招。还有什么方法? 用VB怎么编写程序接受单片机发送过来的数据 如何在vb里面用c的数组指针 关于手动输入和条码枪输入的互换问题 如何设置VB工程文件为只读属性??? 刚装完VB2005,界面很漂亮,喜欢呐~~~~~ 初学简单小问题1 IE地址拦截 如何将文件中的一部分内容修改? 送分100分:如何处理SQL语句包含的多个变量包含空值的情况。 从串口中读出数据(数据流)用什么函数可以在缓存中去除没有用的数据??? 小问题?inputbox? 在Vb中实现图片的任意角度的旋转旋转(满屏的大图片)?
Public valueA as string
在frmB中调用
x=frmA.valueA
在frmB中调用frmA.valueA
顺便送你一MSDN的例子:
LinkItem、LinkMode、LinkTopic 属性示例
在这个例子中,每一次敲击鼠标都会使 Microsoft Excel 工作单中的单元更新 Visual Basic 的 TextBox 控件的内容。要试用此例,必须启动 Microsoft Excel,打开一个新的名叫 Sheet1 的工作单,在第一列中放入一些数据。在 Visual Basic 中,创建一个有 TextBox 控件的窗体。把代码粘贴到声明部分,然后按 F5 键运行该程序。Private Sub Form_Click ()
Dim CurRow As String
Static Row ' 工作单的行数.
Row = Row + 1 ' 增加行.
If Row = 1 Then ' 只第一次.
' 确保连接不是活动的.
Text1.LinkMode = 0
' 设置应用程序的名字和题目名.
Text1.LinkTopic = "Excel|Sheet1"
Text1.LinkItem = "R1C1" ' 设置 LinkItem.
Text1.LinkMode = 1 ' 设置 LinkMode 为自动.
Else
' 在数据项目中更新行.
CurRow = "R" & Row & "C1"
Text1.LinkItem = CurRow ' 设置 LinkItem.
End If
End Sub
CodeWord = sKeyString
End Propertyform2中调用
form1.keystring = "aaa"
在formB中就可以引用了,如下:
x=formA.变量并且和formA是否被UNLOAD也没有关系的。
即 在模块中定义 Public valueA As String
即 在模块中定义 Public valueA As String
gump2000(阿甘)的方法总是很有新意的。学了一招。
还有什么方法?