編程粉

① 北3有幾把+13絕刀或者+13以上的有圖最好

13肯定是RMB收

只要才一把只要你有RMB也收的到

不知道要13絕刀幹嘛，刷圖為什麼不選擇45CC呢肯定比絕刀好用

PK流星，13絕刀都能收流星落了

② 油漆能和玻璃纖維復合

油漆的主要成分是氧化鐵，玻纖的主要成分是二氧化硅

二氧化硅與氧化鐵和其它含有少量鹼性的物質在一起一般不會起反應，二氧化硅很穩定的。
事物是相對的。在高溫鍋爐爐水中，存在偏硅酸，通常在鍋爐爐管內，高壓以上鍋爐水垢含酸性物質為偏硅酸40%左右（即二氧化硅）與氧化鐵40%左右氧化銅，他們是以結合緊密的混合物存在的堅硬物。玻璃纖維短切絲

玻璃纖維（英文原名為：glass fiber或fiberglass ）是一種性能優異的無機非金屬材料，種類繁多，優點是絕緣性好、耐熱性強、抗腐蝕性好，機械強度高，但缺點是性脆，耐磨性較差。它是以玻璃球或廢舊玻璃為原料經高溫熔制、拉絲、絡紗、織布等工藝製造成的，其單絲的直徑為幾個微米到二十幾米個微米，相當於一根頭發絲的 1/20-1/5 ，每束纖維原絲都由數百根甚至上千根單絲組成。玻璃纖維通常用作復合材料中的增強材料，電絕緣材料和絕熱保溫材料，電路基板等國民經濟各個領域。原料及其應用：玻璃纖維比有機纖維耐溫高，不燃，抗腐，隔熱、隔音性好(特別是玻璃棉)，抗拉強度高，電絕緣性好（如無鹼玻璃纖維）。但性脆，耐磨性較差。玻璃纖維主要用作電絕緣材料，工業過濾材料，防腐、 防潮、 隔熱、隔音、減震材料。還可作為增強材料，用來製造增強塑料（見彩圖）或增強橡膠、增強石膏和增強水泥等製品。用有機材料被覆玻璃纖維可提高其柔韌性，用以製成包裝布、窗紗、貼牆布、覆蓋布、防護服和絕電、隔音材料。作為補強材玻璃纖維具有以下之特點，這些特點使玻璃纖維之使用遠較其他種類纖維來得廣泛，發展速度亦遙遙領先

③ 聯想昭陽K41A的筆記本的顯示器白色的部分全部編程粉紅色了

聯系服務站檢測下咱們的屏幕吧
服務站
[url]http://support1.lenovo.com.cn/lenovo/wsi/station/servicestation/default.aspx[/url]

④ 編程粉筆官網打不開了

地址錯了

⑤ VB如何在一個Form里裝多個小窗口，且窗口大小可以通過滑鼠拖動改變

MDI窗體,然後在信件FORM
設置為
MDI子窗體
屬性MDICHILD
修改為真即可.
不懂請網路:「編程粉筆」加入其中吧.我相信你會快速的成長.

⑥ 怎麼用VB上傳文件至ftp伺服器 測試可以使用後再追加到50分！！！！！！

Option Explicit

Public Declare Function InternetOpen Lib "wininet.dll" Alias "InternetOpenA" _
(ByVal sAgent As String, ByVal LAccessType As Long, ByVal sProxyName As String, _
ByVal SProxyBypass As String, ByVal lFlags As Long) As Long

Public Declare Function InternetConnect Lib "wininet.dll" Alias "InternetConnectA" _
(ByVal hInternetSession As Long, ByVal sServerName As String, _
ByVal nServerPort As Integer, ByVal sUsername As String, _
ByVal sPassword As String, ByVal lService As Long, _
ByVal lFlags As Long, ByVal lContext As Long) As Long

Public Declare Function FtpGetFile Lib "wininet.dll" Alias "FtpGetFileA" _
(ByVal hFtpSession As Long, ByVal lpszRemoteFile As String, _
ByVal lpszNewFile As String, ByVal fFailIfExists As Boolean, _
ByVal dwFlagsAndAttributes As Long, ByVal dwFlags As Long, _
ByVal dwContext As Long) As Boolean

Public Declare Function FtpPutFile Lib "wininet.dll" Alias "FtpPutFileA" _
(ByVal hFtpSession As Long, ByVal lpszLocalFile As String, _
ByVal lpszRemoteFile As String, ByVal dwFlags As Long, _
ByVal dwContext As Long) As Boolean

Public Declare Function FtpDeleteFile Lib "wininet.dll" Alias "FtpDeleteFileA" _
(ByVal hFtpSession As Long, ByVal lpszFileName As String) As Boolean

Public Declare Function FtpRenameFile Lib "wininet.dll" Alias "FtpRenameFileA" _
(ByVal hFtpSession As Long, ByVal lpszExsiting As String, ByVal lpszNew As String) As Boolean

Public Declare Function InternetCloseHandle Lib "wininet.dll" (ByVal hInet As Long) As Integer

