qqexp016.html

来自「包含大量VB常用函数 大概一百几十个左右 每个函数都有比较详细的说明 希望大家喜」· HTML 代码 · 共 74 行

HTML
74 行
字号 
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>

<head>
<meta http-equiv="Content-Type" content="text/html">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>千千VB站 VB函数清单</title>
</head>

<body>

<marquee><b><blink><font color="#000000">小数取成正数</font></blink></b></marquee>
<center>
<hr width="100%" szie="4">
</center>
<p>&nbsp;&nbsp;&nbsp; ●Int。<br>
&nbsp;&nbsp;&nbsp; 以数学线性来讲，Int会取一个具有小数的数值右方的整数<br>
&nbsp;&nbsp;&nbsp; 2&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
1&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 0.4&nbsp; 0&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
-1<br>
&nbsp;&nbsp;&nbsp; +----------+------+---+----------+<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Int取0.4右方的整数 
0<br>
&nbsp;&nbsp;&nbsp; Ex:<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = Int(HerVal)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = Int(Val(Text1.text))<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = Int(123.45)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Debug.Print Int(-123.45)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Int(12345) 传回 12345<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Int(12345.2) 传回 12345<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Int(-12345.2) 传回 -12346
<p>&nbsp;&nbsp;&nbsp; ●Fix。<br>
&nbsp;&nbsp;&nbsp; 无条件截去小数<br>
&nbsp;&nbsp;&nbsp; Ex:<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = Fix(HerVal)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = Fix(Val(Text1.text))<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = Fix(123.45)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = Sgn(-12345)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Debug.Print Fix(-123.45)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Fix(12345) 传回 12345<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Fix(12345.2) 传回 12345<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Fix(-12345.2) 传回 -12345
<p><a name="cint"></a>&nbsp;&nbsp;&nbsp; ●CInt。<br>
&nbsp;&nbsp;&nbsp; 小数转整数，采四舍五入的方式计算。<br>
&nbsp;&nbsp;&nbsp; Ex:<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = CInt(HerVal)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = CInt(Val(Text1.text))<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = CInt(123.45)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = CInt(-12345)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Debug.Print CInt(-123.45)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CInt(12345) 传回 12345<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CInt(12345.4) 传回 12345<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CInt(12345.5) 传回 12346<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CInt(-12345.4) 传回 -12345<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CInt(-12345.5) 传回 -12346
<p><a name="clng"></a>&nbsp;&nbsp;&nbsp; ●CLng。<br>
&nbsp;&nbsp;&nbsp; 小数转长整数，采四舍五入的方式计算。<br>
&nbsp;&nbsp;&nbsp; Ex:<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = CLng(HerVal)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = CLng(Val(Text1.text))<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = CLng(123.45)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MyVal = CLng(-12345)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Debug.Print CLng(-123.45)<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CLng(12345) 传回 12345<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CLng(12345.4) 传回 12345<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CLng(12345.5) 传回 12346<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CLng(-12345.4) 传回 -12345<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CLng(-12345.5) 传回 -12346

</body>

</html>

qqexp016.html - 源码说明

本页面展示了「包含大量VB常用函数 大概一百几十个左右 每个函数都有比较详细的说明 希望大家喜欢它啦」中的 qqexp016.html 源码文件，采用 HTML 编程语言编写，共 74 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与VB函数库相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?