1樓:匿名使用者
恕我直言,要查錯遠遠比解題麻煩多了.
所以,如果可以,請把題目補充出來,晚一點我再看回來.
祝好運.
我也貼一段**:
function ishuiwen(n as double) as boolean '判斷是否迴文數
ishuiwen = false
dim m, i as double
m = 0
i = n
while i > 0
m = 10 * m + i mod 10i = i \ 10
wend
if n = m then ishuiwen = trueend function
'以下是修改lz的 command1的事件的。
private sub command1_click()dim a as integer, b as integerdim i as integer
a = val(text1.text)
b = val(text2.text)
for i = a to b
if ishuiwen(i) then
text3.text = text3.text & str(i) & vbcrlf
endif
next i
end sub
清除/退出事件不用改
2樓:
我給你改一下吧,省去了許多**
private sub command1_click()dim a as integer, b as integerdim n as integer
a = val(text1.text)
b = val(text2.text)
for n = a to b
if trim(str(n)) = strreverse(trim(str(n))) then
text3.text = text3.text & n & vbcrlf
end if
next
end sub
private sub command2_click()text1.text = ""
text2.text = ""
text3.text = ""
text1.setfocus
end sub
private sub command3_click()endend sub
3樓:匿名使用者
text3.text = text3.text & str(x) & "=>"
4樓:
不知道你的題目是什麼,但是程式沒有響應,肯定是你的3個迴圈當中有的跳不出來,另外,調程式不能只看結果,應該設好斷點,監控好關鍵變數才行
請教一道vb陣列程式設計題(大學初學者),謝謝!!!
5樓:
dim a(1 to 10)
randomize
for i=1 to 10
a(i)=int(rnd*151)+50
if maxsum/10 then print a(i);
next
6樓:孤翼單行
int a[10];
for(int i=0;i<10;i++)最大值可以在for迴圈裡兩個對比取最大值的方法得出,然後累加,除以10輸出,然後在用for迴圈輸出大於平均值的數
我對c,c++懂點,沒接觸過vb,不過我感覺應該差不多
7樓:匿名使用者
作業吧?大學裡的畜生
求簡單的vb入門程式設計例項教程
8樓:
求一道C語言題,我是初學者,希望越詳細越好
首先在執行int k 011這一步抄的時候實際賦值是9 因為在c語言中支援三種整數,十進位制的就直接寫,16進位制的前面加0x,8進位制的前面加0,這題屬於第三種,而對於下一步中實際是k 和 k的理解,其中k 是每次必須把當前需要k的操作用k的原值進行結束後才能自己 1,如果是 k則是k先自己 1然...
c 初學者的一道小小的問題
for語句,如果之後沒有 就預設將其後的第一條語句,作為迴圈體的一部分 也就是說 for int i 1 i 2 i for int j 1 j 2 j cout 相當於for int i 1 i 2 i 一般是先執行第3個表示式後,然後在第二個表示式進行判斷,當j 2時,執行完畢,執行 j結果j ...
請教一道歷史題,求解析,一道歷史題,求解析
甲 曾下令 京夜市,宜令禁斷。說明已經有夜市了,才要禁斷。乙 長安崇仁坊 一街輻輳,遂傾兩市,盡夜喧呼,燈火不絕。長安志 卷八 說明出現夜市,但並沒有說 鼓勵。所以選b。得到結論一般有歸納 演繹 類比的方法。歸納就是一般到特殊,演繹就是特殊到一般,類比就是以此物比彼物。這裡所用的是歸納法。而歸納法需...