繁體瀏覽工具設為首頁收藏本站
 找回密碼 或 安全提問
 註冊
|註冊|登錄

伊莉討論區

搜索
感激所有對伊莉作出奉獻的人尊貴會員無限下載附件安全提問(回答) 和 永久尊貴會員 事宜
伊莉討論區 › 論壇 › 電腦資訊 › 電腦程式設計 › Visual Basic 語言 › 請大大幫忙 我的九九乘法表???
人妻mega 無火影明日花偷拍julia中文
男の娘風美奈子the cursunholy j瑜伽公主bunnygar聖騎士リ
休閒聊天興趣交流學術文化旅遊交流飲食交流家庭事務PC GAMETV GAME
熱門線上其他線上感情感性寵物交流家族門派動漫交流貼圖分享BL/GL
音樂世界影視娛樂女性頻道潮流資訊BT下載區GB下載區下載分享短片
電腦資訊數碼產品手機交流交易廣場網站事務長篇小說體育運動時事經濟
上班一族博彩娛樂

(4月新番)[繁]無職轉
(4月新番)[繁]怪獸八
(4月新番)[繁]怪異與

[繁]轉生貴族憑鑑定技
(4月新番)[繁]夜櫻家
[繁]怪物轉生 Re:Mons
C & C++ 語言C# 語言Visual Basic 語言PHP 語言JAVA 語言
返回列表發新帖

查看: 1418|回復: 5
打印上一主題下一主題

[求助]請大大幫忙 我的九九乘法表???[複製鏈接]

a0923308516

Rank: 1

帖子
630
積分
183 點
潛水值
18962 米
跳轉到指定樓層
樓主
發表於 2009-4-30 11:32 AM|只看該作者|倒序瀏覽
如果你忘記伊莉的密碼，請在登入時按右邊出現的 '找回密碼'。輸入相關資料後送出，系統就會把密碼寄到你的E-Mail。
Private Sub Command1_Click()
Dim I, J As Integer
    Dim Z As String
   
    For I = 1 To 9
   
        If I = 0 Then
            Z = "*"
        Else
            Z = Z & Chr(13) & I
        End If
...
瀏覽完整內容，請先 註冊 或 登入會員
分享分享0收藏收藏0支持支持0
頭小小
所有積分大於負-100的壞孩子，將可獲得重新機會成為懲罰生，權限跟幼兒生一樣。

使用道具檢舉

Unlife

Rank: 2Rank: 2

帖子
327
積分
774 點
潛水值
17486 米
頭香
發表於 2009-4-30 12:31 PM|只看該作者
升級為尊貴會員或贊助會員，讓你擁有自由、暢通無阻、應有盡有及所有資源任你使用的無窮快感。
本帖最後由 Unlife 於 2009-4-30 12:33 PM 編輯

可以加個Tab去控制輸出位置，幫你改了一下，參考看看吧。
而且其實你的程式有一些地方是可以拿掉的，不會影響結果的，
不過這和問題無關，就沒幫你拿掉了，你自己再試試吧。

Private Sub Command1_Click()
Dim I, J As Integer
    Dim Z As String
   
    For I = 1 To 9
   
        If I = 0 Then
            Z = "*"
        Else
            Z = Z & Chr(13) & vbTab & I
        End If
        
        For J = 2 To 9
        
            If I = 0 Then
                Z = Z & " " & vbTab & J
            Else
           Z = Z & " " & vbTab & (I * J)
            End If
        Next J
    Next I
    Print Z
End Sub...
瀏覽完整內容，請先 註冊 或 登入會員
分享使你變得更實在，可以使其他人感到快樂，分享是我們的動力。今天就來分享你的資訊、圖片或檔案吧。

使用道具檢舉

a0923308516

Rank: 1

帖子
630
積分
183 點
潛水值
18962 米
3樓
發表於 2009-4-30 01:01 PM|只看該作者
回覆中加入附件並不會使你增加積分，請使用主題方式發佈附件。
謝謝大大幫我解決這個問題 ^^ 感恩
所有積分大於負-100的壞孩子，將可獲得重新機會成為懲罰生，權限跟幼兒生一樣。

使用道具檢舉

yyyyman

Rank: 3Rank: 3Rank: 3

帖子
946
積分
2494 點
潛水值
9421 米
4樓
發表於 2009-4-30 09:38 PM|只看該作者
成為伊莉的版主，你將獲得更高級和無限的權限。把你感興趣的版面一步步地發展和豐盛，那種滿足感等著你來嚐嚐喔。
  1. Option Explicit

  3. Private Sub Command1_Click()
  4. Dim I, J As Integer
  5.     Dim Z As String
  6.    
  7.     For I = 1 To 9
  8.    
  9.         If I = 0 Then
  10.             Z = "*"
  11.         Else
  12.             Z = Z & Chr(13) & Format(I, "00")
  13.         End If
  14.         
  15.         For J = 2 To 9
  16.         
  17.             If I = 0 Then
  18.                 Z = Z & " " & Format(J, "00")
  19.             Else
  20.            Z = Z & " " & Format(I * J, "00")
  21.             End If
  22.         Next J
  23.     Next I
  24.     Print Z
  25. End Sub
複製代碼
...
瀏覽完整內容，請先 註冊 或 登入會員
若登入不正常或變回訪客狀態，請先刪除COOKIE再登入。

使用道具檢舉

來也 該用戶已被刪除
5樓
發表於 2009-4-30 10:48 PM|只看該作者
所有積分大於負-100的壞孩子，將可獲得重新機會成為懲罰生，權限跟幼兒生一樣。
我真的看不懂您的邏輯, I怎麼可能=0 ?




如果你忘記伊莉的密碼，請在登入時按右邊出現的 '找回密碼'。輸入相關資料後送出，系統就會把密碼寄到你的E-Mail。

使用道具檢舉

x514838

Rank: 2Rank: 2

帖子
1003
積分
484 點
潛水值
38663 米
6樓
發表於 2009-4-30 10:58 PM|只看該作者
分享使你變得更實在，可以使其他人感到快樂，分享是我們的動力。今天就來分享你的資訊、圖片或檔案吧。
這題99乘法是怎麼把VB6.0後面光碟附得99乘法改得?
若登入不正常或變回訪客狀態，請先刪除COOKIE再登入。

使用道具檢舉

返回列表發新帖
高級模式
BColorImageLinkQuoteCodeSmilies
您需要登錄後才可以回帖 登錄 | 註冊

Powered by Discuz!

© Comsenz Inc.

重要聲明：本討論區是以即時上載留言的方式運作，對所有留言的真實性、完整性及立場等，不負任何法律責任。而一切留言之言論只代表留言者個人意見，並非本網站之立場，用戶不應信賴內容，並應自行判斷內容之真實性。於有關情形下，用戶應尋求專業意見(如涉及醫療、法律或投資等問題)。 由於本討論區受到「即時上載留言」運作方式所規限，故不能完全監察所有留言，若讀者發現有留言出現問題，請聯絡我們。有權刪除任何留言及拒絕任何人士上載留言，同時亦有不刪除留言的權利。切勿上傳和撰寫 侵犯版權(未經授權)、粗言穢語、誹謗、渲染色情暴力或人身攻擊的言論，敬請自律。本網站保留一切法律權利。
回頂部