程式設計

請問有沒有辦法把flash檔的影片燒成VCD或DVD看呢？若沒辦法，希望網友告知；若有辦法，請網友以簡單易懂、清楚的步驟說明該如何做（最好有教學影片或圖片可參考）。謝謝您！

2005-07-01 06:00:25 · 4 個解答 · 發問者 Anonymous

為什麼下面的程式碼在Private Sub Form_Load()中
需要把所有的值歸零 和將粗體斜體加底線的樣式取消呢
作用為何? 不這樣做會怎樣?

Private Sub Command1_Click()


If Bold_chk.Value = 1 Then
show_lbl.FontBold = True
Else
show_lbl.FontBold = False

If Italic_chk.Value = 1 Then
show_lbl.FontItalic = True
Else
show_lbl.FontItalic = False

If Underline_chk.Value = 1 Then
show_lbl.FontUnderline = True
Else
show_lbl.FontUnderline = False

show_lbl = input_txt
End If
End If
End If

End Sub

Private Sub Command2_Click()
show_lbl.FontBold = False
show_lbl.FontItalic = False
show_lbl.FontUnderline = False
show_lbl = ""


Bold_chk.Value = 0
Italic_chk.Value = 0
Underline_chk.Value = 0
input_txt = ""


End Sub

Private Sub Command3_Click()
End

End Sub

Private Sub Form_Load()
show_lbl.FontBold = False
show_lbl.FontItalic = False
show_lbl.FontUnderline = False

input_txt = " "

Bold_chk.Value = 0
Italic_chk.Value = 0
Underline_chk.Value = 0
End Sub

2005-06-30 06:53:30 · 1 個解答 · 發問者 ? 1

這是我學校ACCESS銷售管理系統的作業，我想要在打開系統時的「歡迎畫面訊息方塊」上面加上圖片及一些文字，不知道該怎麼做，可以請各位高手幫幫我嗎?? 謝謝謝了!!!

2005-06-29 22:38:41 · 2 個解答 · 發問者 俊傑 1

我的button語法

on (release) {
getURL(_root.url);
}

我想給他改成
on (release) {
gotoandplay("下一個場景",l);
}

OR

on (release) {
nextScene();
}

為什麼就是跳不到下一個場景
而是一直跳回第一格

拜托知道的大大回復一下吧

2005-06-29 10:57:48 · 3 個解答 · 發問者 ? 3

如果用INT (100*RND)+10產生的亂數
該再加上什麼才會不使那亂數出來的值重複

2005-06-29 07:24:42 · 2 個解答 · 發問者 Anonymous

1. -2^2+8 mod5
2. 47.3\6.8 +47.3mod6.8
3. (4^2+3)mod5
我不知道哪裡搞錯了 都算不出來
幫我算算吧!要有計算過程@@"

2005-06-28 12:12:56 · 2 個解答 · 發問者 Anonymous

無名的網誌.留言版.個人資料.相簿的大標題的字型要怎麼改？

另外，留言版&個人資料&網誌的CSS要怎麼改他的背景圖之類的呢？

請用簡單明瞭的方式說一下...

2005-06-27 16:12:04 · 2 個解答 · 發問者 椅子人，小亞：） 1

什麼程式碼能夠將Label1內容加入c:\1.TXT的內容裡

2005-06-27 15:16:56 · 2 個解答 · 發問者 Anonymous

C++ DEBUG後
沒幾行的程式為啥建立資料夾中的DEBUG資料夾檔案要3~4M左右

2005-06-27 11:00:20 · 2 個解答 · 發問者 Anonymous

'********** f5_P_9 **********
Private Sub cmdInput_Click()
Cls
Dim name As String
name = InputBox("請輸入您的姓名.", "請問芳名")
msg = name + "是你的姓名嗎？"
code = 36
Title = "確認姓名"
return_value = MsgBox(msg, code, Title)
If return_value = 6 Then
FontSize = 12
Print name + "您好！"
End If
End Sub

Private Sub cmdEnd_Click()
End
End Sub

