求指点:image当变量为真时显示为假时不显示
Private Sub Form_Load()MyTID = 1 ' Reset Transaction ID
cmdConnect.Value = True
cmdAddGroup.Value = True
CheckGroupActive.Value = 1
cmdAddItem.Value = True
elec1 = 1
Call cmdWriteAsync_Click
Call cmdReadAsync_Click
End Sub
Private Sub txtChangeVal_Change(Index As Integer)
If elec1 = True Then
Im1.Visible = True
Im2.Visible = True
Im4.Visible = True
P2.Enabled = True
P2.Visible = True
Else
Im1.Visible = False
Im2.Visible = False
Im4.Visible = False
P2.Visible = False
End If
End Sub
请教问题:在运行Form_load时elec1为TRUE,Sub txtChangeVal_Change中的IM1 IM2(image)默认不显示,当elec1为TRUE时显示为False时不显示,但这段代码无法实现,请指教下究竟错在哪里?