建站
咨詢
售后
建站咨詢
新聞中心
在VB.NET下面如何顯示和保存縮放圖像
實現(xiàn)代碼如下：
網(wǎng)站建設(shè)哪家好，找創(chuàng)新互聯(lián)建站！專注于網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、小程序開發(fā)、集團企業(yè)網(wǎng)站建設(shè)等服務(wù)項目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了積石山保安族東鄉(xiāng)族免費建站歡迎大家使用！
Dim img As Image = Image.FromFile("D:\Image\tstImage.jpg") 'tstImage是原先的圖片
Dim grfx As Graphics = Me.CreateGraphics
grfx.DrawImage(img, 0, 0, img.Width * 3, img.Height * 3) '在Form里顯示
Dim imgnew As New System.Drawing.Bitmap(img, img.Height * 3, img.Width * 3) '新建一個放大的圖片
imgnew.Save("D:\Image\tstNewImage.jpg", System.Drawing.Imaging.ImageFormat.Jpeg) '保存放大后圖片
你可以建一個Form，然后在Form里拖進一個Button，把上面的代碼放在Button_Click事件里面，執(zhí)行就行了。
對上面代碼的解釋：
1.要獲取Graphics對象只能從某一事件的參數(shù)中獲取或者使用窗體和控件對象的CreateGraphics方法來獲取-----上面代碼使用Me.CreateGraphics來引用這個對象。
2.加載一個圖片用Image類的FromFile或者FromStream方法
3.用DrawImage來顯示一個圖片,該方法有30多個重載方法，可以查MSDN了解細節(jié)。
4.保存時的一個問題：我們必須先建一個對象，用于存縮放圖像。
vb.net 如何運行javascript
既然引用了COM組件，就可以直接使用了，無需用CreateObject創(chuàng)建。
Dim ScriptControl As New MSScriptControl.ScriptControl
ScriptControl.Language = "JavaScript" '設(shè)置語言種類
ScriptControl.AddCode("function TestFunc(){return 'Hello world!'}") '添加腳本代碼
MsgBox(ScriptControl.Run("TestFunc")) '顯示一下那段腳本的返回值（這里你將看到Hello world!字符)
vb.net向webbrowser執(zhí)行javascript代碼進行翻頁，如何讀翻頁后的數(shù)據(jù)
不想用點擊，直接執(zhí)行，那么你肯定就不能用onclick事件了。
在網(wǎng)頁中JS函數(shù)自動執(zhí)行常用三種方法
在HTML中的Head區(qū)域中，有如下函數(shù)：
SCRIPT
LANGUAGE="JavaScript"
functionn
MyAutoRun()
{
//以下是您的函數(shù)的代碼，請自行修改先！
alert("函數(shù)自動執(zhí)行哦！");
}
/SCRIPT
下面，我們就針對上面的函數(shù)，讓其在網(wǎng)頁載入的時候自動運行！
①第一種方法
將如上代碼改為：
SCRIPT
LANGUAGE="JavaScript"
functionn
MyAutoRun()
{
//以下是您的函數(shù)的代碼，請自行修改先！
alert("函數(shù)自動執(zhí)行哦！");
}
window.onload=MyAutoRun();
//僅需要加這一句
/SCRIPT
②第二種方法
修改網(wǎng)頁的Body為：
body onLoad="MyAutoRun();"
或者改為：
body onLoad="javascript:MyAutoRun();"
③第三種方法
使用JS定時器來間斷性的執(zhí)行函數(shù)：
setTimeout("MyAutoRun()",1000); //隔1000毫秒就執(zhí)行一次MyAutoRun()函數(shù)
實現(xiàn)方法，將最上面的那JS函數(shù)，改為：
SCRIPT
LANGUAGE="JavaScript"
functionn
MyAutoRun()
{
//以下是您的函數(shù)的代碼，請自行修改先！
alert("函數(shù)自動執(zhí)行哦！");
}
setTimeout("MyAutoRun()",1000);
//這樣就行拉
/SCRIPT
vb.net 禁止webbrowser中的ALERT等JS對話框
首先在項目引用里面,選擇COM選項卡,添加 Microsoft HTML Object Library
添加mshtml命名空間的引用。
下面看代碼
IHTMLWindow2 win = (IHTMLWindow2)hdoc.Window.DomWindow;
string s = "function confirm() {";
s += "return true;";
s += "}";
s += "function alert() {}";
win.execScript(s, "javascript");
這樣就可以解決在WebBrowser中因有消息窗口彈出而影響程序運行過程的問題。
稍加改動還可以控制頁面跳轉(zhuǎn)，比如原來的alert()方法是彈出一個提示信息，現(xiàn)在修改后的代碼不會有任何操作。
如果你在修改后的代碼加上一段自己的處理程序就不一樣了。當彈出alert對話框時，我就認為這個頁面已經(jīng)處理完成。
現(xiàn)在我需要處理下一個頁面。這樣的話就在 function alert() {} 的花括號中添加一段javascript的頁面跳轉(zhuǎn)腳本就可以拉。
將代碼修改為如下。就可以達到理想的效果。以下測試代碼中是在執(zhí)行alert方法時直接將頁面導(dǎo)航至空白頁。
很想幫你但是盡力了，呵呵。
VB.NET中webbrowser彈出的JS確認框如何屏蔽？
vDocument?=?webBrowser1.Document
vDocument.parentWindow.execScript("function?confirm(str){return?true;}?",?"javascript")
vDocument.parentWindow.execScript("function?alert(str){return?true;}?",?"javaScript")
VB.NET抓取網(wǎng)頁JS顯示的內(nèi)容的問題
這個用到庫的問題(是matlab庫)
開頭:
#include mex.h/*這個matlab自己的也是必須的*/
庫函數(shù)(4個參數(shù))//名字忘了太長了
{
//自己的程序;
}
分享標題：vb.netjs顯示的簡單介紹
網(wǎng)頁URL：http://ef60e0e.cn/article/hdhppi.html