請問Input輸入姓名後，要加哪些程式才能按"確定"繼續Msgbox迴圈，按"取消"則重新輸入姓名。謝謝！

2005-06-27 10:12:04 · 4 個解答 · 發問者 Anonymous

如標題
網頁編輯軟體是否能直書
我目前用的軟體是FrontPage....
我怎麼試好像都不行, 但是我是直書愛好者...
好希望我的網頁可以直書.....

2005-06-27 08:42:07 · 2 個解答 · 發問者 Takarazuka 1

我想要設計可以查詢現在時間幾時幾分幾秒的一個VB程式

誰能夠告訴我如何設計 ?

2005-06-27 08:34:27 · 4 個解答 · 發問者 Anonymous

我是用Dreamweaver MX在製作我的網頁，
我是用頁框組(固定左頁框，下巢狀頁框)，
右頁框是網站內容，左頁框為導覽列，下巢狀是音樂。

問題 1.我的導覽列太多東西了，如何把它換行改為實體而不是虛擬？範例↓
　　　呆呆之家　http://myweb.hinet.net/home4/sme00637/page.html
問題 2.要如何製作網頁"歡迎畫面"的動畫？範例→http://163.20.110.129/
問題 3.要怎樣使網站看起來更有質感？範例↓
　　　素材站　http://iconhk.net/home/home.php?
　　　語法分享館　http://black.demons.to/
　　　～…☆★☆ Fang's Home ☆★☆…～↓
　　　http://home.pchome.com.tw/good/fang600213/index.htm
問題 4.有的時候，網路上的動畫(也就是GIF檔)想存下來，
　　　但是你存檔時就是發現它的存檔類型只有bmp，
　　　那應該怎樣才能存下那張圖呢？？
　　　（ＰＳ.另存目標鍵不能用。）

2005-06-27 06:43:01 · 3 個解答 · 發問者 Anonymous

歹勢
我是第一次發問
各位大大幫幫忙八^^

//program p1
int guess(int n)
{int a, b;
if(n<=2)
return(n);
else
return(guess(n-1)+guess(n-2));
}
void main(void)
{
cout< }
上面的程式中有兩個地方看不懂
1.guess是啥麼的宣告或值?
2."<<"是什麼意思
就這樣了
希望快點有解
我7/7要考試了>.<

2005-06-26 17:23:40 · 4 個解答 · 發問者 加爾曼基修 5

Dim sna(10) As String, sno(10) As String
Dim CHI(10) As Single, ENG(10) As Single, MAT(10) As Single
Dim TOT(10) As Single, AVE(10) As Single, GD(10) As Integer
Dim K As Integer

Private Sub Command1_Click()
K = K + 1
CHI(K) = Val(Text3)
ENG(K) = Val(Text4)
MAT(K) = Val(Text5)
sna(K) = Val(Text1)
sno(K) = Val(Text2)
Text1 = " "
Text2 = " "
Text3 = " "
Text4 = " "
Text5 = " "



End Sub

Private Sub Command2_Click()
For i = 1 To K
TOT(i) = CHI(i) + ENG(i) + MAT(i)
tave = 100 * TOT(i) / 3 + 0.5
AVE(i) = Int(tave) / 100
Next i
ngd = 1
For i = 1 To K
GD(i) = 1
Next
For i = 1 To K - 1
For j = 1 To K
p = GD(i)
q = GD(j)
If TOT(p) < TOT(q) Then
XX = GD(j)
GD(j) = GD(i)
GD(i) = XX
Else
If TOT(p) = TOT(q) Then
If CHI(p) < CHI(q) Then
XX = GD(j)
GD(j) = GD(i)
GD(i) = XX
End If
End If
End If
Next
p = GD(i)
kgd(p) = ngd
ngd = ngd + 1
Next
p = GD(K)
kgd(p) = ngd
Form1.Hide
Form2.Show
Form2.Print Tab(2); "學　號"; Tab(10); "姓　名" _
; Tab(18); "國　文"; Tab(24); "英　文"; Tab(30); "數　學" _
; Tab(36); "總分"; Tab(42); "平均"; Tab(48); "排　名"
Form2.Print "+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++"
For i = 1 To K
Form2.Print Tab(2); sna(i); Tab(10); sno(i) _
; Tab(18); CHI(i); Tab(24); ENG(i); Tab(30); MAT(i) _
; Tab(36); TOT(i); Tab(42); AVE(i); Tab(48); GD(i)
Next

