标题:vfp怎么让页框的第二页作为首页以及表单空白问题
只看楼主
隔壁的土豆
Rank: 1
等 级:新手上路
帖 子:45
专家分:0
注 册:2013-11-27
结帖率:100%
已结贴  问题点数:10 回复次数:22 
vfp怎么让页框的第二页作为首页以及表单空白问题
首先:    是这样的,我做了个菜单,我想让某一菜单能调出该表单并且让该表单里的页框中的第二页作为首页,
          在菜单里的过程代码中应该怎么编写?


另外:
              if thisform.check3.value =1
                  replace 课程与成绩管理 with .t.
              else
                  replace 课程与成绩管理 with .f.
              endif
      换成   replace 课程与成绩管理 with thisform.check3.value 就错了, 但是为什么这句话是错误的? 难道VFP不能把数字直接换成逻辑值么?


最后:     我想问怎么能让表单不要显示空白?
   
        经过前辈的指点,只要在  修改或者添加 前写上   
        thisform.grid1.recordsource = null  在修改或者添加后 写
        thisform.grid1.recordsource = "表"
        thisfrom.refresh
       就好了,我试过后发现,嘿,真的不空白了,但是!

       表单里只能存储一个记录了。无论我添加多少个,表中只显示最新添加的记录


      求各位前辈指点,尽量告诉我方法我一个个试就好,如果需要讲解原理的话。。。尽量减少专业术语。。。
      
        还想问一个问题,combo1 里头的所有内容应该是它的什么属性?
     我想让combo1里的内容能随着combo2.value而变化   
  ???(应该写什么) = "select 班级 from 班级管理 where 系别 = alltrim()"

   这句话对不对呢?
搜索更多相关主题的帖子: 课程 replace 
2013-11-29 22:52
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:4 
主 次 关 系

坚守VFP最后的阵地
2013-11-29 23:01
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
第二页做为首页:
表单的INIT事件
THISFORM.PAGEFRAME1.ACTIVEPAGE=2

什么叫表单空白?

坚守VFP最后的阵地
2013-11-29 23:05
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
得分:4 
表单不要显示空白?
2013-11-30 08:01
bccn0906
Rank: 9Rank: 9Rank: 9
来 自:广州
等 级:蜘蛛侠
威 望:2
帖 子:414
专家分:1183
注 册:2013-10-16
得分:4 
以下是引用隔壁的土豆在2013-11-29 22:52:03的发言:

              if thisform.check3.value =1
                  replace 课程与成绩管理 with .t.
              else
                  replace 课程与成绩管理 with .f.
              endif  
      换成   replace 课程与成绩管理 with thisform.check3.value 就错了, 但是为什么这句话是错误的? 难道VFP不能把数字直接换成逻辑值么?
 
初始CHECK3的值,让它成为逻辑型
这样就可以 replace 课程与成绩管理 with thisform.check3.value
2013-11-30 08:02
bccn0906
Rank: 9Rank: 9Rank: 9
来 自:广州
等 级:蜘蛛侠
威 望:2
帖 子:414
专家分:1183
注 册:2013-10-16
得分:0 
以下是引用隔壁的土豆在2013-11-29 22:52:03的发言:

        
        还想问一个问题,combo1 里头的所有内容应该是它的什么属性?
     我想让combo1里的内容能随着combo2.value而变化   
  ???(应该写什么) = "select 班级 from 班级管理 where 系别 = alltrim()"
 
   
尽可能用临时表作为 combo1数据源,改变临时表的内容即可
----------------------------
如: 在combo1 中init的代码:
select 班级 from 班级管理 into cursor t1 READWRITE where .f.
this.RowSourceType= 2
this.RowSource='t1'
-----------------------
在combo2中的InteractiveChange的代码:
zap in t1
insert into t1 (班级) select 班级 from 班级管理 where allt(系别)==allt(this.value)




2013-11-30 08:26
bccn0906
Rank: 9Rank: 9Rank: 9
来 自:广州
等 级:蜘蛛侠
威 望:2
帖 子:414
专家分:1183
注 册:2013-10-16
得分:0 
以下是引用隔壁的土豆在2013-11-29 22:52:03的发言:

 
最后:     我想问怎么能让表单不要显示空白?
   
        经过前辈的指点,只要在  修改或者添加 前写上   
        thisform.grid1.recordsource = null  在修改或者添加后 写
        thisform.grid1.recordsource = "表"
        thisfrom.refresh
       就好了,我试过后发现,嘿,真的不空白了,但是!
 
       表单里只能存储一个记录了。无论我添加多少个,表中只显示最新添加的记录
grid在设计时就绑定了数据表,运行时就不要改动了,有个特别注意的地方就是,期间不要对数据表使用 PACK 命令或关闭数据表,如是这样就会出现你所说的空白,
表有多少记录,都会显示的,你试下
select 表
go top
thisform.Refresh
2013-11-30 08:37
隔壁的土豆
Rank: 1
等 级:新手上路
帖 子:45
专家分:0
注 册:2013-11-27
得分:0 
回复 3楼 sdta
额。。不好意思,打太多字打晕了,是表格变空白了
2013-11-30 08:43
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
得分:0 
以下是引用隔壁的土豆在2013-11-30 08:43:04的发言:

额。。不好意思,打太多字打晕了,是表格变空白了
只一字之差嘛
2013-11-30 09:20
隔壁的土豆
Rank: 1
等 级:新手上路
帖 子:45
专家分:0
注 册:2013-11-27
得分:0 
以下是引用sdta在2013-11-29 23:05:44的发言:

第二页做为首页:
表单的INIT事件
THISFORM.PAGEFRAME1.ACTIVEPAGE=2

什么叫表单空白?



管用!谢谢!
2013-11-30 09:56



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-424433-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.962526 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved