ariel_au
March 31st, 2001, 09:08 AM
i have 2 forms named "frmMain" and "frmCustom".
'in frmMain
option Explicit
' Global variables hold the total number of columns and rows
private TotalCols as Integer
private TotalRows as Integer
private Sub Form_Load()
TotalCols = frmCustomField.CWidth
TotalRows = frmCustomField.CHeight
End Sub
--------------------------------------------------------------
' in frmCustom
option Explicit
private Sub cmdOk_Click()
Dim CHeight as Integer, CWidth as Integer
CHeight = Val(txtHeight.Text)
CWidth = Val(txtWidth.Text)
End Sub
well, the above is part of my project and i have a problem with that.
in frmCustom, i have 2 textboxes named "txtHeight" and "txtWidth" and i want to pass the values in "txtHeight" and "txtWidth" to frmMain. how can i get that?
'in frmMain
option Explicit
' Global variables hold the total number of columns and rows
private TotalCols as Integer
private TotalRows as Integer
private Sub Form_Load()
TotalCols = frmCustomField.CWidth
TotalRows = frmCustomField.CHeight
End Sub
--------------------------------------------------------------
' in frmCustom
option Explicit
private Sub cmdOk_Click()
Dim CHeight as Integer, CWidth as Integer
CHeight = Val(txtHeight.Text)
CWidth = Val(txtWidth.Text)
End Sub
well, the above is part of my project and i have a problem with that.
in frmCustom, i have 2 textboxes named "txtHeight" and "txtWidth" and i want to pass the values in "txtHeight" and "txtWidth" to frmMain. how can i get that?