vfp程序與演算法

1. vfp程序題 需要詳細解題思路和過程~~~謝謝謝謝

1：
CLEAR
C="南京大學信息管理系"
FOR I=1 TO LEN(C)/2
IF I%2<>0 && 如果 I 不能被 2 整除
??SUBS(C,2*I-1, 2) && 輸出由 2*I-1 開始的雙位元組字元
ENDIF
ENDFOR

輸出 「南大信管系」

等同：
CLEAR
C="南京大學信息管理系"
FOR I=1 TO LENC(C)
IF MOD(I,2)<>0
??SUBSTRC(C,I, 1)
ENDIF
ENDFOR

2：
FOR n=7 TO 1000 STEP 7 && 以步長 7 進行循環
ch= STR(n) && 先將 n 轉換成字元型
IF "5" $ ch && 如果發現字元型 n 中包含 "5"
?n && 輸出結果
ENDIF
ENDFOR

3：（看不到圖）

4：
CLEAR
cstring= "VisualFoxPro"
nresult=0
m=len(cstring) && 獲得字串 cstring 的長度
FOR n=1 to m
c=SUBSTR(cstring,n,1) && 順序取 cstring 的 1 個字元
IF !BETWEEN(ASC(c), ASC("A"), ASC("Z")) && 如果 非大寫 A—Z
LOOP && 不執行後續語句，繼續循環
ENDIF
&& 如果通過（即 是大寫字母），就計數
nresult=nresult+1
ENDFOR
? nresult && 輸出結果

輸出結果 3
這是一段統計全單位元組字串中大寫字母數的程序

2. vfp 編寫程序1，-1/2，1/4，-1/8，1/16......N的前N項和

clear &&清屏
m=1 &&變數m為通項，首項為1
s=1 &&變數s為和，首項為1
input "n=" to n &&變數n為項數
for i=2 to n &&循環開始
m=m/-2 &&通項演算法（前項乘公比-2）
s=s+m &&和的演算法
endfor &&循環結束
?"和為",s &&顯示結果

3. 用VFP編寫程序 計算從1到100之間的素數和

clear
?"1到100之內的所有素數："
s=0
for i=2 to 100
x=0
for j=2 to i-1
if i/j=int(i/j)
x=1
endif
endfor
if x=0
??alltrim(str(i))+space(2)
s=s+i
endif
endfor
?"它們的和是：",s

4. 什麼是VFP程序設計

Visual FoxPro簡稱是VFP，是Microsoft公司推出的資料庫開發軟體，用它來開發資料庫，既簡單又方便。

Visual FoxPro源於美國Fox Software公司推出的資料庫產品FoxBase，在DOS上運行，與xBase系列相容。

FoxPro原來是FoxBase的加強版，最高版本曾出過2.6之後，Fox Software被微軟收購，加以發展， 使其可以在 Windows 上運行， 並且更名為 Visual FoxPro。

(4)vfp程序與演算法擴展閱讀：

Visual FoxPro 6.0 的特點。

Visual FoxPro 6.0 能夠得到廣泛的使用，這是與其具有的強大的功能分不開的，Visual FoxPro 6.0 與其前期的版本相比，有更高的性能指標和鮮明的特點。

⑴ 提供多種可視化編程工具，最突出的是面向對象編程。

⑵ 在表的設計方面，增添了表的欄位和控制項直接結合的設置。

除此之外，Visual FoxPro 6.0 具有一系列的新特色，如：

① 成功解決了計算機2000年的問題。

② 增強了 Internet 技術和 WWW 資料庫的設計。

③ ActiveX 和向導、生成器及控制項等集成化工具。

④ 新引入了網路圖象文件格式：gif 和 jpeg 。

參考資料來源：網路-visual foxpro

5. vfp編寫一個簡單的程序

set talk off
clear
dime a[30]
a[1]=1
a[2]=1
for i=3 to 30
a[i]=a[i-1]+a[i-2]
endfor
?a[30]
set talk on
cancel
很久沒有搞VF了，不知道源程序對不對演算法思想還是這樣的，我VF還是三年前過前的，以前的編程基礎很好，不過對VF的語法不是很記得了！
上面程序如果對格式有誤你自己更正下！
演算法和思路還是沒有問題的！

6. 用vfp程序實現

主程序:Xa.prg
Xa=0
FOR j=1 to 10
Xa=Xa+Xi(j)
ENDFOR
? Xa

子程序:Xi.prg
PARAMETERS N
X=1
FOR i=1 to N
X=X*i
ENDFOR
RETURN X

命令窗口輸入 do Xa
計算1！+2！+……+10！的值為 4037913

7. VFP程序題： 對一個字元串進行加密，其基本演算法是對字元串每一個字元

?convert('ABC')
RETURN

FUNCTIONconvert
PARAMETERSs
PRIVATEi,l,t
l=len(s)
t=''
FORi=1tol
	t=t+CHR(ASC(SUBSTR(s,i,1))+1)
NEXTi
RETURN(t)

8. 用VFP編寫程序

