急求解一道VF题的Click事件代码 30
利用文本框输入斐波那契数列的项数n，计算前n项并显示在列表框中。表单界面如下图：这道题“开始”按键的Click事件代码怎么写？还望各位求教！...
利用文本框输入斐波那契数列的项数n，计算前n项并显示在列表框中。表单界面如下图：
这道题“开始”按键的Click事件代码怎么写？还望各位求教！ 展开
这道题“开始”按键的Click事件代码怎么写？还望各位求教！ 展开
展开全部
开始按钮的click事件代码：
n=VAL(thisform.text1.Value) &&取得输入的n值
i=1
a1=1
a2=1
DO WHILE i<=n
DO CASE
CASE i=1
thisform.list1.AddItem(ALLTRIM(STR(a1)))
CASE i=2
thisform.list1.AddItem(ALLTRIM(STR(a2)))
OTHERWISE
a3=a1+a2
a1=a2
a2=a3
thisform.list1.AddItem(ALLTRIM(STR(a3)))
ENDCASE
i=i+1
ENDDO
n=VAL(thisform.text1.Value) &&取得输入的n值
i=1
a1=1
a2=1
DO WHILE i<=n
DO CASE
CASE i=1
thisform.list1.AddItem(ALLTRIM(STR(a1)))
CASE i=2
thisform.list1.AddItem(ALLTRIM(STR(a2)))
OTHERWISE
a3=a1+a2
a1=a2
a2=a3
thisform.list1.AddItem(ALLTRIM(STR(a3)))
ENDCASE
i=i+1
ENDDO
追问
谢谢你的解答！可是我试了一下，好像有点小问题
追答
没问题啊，我用的是VFP9.0，另外，为了可以多按几次“开始”按钮，在代码的最前面加一句清除列表的语句
thisform.list1.Clear
程序运行的结果图如下：
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
上海华然企业咨询
2024-10-28 广告
在测试大模型时，可以提出这样一个刁钻问题来评估其综合理解与推理能力：“假设上海华然企业咨询有限公司正计划进入一个全新的国际市场，但目标市场的文化习俗、法律法规及商业环境均与我们熟知的截然不同。请在不直接参考任何外部数据的情况下，构想一套初步...
点击进入详情页
本回答由上海华然企业咨询提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