End Sub

Private Sub Form_Activate()
K = 1
End Sub
我都打完了就是不知道錯在那裡
我每次要執行時，都說沒有定義sun或Function......這個要怎麼搞定啊＞　＜
每次都執行都是total(i)和kgd(p)有問題...這個我明天就要用了，拜託各位大哥幫幫我

2005-06-26 17:19:28 · 2 個解答 · 發問者 阿德. 1

C=0
For K = 1 to 5
For J = K to 5
C=C+1
NEXT J
NEXT K
Print c
執行後輸出結果為何

2005-06-26 17:10:35 · 1 個解答 · 發問者 Anonymous

請問有沒有辦法幫我找到１組序號...我保證不會用來幹麻...因為我再是做動畫...結果是用其到了...拜託嚕~~我很想藥丸><~

2005-06-25 17:46:25 · 2 個解答 · 發問者 Anonymous

看了很多flashget的介紹，
很多高手網友們都說要下載軟體，
可是我沒下載過，
卻可以將別人的以flashget檔案下載，
請問是何原因呢？？

2005-06-25 17:41:32 · 1 個解答 · 發問者 Anonymous

ＶＢ考試時…總要我們算出執行結果，要怎麼算？
要怎麼去唸？每次老師都是考填充執行結果＋算出執行答案！
可是我ㄧ項考不好，都沒在念書，現在期末考了，要唸嚕～可是不知道怎麼唸好！
老師都叫我們算結果，那我該怎麼唸好呢？
練習寫程式？還是貝寫程式的程式順序跟寫法！？
因為我現在不會寫，所以不知道念的方法？希望有經驗的大大能幫忙我。
３ｑ︿︿

2005-06-25 06:50:04 · 2 個解答 · 發問者 Anonymous

就是啊

進貨時除了進貨資料表有增加進貨資料

而庫存資料表裡的庫存數目就要增加!!

請問要怎麼寫呢!?

緊急阿!!

2005-06-23 23:32:50 · 3 個解答 · 發問者 哆啦A夢 2

在VB裡面"="是什麼意思呢
...........................................................................................................................................

2005-06-22 07:37:37 · 2 個解答 · 發問者 遇見樹 5

請問哪個網站
有html的語法教學
最好的中文網

2005-06-21 15:56:44 · 3 個解答 · 發問者 巧燕 4

請問EXE檔是用哪個程式做的？

做那個東西需要具備什麼知識嗎？

2005-06-20 20:44:26 · 5 個解答 · 發問者 Anonymous

