Private Sub Form_Load()
Show
aa:
shuzi = InputBox("請輸入五位數(shù)")
If Len(shuzi) = 5 Then
Dim a(4),maxnum
maxnum = 0
For i = 0 To 4
a(i) = Mid(shuzi,i + 1,1)
If maxnum < a(i) Then maxnum = a(i)
Next
Print shuzi & "的最大數(shù)字是：" & maxnum
Else
MsgBox "輸入錯誤,請輸入五位數(shù)"
GoTo aa
End If
End Sub
30分賞 VB求最大值——任一五位數(shù)中求出其最大值最小值
30分賞 VB求最大值——任一五位數(shù)中求出其最大值最小值
00000-99999,求出任一個五位數(shù)中的最大的哪一個數(shù)及最小數(shù),請附完整代碼,
tc_mcgrady 你的理解是對的!
這五位數(shù)由abcde組成
for a=0 to 9
for b=0 to 9
………………
for e=0 to9
要你們幫我挑出最大的,最小的,因?yàn)槲液竺娴牡某绦蜻€要用到,這樣說你們應(yīng)該明白了,因?yàn)槟壳坝行┡笥岩呀?jīng)達(dá)到我先前的要求了.
00000-99999,求出任一個五位數(shù)中的最大的哪一個數(shù)及最小數(shù),請附完整代碼,
tc_mcgrady 你的理解是對的!
這五位數(shù)由abcde組成
for a=0 to 9
for b=0 to 9
………………
for e=0 to9
要你們幫我挑出最大的,最小的,因?yàn)槲液竺娴牡某绦蜻€要用到,這樣說你們應(yīng)該明白了,因?yàn)槟壳坝行┡笥岩呀?jīng)達(dá)到我先前的要求了.
其他人氣：444 ℃時間：2020-06-13 05:44:14
優(yōu)質(zhì)解答
我來回答
類似推薦
- 用VB求最大值最小值和平均值
- vb中求任意六個值中最大值和最小值
- 用vb語言：求一組數(shù)的最大值最小值中位數(shù)和眾數(shù)
- It was four days ago____ the man was put into prison again.
- 完全失重的時候?yàn)槭裁此纬山^對球形
- 高中數(shù)學(xué)排列組合公式Cnm（n為下標(biāo),m為上標(biāo)）=n!/m!（n-m）!是怎么來的
- 一個直角三角形的三邊長為連續(xù)偶數(shù),則它各邊長為?勾股定理怎么算出來的啊?
- 我很在乎你 用英文怎么寫
- +500度和-400度的眼鏡片,哪個是近視鏡片它的焦度是多少,焦距是多少
- 已知a
- 唐詩“欲窮千里目,更上一層樓”的意思
- Weather________,I will go mountain climbing.
猜你喜歡
- 1sin(π-θ）+cos(2π-θ）/cos(5π/2-θ)+sin(3π/2+θ)=2,則sinθcosθ=______
- 2一到四年級的古詩
- 3南宋時兩大詞人被譽(yù)為“蘇辛”,“蘇”指的是蘇軾,那“辛”指的是哪位豪放派詞人?
- 4數(shù)學(xué)題,誰來幫幫我呀!O(∩_∩)O謝謝!要過程.000
- 5Although laughter ___ the room ,she feilt lonely.
- 6我們腳下的這塊土地也是一本有趣的書(縮句)
- 7形容路途遙遠(yuǎn).——寫一成語
- 8趣味語文小故事
- 9比喻琴聲優(yōu)美動聽的句子
- 10什么叫“四不像”?
- 11怎樣配置火堿消毒液,
- 12求 大工12春《高等數(shù)學(xué)》（上）在線作業(yè)2