作者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/cn.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