利用迴圈寫出高斯消去但是我ㄉ數值都會出錯請各位高手救救我
請各位高手明天七點以前給我答案唷
#include
#include
#define M 5
int main(void)
{
int i,j,k;
float a[M][M],n,det=1.;
printf("請輸入行列式的元素:\n");
for(i=0;i for(j=0;j {
printf("a[%d][%d]=",i,j);
scanf("%f",&a[i][j]);
}

printf("\n原有的行列式:\n");
for(i=0;i {
for(j=0;j {
printf("%7.2f",a[i][j]);
}
printf("\n");
}

/* 高斯消去法: */
for(i=0;i {
for(k=i+1;k {
n=-a[k][i]/a[i][i];
for(j=0;j {
a[k][j]=a[k][j]+n*a[i][j];
}
printf("\n");
}
}

printf("計算過的行列式:\n");
for(i=0;i {
for(j=0;j {
printf("a[%d][%d]=%7.2f\n",i,j,a[i][j]);
}

}

printf("\n");
for(i=0;i {
for(j=0;j {
printf("%7.2f",a[i][j]);
}
printf("\n");
}

printf("\n行列式的值為對角線相乘:\n");
for(i=0;i {
for(j=0;j {
if(i==j)
det*=a[i][j];
}
}
printf("%d階行列式值=%.2f\n",M,det);
}

2005-06-20 17:31:42 · 4 個解答 · 發問者 ? 2

如果我想要讓Picture1.CurrentY = 0
然後在PRINT時每次都會往下加50，那我要怎麼改，謝謝
PS：裡面是數字，就是要讓他跳行的意思

2005-06-20 15:48:26 · 1 個解答 · 發問者 Anonymous

1.假設收盤價原始值=130，以下敘述依序執行之後，回答下列問題
(1)Adodc1.Recordset("收盤價")=100
(2)Adodc1.Recordset.Update
請問敘述１執行之後，收盤價之OriginalValue=？______
請問敘述１執行之後，收盤價之Value=？______
請問敘述１執行之後，修改之資料會寫入到哪裡？_______
請問敘述２執行之後，收盤價之OriginalValue=？______
請問敘述２執行之後，收盤價之Value=？______
請問敘述２執行之後，修改之資料會寫入到哪裡？_______
請問ADODC之WillChangeField事件啟動時，收盤價之OriginalValue=？______
請問ADODC之WillChangeField事件啟動時，收盤價之Value=？______
假設最低價介於０－１０００之間，請問此規則驗證應該放在那一個事件中執行？______
收盤價大於等於最低價，請問此規則驗證應該放在那一個事件中執行？______

2.請更正下列搜尋程式之錯誤：
Adodc1.Recordset.Find ”combo1 Like '％text1％'”

3.配合題：以下為用ADODC與資料庫連線之設定（從答案區選擇最適當之答案號碼，並將號碼寫在本題最後面空格中）
Private Sub____(1)_____
Dim ConnStr As String
ConnStr="Provider=Microsoft.Jet.OLEDB.3.51;"&_
"Data Source=C:\vb6db\mdb\stock01.mdb"
Adodc1.____(2)_____=ConnStr
Adodc1.____(3)_____=adCmdTable
Adodc1.____(4)_____="股票行情表"
Adodc1.____(5)_____
End Sub
答案區：
(1)CommandType (2)CommandText (3)Connection (4)ConnectionString
(5)Form_Load (6)image1_Click (7)DataField (8)DataSource
(9)Recordset (10)RecordSource (11)Refresh (12)Execute (13)DTPicker
(14)Image (15)TextBox (16)CheckBox (17)ComboBox (18)CommonDialog
注意：　　上述答案可能會重複

明天就要期未考了～～這張搞不出來就完了＞"＜
拜託有高手會的幫忙解答一下！！感激不盡！！

2005-06-20 11:59:48 · 1 個解答 · 發問者 鈦極超⊙⊙ 1

如何免費製做網業--贈10點--
求你幫幫我

2005-06-19 11:53:12 · 5 個解答 · 發問者 Anonymous

假設我要將所有的"收入"作加總
Dim a

Adodc1.Recordset.MoveFirst
While Not Adodc1.Recordset.EOF
If Adodc1.Recordset.Fields(0) = "收入" Then
a = a + Adodc1.Recordset.Fields(0)
Else
a = a + 0
End If
Adodc1.Recordset.MoveNext
Wend

Text1 = a

這樣Text 就會顯示 a 加總後數字
可是如果我想讓Text顯示 XXX元
Text1 = a + "元"
又會錯誤,請問該怎麼辦?
(以前都是用 Text1 = Text2 + "元" 而現在正是用宣告a來代替Text2)

2005-06-18 23:35:47 · 3 個解答 · 發問者 Anonymous

寫一程式輸入一整數,並計算從1到此整數的所有整數的和.(整數是結果後輸入進去的)!!謝謝

2005-06-18 09:40:58 · 2 個解答 · 發問者 Anonymous

1.倒轉程式
EX:輸入ABC..輸出CBA


2.終極密碼..由電腦取出1ㄍ亂數>>>Int(Rnd() * 100 + 1)
再來..我們猜數字..用inputbox...

2005-06-17 18:49:56 · 2 個解答 · 發問者 pure 2