作者zzire (zero)
看板Visual_Basic
標題[VB6 ] 請問一下...程式求解
時間Wed Jul 1 23:18:49 2015
這是朋友問我的問題..
但是我不會程式語言
請各位大大幫幫忙!!!
看某這個...
程式如下:
DIm m0,m1.m2,m3,m4
Fileopen(1,"路徑\940301.am",openmode input)
Input(1,m0)
Fileclase(1)
M1=mo
For I = 1 to 9
M2= m1\10
M3= m1 mod 10
M4= m4 & m3
If m2 = 0 then exit for
M1=m2
Next
If m0 = m4 then
Textbox1.texe="第一題結果" & m0 & " is a palindrome."
Textbox1.text="第一題結果" & m0 & " is a not palindrome."
--
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 122.117.32.63
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Visual_Basic/M.1435763935.A.2DE.html
1F:→ LPH66: 你請你朋友自己上來問吧 07/01 23:46
2F:→ MOONRAKER: 你朋友要問什麼。 07/02 10:23
3F:→ dennisxkimo: 我猜他朋友是問每一行在做什麼的解釋 07/02 22:53
4F:→ MOONRAKER: 我不想用猜的,他應該自己講清楚他想問什麼。 07/03 10:48
5F:→ MOONRAKER: 以及他是否就是他朋友。 07/03 10:48
6F:→ rose8500926: 軟體設計丙級題目-_- 07/07 19:13
7F:推 ClubT: 這是VB嗎? 07/08 15:03
8F:→ MOONRAKER: 有一些VB.NET的東東。 07/08 22:20
9F:→ MOONRAKER: 和很多錯字。 07/08 22:21