| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2094 人关注过本帖
标题:[求助]VFP程序设计
取消只看楼主 加入收藏
xfxfxf
Rank: 1
等 级:新手上路
帖 子:37
专家分:0
注 册:2007-9-10
收藏
 问题点数:0 回复次数:5 
[求助]VFP程序设计

编写一个对输入字符进行转换的程序.转换规则为:将大写字母转换成小写,小写转换为大写,空格不转换,其他转换为"*".要求没输入一个字符就进行判断转换.

搜索更多相关主题的帖子: VFP 程序设计 
2007-09-17 16:34
xfxfxf
Rank: 1
等 级:新手上路
帖 子:37
专家分:0
注 册:2007-9-10
收藏
得分:0 
一头雾水
2007-09-17 20:17
xfxfxf
Rank: 1
等 级:新手上路
帖 子:37
专家分:0
注 册:2007-9-10
收藏
得分:0 

我自己写了个
commandgroup1的click事件:
n=this.value
do case
case n=1
thisform.timer1.enabled=.t.
thisform.timer2.enabled=.f.
case n=2
thisform.timer1.enabled=.f.
thisform.timer2.enabled=.t.
endcase
timer1的timer事件:
thisform.text1.value=time()
thisform.label1.caption=""
timer2的timer事件:
t=hour(datetime())
if t>=13
thisform.label1.caption="下午"
if t>=22
thisform.text1.value=allt(t-12)+substr(datetime(),11,6)
else
thisform.text1.value=time()
endif
else
thisform.label1.caption="上午"
thisform.text1.value=time()
endif
运行timer2老出错
错哪了?

2007-09-19 11:28
xfxfxf
Rank: 1
等 级:新手上路
帖 子:37
专家分:0
注 册:2007-9-10
收藏
得分:0 
timer1的timer事件改为
thisform.text1.value=substr(ttoc(datetime()),10,8)
为什么显示12小时制???
2007-09-19 19:36
xfxfxf
Rank: 1
等 级:新手上路
帖 子:37
专家分:0
注 册:2007-9-10
收藏
得分:0 
datetime()是12小时制
当系统时间是下午4点时为什么hour(datetime())是16
2007-09-20 16:22
xfxfxf
Rank: 1
等 级:新手上路
帖 子:37
专家分:0
注 册:2007-9-10
收藏
得分:0 
原来如此  谢谢
2007-09-20 19:40
快速回复:[求助]VFP程序设计
数据加载中...
 
   



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

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