Public Declare Function FtpFindFirstFile Lib "wininet.dll" Alias "FtpFindFirstFileA" _
(ByVal hFtpSession As Long, ByVal lpszSearchFile As String, _
lpFindFileData As WIN32_FIND_DATA, ByVal dwFlags As Long, _
ByVal dwContent As Long) As Long

Public Declare Function InternetFindNextFile Lib "wininet.dll" Alias "InternetFindNextFileA" _
(ByVal hFind As Long, lpvFndData As WIN32_FIND_DATA) As Long

Public Type FILETIME
dwLowDateTime As Long
dwHighDateTime As Long
End Type
Public Type WIN32_FIND_DATA
dwFilAttributes As Long
ftCreationTime As FILETIME
ftLastAccessTime As FILETIME
ftLastWriteTime As FILETIME
nFileSizeHigh As Long
nFileSizeLow As Long
dwReserved0 As Long
dwReserved1 As Long
cFileName As String * 260
cAlternate As String * 14
End Type

Public Declare Function GetOpenFileName Lib "comdlg32.dll" Alias _
"GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long

Type OPENFILENAME
lStructSize As Long
hwndOwner As Long
hInstance As Long
lpstrFilter As String
lpstrCustomFilter As String
nMaxCustFilter As Long
nFilterIndex As Long
lpstrFile As String
nMaxFile As Long
lpstrFileTitle As String
nMaxFileTitle As Long
lpstrInitialDir As String
lpstrTitle As String
flags As Long
nFileOffset As Integer
nFileExtension As Integer
lpstrDefExt As String
lCustData As Long
lpfnHook As Long
lpTemplateName As String
End Type
Private Sub Command1_Click()
lnginet = InternetOpen(vbNullString, INTERNET_OPEN_TYPE_PRECONFIG, _
vbNullString, vbNullString, 0&)
If lnginet Then
lnginetconn = InternetConnect(lnginet, "ip地址", 0, _
"用戶名", "密碼", 1, 0, 0)
If lnginetconn Then
blnRC = FtpGetFile(lnginetconn, "website/address.asp", "c:\address.asp", 0, 0, 1, 0)
If blnRC Then
MsgBox "download ok!!!"
End If
InternetCloseHandle lnginetconn
InternetCloseHandle lnginet
MsgBox "close ok!!!"
Else
MsgBox "can't connect"
End If
Else
MsgBox "ftp wrong"
End If
End Sub

Private Sub Command2_Click()
Dim pData As WIN32_FIND_DATA
Dim lngHINet As Long
Dim intError As Integer
Dim strTemp As String
Dim blnRC As Boolean
pData.cFileName = String(260, 0)
lnginet = InternetOpen(vbNullString, INTERNET_OPEN_TYPE_PRECONFIG, _
vbNullString, vbNullString, 0&)
If lnginet Then
lnginetconn = InternetConnect(lnginet, "IP地址", 0, _
"用戶名", "密碼", 1, 0, 0)
If lnginetconn Then
lngHINet = FtpFindFirstFile(lnginetconn, "*.*", pData, 0, 0)
strTemp = Left(pData.cFileName, InStr(1, pData.cFileName, String(1, 0), vbBinaryCompare) - 1)
Do
pData.cFileName = String(260, 0)
blnRC = InternetFindNextFile(lngHINet, pData)
If Not blnRC Then
Exit Do
Else
strTemp = Left(pData.cFileName, InStr(1, pData.cFileName, String(1, 0), vbBinaryCompare) - 1)
End If

Loop
Text1.Text = strTemp
End If
End If
InternetCloseHandle lngHINet

InternetCloseHandle lnginetconn
InternetCloseHandle lnginet

End Sub

⑦ 學VB編程入門

學JAVA，可以加 【8000我是扣扣號35450】
軟體開發的學習，一定要有好的老師引導，加上由淺入深的教材，可以比較愉快的學習。
市面上和高校里的書，大部分都按照條條框框來寫，學起來難，很容易讓人失去興趣。
沒有名師指導，遇到困難也容易放棄。

所以，你要選個學校，看看師資力量（PS:必須是能教你的，別是什麼榮譽教授類的，一輩子見不到兩次）。同時看看有沒有項目實戰的機會，這樣能幫助你熟練寫代碼，畢竟這個東西，還是需要大量練習的。熟能生巧嘛！

⑧ 米飯可以釣魚為什麼嬰兒米粉不可以呢

米粉是可以釣魚的，做誘餌（窩料）的話需要先行加少量水兌混成團狀後即可（尤其可用來在水庫打大窩，然後米粉可在爆炸團餌中佔到50%比例），如做釣餌最好用蜂蜜水兌混成團，如付鉤性太差可在米粉中加入小麥蛋白（拉絲粉）。但是，由於現在商品餌料技術上的成熟以及大量釣者的使用，人工塘里魚的嘴一般都很刁，使得米粉餌料在人工塘中占絕對劣勢，但在自然水域應該可用，特別是可以使用米飯施釣的釣場。