[問答題] 在考生文件夾下有一個工程文件sjt4. vbp，相應的窗體文件為sjt4. fm，在窗體上有一個文本框和一個命令按鈕。程序運行后，單擊命令按鈕，即可
2021-07-20
[問答題] 在考生文件夾下有一個工程文件sjt4. vbp，相應的窗體文件為sjt4. fm，在窗體上有一個文本框和一個命令按鈕。程序運行后，單擊命令按鈕，即可計算出1～1000范圍內能被7整除或被5整除的整數(shù)的個數(shù)，并顯示在文本框中。在窗體的代碼窗口中，已給出了部分程序，其中計算能被7整除或能被5整除的整數(shù)的個數(shù)的操作在通用過程Fun中實現(xiàn)，請編寫該過程的代碼。
要求：請勿改動程序中的任何內容，只在Function Fun()和End Function之間填入你編寫的若干語句。最后將修改后的文件按原文件名存盤。
正確答案：[解題思路] 本題要求的是A000以內能被E或G整除的數(shù)的個數(shù)。在Visual Basic中，使用Mod運算符來判斷一個數(shù)是否可以被另一個數(shù)整除，如果計算結果為0，則表示可以整除，否則不能整除。[操作步驟] 步驟A：打開本題工程文件。 步驟B：分析并編寫程序代碼。 Function Fun() Dim s As Integer, i As Integer For i = A To A000 If i Mod E = 0 Or i Mod G = 0 Then s
詞條內容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領域），建議您咨詢相關領域專業(yè)人士。