Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim myfile As Integer = My.Computer.FileSystem.ReadAllText("c:\vb\940303.SM")
Dim i As Integer
For i = 2 To myfile - 1
If myfile Mod i = 0 Then
- Oct 19 Fri 2007 20:18
VB - 第三題(for迴圈版)
- Oct 19 Fri 2007 20:17
VB - 第二題(for迴圈版)
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim myfile As Integer = My.Computer.FileSystem.ReadAllText("c:\vb\940302.SM")
Dim i, j As Integer
For i = 1 To myfile
For j = 1 To i
- Oct 19 Fri 2007 20:16
VB - 第一題(for迴圈版)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myfile As Integer = My.Computer.FileSystem.ReadAllText("c:\vb\940301.SM")
Dim s, i As Integer
Dim n As Integer = myfile
For i = 1 To 99
- Oct 19 Fri 2007 13:12
JAVA - 求值問題
Question:設計程式,給使用者一次又一次輸入整數,直到使用者輸入0代表結束,此時,列出之前所輸入的最大整數、最小整數、所有輸入整數的加總及平均值。
import java.io.*;
public class number {
public static void main(String args[])throws IOException {
- Oct 19 Fri 2007 01:57
[新聞]粉撲長年不洗,比馬桶還髒!
比馬桶還髒!粉撲長年不洗,小心男友一親吃掉1萬細菌!
妳的粉撲洗了嗎?很多女性天天化妝,但從不洗粉撲,你知道嗎?粉撲是細菌的溫床,因為上頭沾了臉上的皮屑,很容易滋生細菌,粉撲還有人體的汗水和油脂,骯髒程度就好比是家裡使用過的髒抹布,一旦感染病菌,很有可能會出現蜂窩性組織炎。
- Oct 12 Fri 2007 09:55
JAVA - 字串比較a.equals(b)
- Oct 11 Thu 2007 15:00
JAVA - 小考question03
/**
* @(#)q3.java
*
*
* @author
- Oct 11 Thu 2007 15:00
JAVA - 小考question02
/**
* @(#)q2.java
*
*
* @author