2、clear
?"1到100之內的所有素數："
s=0
for i=2 to 100
x=0
for j=2 to i-1
if i/j=int(i/j)
x=1
endif
endfor
if x=0
??alltrim(str(i))+space(2)
s=s+i
endif
endfor
?"它們的和是：",s
3、clear
?"1到1000之間所有奇數的和:"
s=0
for i=1 to 1000
if mod(i,2)<>0
s=s+i
endif
endfor
?s
4、command1的click代碼：
if ALLTRIM(thisform.text1.value)="12345".and.alltrim(thisform.text2.value)="abcd"
messagebox("歡迎進入QQ世界")
else
messagebox("你的用戶名或密碼是錯誤的!")
endif
5、1）select * from STUDENT where 入學成績>500
2)select 學號,姓名,專業信息 from STUDENT where substr(alltrim(姓名),1,2)="李"
3)count for 性別="女" to mm
6、CLEAR
SET UDFPARMS TO REFERENCE &&地址傳遞
DIME AAA(10)
FOR i= 1 TO 10
input "請輸入第"+ALLTRIM(STR(i))+"個數：" to AAA(i)
NEXT
=MySort(AAA,10) &&調用冒泡排序函數.
i=1
?"從大到小排序結果為："
do while i<=10
??AAA(i) &&顯示排完序後的數據.
i=i+1
enddo
RETURN

*冒泡排序函數.
*參數: pData: 傳入數組, nCount:數組的大小.
function MySort
para pData, nCount
for i=1 to nCount
for j=nCount to i+1 step -1
if pData(j)>pData(j-1)
iTemp = pData[j-1]
pData(j-1) = pData[j]
pData(j) = iTemp
endif
endfor
endfor
endfunc

9. VFP程序設計（要詳細具體）

內部變數定義的方法
不需要像C一樣，先定義後使用，而是可以隨時定義，且可以改變。它帶來了靈活性，也增大了出現錯誤的可能性。

互動式語句及區別

互動式語句有3個：
（1）格式：wait [提示] to [變數名] [ outtime [秒數]]
功能：等待從鍵盤接收單個字元，輸入字元後不需回車，即賦值給給定名字的變數，如果給出outtime [秒數]選項，等待給定秒數後，即不再等待，繼續執行後繼命令。
（2）格式：accept [提示] to [變數名]
功能：從鍵盤接收一個或多個字元，輸入字元串後，必須以回車結束。只接受字元，輸入的字元串不用加定界符。
（3）格式：input [提示] to [變數名]
功能：從鍵盤接收數字或字元串，輸入後，必須以回車結束。輸入的數值沒有特殊要求，輸入的字元串必須加定界符。
追加記錄的方法

增加一條•瀏覽時，「表」→ 「追加新記錄」或ctrl+y
增加一批•瀏覽時，「表」→ 「增加記錄」
追加命令：append from <表名>
表單中常用的公共屬性

屬性 描述 默認值

Alwaysontop 指定表單是否總是位於其他打開窗口之上 .F.

Autocenter 指定表單初始化時是否自動在VFP主窗口內居中顯示 .F.

Backcolor 指明表單窗口的顏色 默認(255,255，255）
Borderstyle 指明表單邊框風格。默認3,採用系統邊框，大小可變 3

Caption 指明顯示於表單標題欄上的文本 Form1

Closable 指定是否能通過單擊關閉窗或雙擊控制菜單框來關閉表單 .T.

Movable 確定表單是否能夠移動 .T.

Scrollbars 指定滾動條類型：0-無，1-水平，2-垂直，3-水平垂直 0

WindowState 表單狀態：0-正常，1-最小化，2-最大化 0

WindowType 1-模式，關前不可訪問其他界面元素；0-非模式表單 0
資料庫表與自由表的區別
相同：建法、用法、命令幾乎完全相同
區別：
1、資料庫表能使用長表名，自由表不能。
2、庫表欄位名長<=128,自由表長<=10。
3、庫表欄位能指定標題、默認值和輸入掩碼，自由表不能。
4、庫表支持主關鍵字、參照完整性和表間聯系。自由表否。
5、庫表支持insert、update和delete觸發器。自由表否。
結構化程序設計與面向對象程序設計的區別
結構化程序設計方法是把待求解的問題自頂向下分解成多個相對簡單獨立的模塊，用子程序、過程或函數組成完整程序。
面向對象的程序設計方法是用對象描述實體，用消息模擬聯系，用類模擬共性。採用屬性、方法和事件解決問題。
永久性關聯建立的過程

通過資料庫建立的關聯是永久關聯。要建立永久關聯，首先要在相關聯的各表上
其次在資料庫設計器中，擊（父）表中的（主）索引不放，拖動到（子）表的相關索引上，釋放滑鼠，形成連線。
•如需編輯（刪除）聯系，可右擊連線，從彈出的快捷菜單中選「編輯（刪除）關系」

10. vfp中什麼是演算法

計算機語言中演算法的概念都是一樣的。

演算法是在有限步驟內求解某一問題所使用的一組定義明確的規則。通俗點說，就是計算機解題的過程。