[RESOLVED] Runtime error '91': Object variable or with block not set

[Ehwenomare]

Please help out with a clue on how to resolve the below problems. I have attached the file for a reference.

1. If i click on the execute button I get a run time error '91' with these lines, which refers to the output forms: frmoffcalculatedoutput.lblanodeperimerter.Caption = anodeperimerter
It worked fine with the onshore form but don't know why is not working with this one.
2. I get runtime error '11': Division by zero with this line in the code:
Select Case cboorientation.Text
Case "Bracelet Anode"
spacingfactor = 1 + (((CDbl(txtenvironmentalresist.Text) * Math.Log(0.66 * numberofanodes))) / (3.142 * anoderesistance * CDbl(txtbanodespacing.Text)))
Case "Slender Sled Anode"
spacingfactor = 1 + (((CDbl(txtenvironmentalresist.Text) * Math.Log(0.66 * numberofanodes))) / (3.142 * anoderesistance * CDbl(txtsanodespacing.Text)))
3. The frame "Framebraceletanode" won't display at run time even though it declared with the below code:
Private Sub cboorientation_GotFocus()
cboorientation.Clear
With cboorientation
.AddItem "Bracelet Anode "
.AddItem "Slender Sled Anode"
End With
End Sub