这种代码应该如何写呢？

snryga

我设置了个选项卡共3页，如何再选择第3页时，在主窗体上显示“第3页的相关说明”，选择第1、第2页时则不显示。

tmtony

在 选卡控件的 change事件上里写
如果 选卡控件.value=2 (表明是第3页）
if 选卡控件.value=2  then
   ‘加上你的代码。
end if

snryga

实了一下不行呢！麻烦帮忙改一下呢？

Henry D. Sy

snryga 发表于 2017-9-1 15:10
实了一下不行呢！麻烦帮忙改一下呢？

主窗体与子窗体你想如何联动?

Henry D. Sy

snryga 发表于 2017-9-1 15:10
实了一下不行呢！麻烦帮忙改一下呢？

问题1

1. Private Sub 选项卡控件0_Change()
   
2.     Me.Label14.Visible = Me.选项卡控件0 = 2
   
3. End Sub
   

复制代码

Henry D. Sy

Henry D. Sy 发表于 2017-9-1 15:33
主窗体与子窗体你想如何联动?

如果是选择子窗体记录时,主窗体显示子窗体对应的数据
那请在子窗体的窗体成为当前事件中赋值

1. Private Sub Form_Current()
   
2.     Me.Parent.序号 = Me.序号
   
3.     Me.Parent.名称 = Me.名称
   
4.     Me.Parent.地址 = Me.地址
   
5.     Me.Parent.备注 = Me.备注
   
6. End Sub

复制代码

snryga

已搞好了，非常感谢

snryga

又出新问题，以下代码可否优化？
Private Sub Form_Current()
    Me.Parent.序号 = Me.序号
    Me.Parent.名称 = Me.名称
    Me.Parent.地址 = Me.地址
    Me.Parent.备注 = Me.备注
End Sub


为什么每次选择子窗体记录时屏幕闪得很历害。