Here's one for ya dave.
well runtime error 380
invalid property value
Code:
Public Sub ElementEditorInit()
frmElementEditor.txtName.Text = Trim(Element(EditorIndex).Name)
frmElementEditor.scrlStrong.Value = Element(EditorIndex - 1).Strong
frmElementEditor.scrlWeak.Value = Element(EditorIndex - 1).Weak
frmElementEditor.Show vbModal
End Sub
H8ighlights this.
frmElementEditor.txtName.Text = Trim(Element(EditorIndex).Name)____________________________________________________________
The rest of the code for that part.
Code:
Private Sub scrlStrong_Change()
lblStrong.Caption = Element(scrlStrong.Value).Name
End Sub
Code:
Public Sub ElementEditorOk()
Element(EditorIndex - 1).Name = frmElementEditor.txtName.Text
Element(EditorIndex - 1).Strong = frmElementEditor.scrlStrong.Value
Element(EditorIndex - 1).Weak = frmElementEditor.scrlWeak.Value
Call SendSaveElement(EditorIndex - 1)
Call ElementEditorCancel
End Sub
Code:
Public Sub ElementEditorCancel()
InElementEditor = False
Unload frmElementEditor
End Sub
Someone please help me.
_________________
Fuck? I really joined in 2006.
Spirea, Chat Rooms, Discussions, Help. everything you need in one spot.
http://spirean.comI love my computer, you never ask for more, you can be my princess or be my whore
Login
Register
FAQ
Search
Members
