1. 问题描述:
运行程序,选择客房类型,输入房间号的起始值和结果值,单击“开始生成”按钮,系统会自动生成客房基本信息填入客房信息表中。效果如图:
2. 问题的解决方案:
利用For循环语句和insert实现自动生成客房基本信息
四、 主要技术问题的描述:
1. 新建一个项目文件,创建一个新表单
2. 在表单中添加label控件、 text控件、 Image控件 CommandGroup控件和Spinner控件
3. 创建数据库名称为“Database”,新建数据表名称分别为“客房信息表”和“客房类型表”
4. 编写相关的程序代码
大致图形
客房类型[ ] 价格[ ]
房间号[ ]至[ ]
配置[ ]
开始生成 退出系统
数据如下
客房信息表
房间号 房间类型 价格 房态 配置
普房-0001 普房 77.0000 空房 电视、电话
普房-0002 普房 77.0000 空房 电视、电话
普房-0003 普房 77.0000 空房 电视、电话
普房-0004 普房 77.0000 空房 电视、电话
客房类型表
类型编号 客房类型 价格
LX00001 普房 77.0000
LX00002 标房 127.0000
LX00003 套房 227.0000
LX00004 双人间 277.0000
LX00005 总统套房 340.0000
看书看不懂,做出了大致框架,数据联系不上去,那些程序代码做不好,总是语法错误或者不能识别的命令谓词
急!求VF高手帮忙,一个表单click事件的问题
thisform.text1.value=a thisform.text2.value=b 应为: A=thisform.text1.value B=thisform.text2.value case this.value=1 不明白什么意思? 这是Command 的click事件,COMMAND没有value属性。改成:Case ThisForm.Optiongroup1.Value=1 后面的CASE都需要改。
求软件技术和VF的高手帮帮忙 设某循环队列的容量为50,如果头指针front=...
用“尾指针减去头指针”,如为负数则加上容量即可!即10-45+50=15。解析:队空的时候front=rear=0;队列元素从队尾入队,从队头出队!front=45说明出队的元素是45个,rear=10说明入队的元素是10个,入队的减去出队的明显是负数-35,不合常理,所以队列原本里面是满的即容量50,50-45+10即是15...
关于VF的几个程序语言,望高手帮忙!!(紧急会追加分)
1.select sum(基本工资),max(工资),min(工资)from 职工工资表
VF程序设计:一个三位数的个、十、百位数的立方和等于这个数本身,求这个...
答案为:153,370,371,407共4个 代码如下 FOR i=100 to 999 a=ALLTRIM(STR(i))FOR j=1 to 3 k=ALLTRIM(STR(j))c&k=SUBSTR(a,j,1)ENDFOR c=VAL(c1)^3+VAL(c2)^3+VAL(c3)^3 IF c=i MESSAGEBOX("这个数为:"+alltrim(STR(i)))ENDIF ENDFOR ...
跪求VF高手帮忙写几个代码啊!~~
1 input "输入下界" to xj input "输入上界" to sj js=0 os=0 for i=xj to sj if i\/2=int(i\/2)os=os+1 else js=js+1 endif endfor ? '奇数的个数:'+str(js)? '偶数的个数'+str(os)2 input "输入一个正整数" to zz zz=alltrim(str(zz))ws=len(zz)s=0 for i=1 ...
我用VF编辑报表程序,如何通过表单调用日报表\\月报表\\季报表\\年报表_百 ...
设置当前表单dQsrq的值 ...ENDWITH Ctod 字符转日期函数 ALLTRIM 去除前后空格 STR 数字转字符 Sdate.Year Sdate.month Sdate.day 起始年月日 Edate.Year Edate.month ESdate.day 终止年月日 Do Form 表单1 With Thisform.dQsrq,Thisform.dZzrq 执行表单1,并将日期传入表单 ...
帮忙看看这道VF 题 编程序求出k.DBF最后8个记录中每个记录kc1到kc10...
nadd=0 nmax=0 go bottom for i=1 to 8 for j=1 to 10 a="kc"+alltrim(str(j))a(i,j)=&a endfor skip -1 endfor for l=1 to 8 for k=1 to 9 if a(l,k)>a(l,k+1)nmax=a(l,k)a(l,k)=a(l,k+1)a(l,k+1)=nmax endif endfor nadd=nadd+nmax^2 endfor...
用VF、VB和C语言编系统哪个更好?谢谢了,大神帮忙啊
推荐VF,因为VF做小型数据库最合适不过了。 当然也可以用VB结合ACCESS来做数据库,VB开发前台界面,用Access数据引擎保存数据。 C语言做数据库编程一般要结合SQL数据库作为后台。 后两条路对初学者都有一定的难度,不推荐。
求助vf编程题,在纸中央打印出五行五列由星号组成的正方形,请高手帮忙...
Clear FOR i =1 to 20 ?ENDF FOR i= 1 to 5 ??space(40)FOR j= 1 to 5 ??"* "ENDFOR ?ENDF
谁能帮忙详细解释下vf 很想多了解些。谢谢!!
在到这里看一下全部讲VF,包你满意 http:\/\/tech.163.com\/special\/t\/000915SU\/ttupfoxpro.html